Question

VB如何在文本中追加数据

比如使用，
Open "D:\1.txt 以后1.TXT里的文件就没有了，请问如何追加记录，比如原来文本里有1234
现在追加ABCD，使文本变成
1234
ABCD
在以前的下一行添加，不删除以前的雷同 自动换行，如何实现

Answer 1

1楼的写错了。
不应该用“output”,output是输出，这样会覆盖，append是追加
2楼太复杂，没仔细看，^_^。
可以把一楼的改一下就可以，如下
Open "D:\1.txt for append As #1
Print #1,"ABCD"
Close #1
注：print可以换成write，二者区别在于写在文本中的内容两端有无双引号。
哈哈，祝你成功！！！！

Answer 2

打开“D：\
123.txt”追加为第1
打印＃1，“ABCD”
关闭＃1
追加到写，注意最后没有换行符的原文，然后最后一行后不换行。

Answer 3

打开“D：\
123.txt”追加为第1
打印＃1，“ABCD”
关闭＃1
追加到写，注意最后没有换行符的原文，然后最后一行后不换行。

Answer 4

Open
"D:\123.txt"
For
Append
As
#1
Print
#1,
"abcd"
Close
#1
后面追加写入，注意如果原文本中最后没有换行符的话，会接着最后一行后面不会换行。

Answer 5

Open "D:\1.txt for Output As #1
Print #1,"ABCD"
Close #1

好像是这样的说
如果Print不行，用Input或Line Input试试看的说