如何在一个TXT文件中作追加。不是在结尾，在最前面加，能行吗？

Question

TXT里的东西保持，但要从第一行追加。

Answer 1

先把文本全部读取到一String中
用Mid语句替换
在写入文件

Answer 2

text1.text="Hello!" + text1.text

Answer 3

给你一个我曾经用过的方法在追加的时候首先建立一个临时ASCII码文件里边存储你原先的TXT中的全部内容然后先把你要写的东西覆盖进去,在将临时ASCII码文件中的内容APPEND进去!最后在把那个临时文件删掉~~~~~~~~~~~~~~~~~这个方法我曾经用过,还比较好用!

Answer 4

先把文本全部读取到一String变量 str
str= "新内容" & str
然后把str写入文件

Answer 5

text1.text="Hello!" + vbcrlf+text1.text

Answer 6

同意上面的
Private Sub Command1_Click()
    '设置 Text1.MultiLine = True
    Text1.Text = "Hello!" + Chr(13) + Chr(10) + Text1.Text
End Sub

Answer 7

可以用filesystemobject解决此问题！
Set fs = CreateObject("Scripting.FileSystemObject")
具体请查相关资料！