Question

vb写入顺序文件问题

我一个文本文件里面本来是有数据的，我想在它的每行里面添加一些东西。比如有如下文件
111111
22222
3333333
4444444
那么我想打开文件之后在 每行的后面依次加入a(1 to 4)的值。
比如用户在text1里面输入了某个与X有关系的表达式如x+5
那么怎么让y就=x+5 就像使用赋值语句一样 如果直接用y=text1.text的话y值只是一个字符窜而已

Answer 1

顺序文件操作，应该先顺序读出每一行数据（可写到字符串数组中），处理完每行数据后，再依次把每行数据写回到文本文件中。

Answer 2

赞同楼上的观点：给你编下代码，可以参考一下。
dim i%,j %,data$,b$
open "C:\ 1.txt " for input as #1
i=0
while not EOF (1)
line input # 1,data
a(i)=data & a (i)
wend
close #1
For j =0 to 4
b=a (j) & VBcrlf
next j
open "C:\1.txt " for output as #2
print #2,b
chose #2