如何在已有文本文件末尾添加数据

Question

如何在已有文本文件末尾添加数据？
似乎只能新建一个文件或者覆盖原有文件，我要在现有文件末尾写入文字怎么办呢？（当前做法：把原文件读出+要加的资料写入新文件，然后删除原文件，然后把新文件改名，好像很白痴的作法哦）对了，顺便问一下，vb中改文件名一般怎么弄？

Answer 1

Private Sub Form_Load()    Open "f:\d.txt" For Append As #1
    
    Print #1, , "你要加的数据"
    
    Close #1End Sub

Answer 2

Private Sub Command2_Click()
    Open "c:\1.txt" For Append As #1
    Write #1, "ffff"
    Close #1
End SubName oldfile As newfile

Answer 3

改文件名
    FileCopy "f:\d.txt", "f:\dd.txt"
    Kill "f:\d.txt"

Answer 4

Name "f:\d.txt" As "f:\dd.txt"

Answer 5

用 Append   方式打开