vb6.0关于.csv文件的操作

来源:百度知道 编辑:UC知道 时间:2024/05/21 15:03:30
vb6.0中,.文件中有换行和标点,想实现逐行读取.csv文件,然后写入一个.log文件中,跪求高手该如何操作!!
dir126大哥那我想实现读一行写一行,或者是读出来的数据放数组里,一次写入的话,应该如何做呢?

csv本来就是文本格式,和log文件格式是一样的,直接改扩展名就可以了,如果要读写的话可用如下格式

Dim Fname As String
Dim Nextline As String

Fname = "c:\0.csv"

Open Fname For Input As #1
Do Until EOF(1)
Line Input #1, Nextline
MsgBox Nextline
Loop
Close #1
如果要对分隔每个符号里的数据单独处理,可以用split()函数分割,

写文本的话把上面的Input换成output就可以了

dim Temp as string,AllMes as string
open 你的.csv文件 for input as #1
open 你的.log文件 for output as #2
do while not eof(1)
lineinput #1,Temp
AllMes=AllMes+Temp
loop
close #1
print #2,AllMes
close #2