Question

用VB进行文件操作

我有一个文件 内容如下
123654
36997875
+26456545--*/
思考几分贺岁发给大家看法和

怎样对文件的某一行的数据进行修改

谢谢

Answer 1

打比方你这个文件是txt格式的，文件保存为C:\1.txt
private sub command1_click()
dim i as integer,a() as string ,temp as string
open c:\1.txt for input as #1
do while not eof(1)
line input #1，temp
i=i+1
redim preserve a(i)
a(i)=temp
doevents
loop
close '这里a(i)里的数据是第i行的数据··
····你要修改的话可以在这里修改，比方说a(3)="这里写修改后的第3行的数据"
open c:\1.txt for output as #1 '保存修改后的行到源文件
for i = 1 to ubound(a)
print#1,a(i)
next
close
end sub