如何在 VB 6.0 中读取逗号分隔的文本值并将其写入文件

Question

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

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

我想在 VB 6.0 中创建一个程序来打开该文件，读取值并将它们存储在变量中，这些变量显示在文本框中，如下所示（示例）：

Name: [ Value -1 ]
Nationality: [ Value 0 ]
Experience: [ Value 3 ]

等等..

因此，当我在程序文本框中偶然发现这些值并点击保存文件时 - 它会使用新值保存文件。就这么简单吗。谢谢你们！

Answer 1

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

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

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

现在第一个值存储在 data(0) 中，第二个值存储在 data(1) 中，依此类推

就 'save file' 按钮而言，您可以执行以下操作：

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

然后write it to a file。

Answer 2

如果您这样做，文件将自动以逗号分隔：

Write #filenumer Value1, Value2, Value3...

然后您可以使用 Input # 一次获取一个值或 Line Input 一次获取所有值。

如何在 VB 6.0 中读取逗号分隔的文本值并将其写入文件

How to read and write comma delimited text values to file in VB 6.0

vb6

comma

read-write

delimiter