Question

vb 如何每按一次按钮就生成一个TXT文件？

Private Sub Command1_Click()
Open App.Path + "text1.text.txt" For Output As #1
Print #1, Text1.Text
Close #1
End Sub

----
我这样写，每按一次就是重置上一个文件。。 永远就一个TXT文件
我本来是有个文本框的，我希望把文本框被键入的内容拿来做TXT文件的标题
这样又该怎么写呢

Answer 1

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Const SW_SHOWNORMAL = 1

打开：
ShellExecute 0, "open", "c:\1.txt", "", vbNullString, SW_SHOWNORMAL

"c:\1.txt", ""
分别为文件路径和执行参数(一般是exe)