Private Sub Command2_Click()
Open "F:\TEST\b.txt" For Output As #1
Print #1, Text1.Text
Close
End Sub
以上代码可以创建一个txt文件
Private Sub Command1_Click()
Dim str
Open "F:\TEST\a.txt" For Append As #1京东
str = Text1.Text
Write #1, str
Close #1
End Sub
以上代码可以往一个txt文件当中写入数据
本文介绍了使用VBScript进行文件操作的方法,包括如何创建新的文本文件以及如何向现有文本文件中追加数据。

1万+

被折叠的 条评论
为什么被折叠?



