Question

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

Answer 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

Answer 2

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