如何在vb6.0中读写逗号分隔的文本值

好的，假设我有一个示例文本文件，其中包含一些逗号分隔的值，如下所示：

-1,0,3,0,5,4,6,7,8,9

我想在VB 6.0中制作一个程序，打开该文件，读取值并将其存储在变量中，这些变量显示在文本框中，如（示例）：

等等

因此，当我在程序文本框中输入这些值并点击save file时，它会用新值保存文件。就这么简单。谢谢你们

（注意：此答案假设文本文件仅包含一行。）

首先，您需要读取文本文件：

Dim rawData as string

Dim sFileText as String
Dim FileNo as Integer
FileNo = FreeFile
Open "C:\test.txt" For Input As #FileNo 'you should change the file path
Line Input #FileNo, sFileText 'read the whole line
rawData = sFileText 'store the first line of the text file in 'rawData'
Close #FileNo

接下来，您需要用逗号分割原始数据：

Dim data() as string 'an array that will hold each value
data = Split(rawData, ",") 'split 'rawData' with a comma as delimiter

现在，第一个值存储在数据（0）中，第二个值存储在数据（1）中，以此类推

对于“保存文件”按钮，您可以执行以下操作：

Dim newData as String
newData = data(0) & "," & data(1) & "," & data(2) 'etc.

---

然后。

如果执行以下操作，文件将自动以逗号分隔：

Write #filenumer Value1, Value2, Value3...

---

然后您可以使用“输入”一次获取一个值，或使用“行输入”一次获取所有值。

您可以通过编辑此问题发布您的代码吗？抱歉，我没有代码。这就是为什么我要问它是怎么做的。我仍在搜索它，但很难找到关于VB6.0的内容，这不难，因为VB6的每个合法副本都附带在线文档，包含在包中的MSDN CD中。没有MSDN CD就意味着没有合法的拷贝，就像一个符咒。非常感谢。

Write #filenumer Value1, Value2, Value3...