我想问一下 怎么用VB 在指定目录下面 新建一个文件 然后写入 text1 中的信息啊?

2025-03-13 20:27:14
推荐回答(2个)
回答1:

vb code:
Private Sub Command4_Click()
On Error Resume Next
MkDir ("d:\aaaa") 'D盘新建一个aaaa文件夹
Open "d:\aaaa\tx.txt" For Append As #1
Print #1, Text1.Text '在该文件夹下将text1.text写入txt.txt文件(如果有txt.txt文件则在
Close #1 '你可以查查 Append、Output 的不同
'txt.txt文件里文本下一行追加文本,如果没有,则新建一个
End Sub

回答2:

Private Sub Command1_Click()
Open "指定目录" & "\123.txt" For Output As #1
Print #1, text1.Text
Close #1
End Sub