Question

怎样用VB创建一个空的TXT文件？

Answer 1

一加载窗口就在指定的路径创建一个空文本文件：
Public Class Form1
Dim path As String = ""d:\zzc.txt ""

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim file As System.IO.FileStream
file = System.IO.File.Create(path)
End Sub
End Class

软件：VB2010

张志晨

Answer 2

Open "c:\1.txt" For Binary As #1
Close #1

追问

Public Class frm_Main

Private Sub frm_Main_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Open "c:\1.txt" For Binary As #1
Close #1
End Sub
End Class

我想一加载窗口就创建一个文件

追答

哦，原来不是VB6啊，这我就帮不了你了，对不起。

追问

没事，不过还是得谢谢你！

Answer 3

private sub command1_click()
open app.path & "\1.txt" for output as #1
print #1, text1
close #1
end sub

追问

Public Class frm_Main

Private Sub frm_Main_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Open "c:\1.txt" For Binary As #1
Close #1
End Sub
End Class

我想一加载窗口就创建一个文件，该怎么弄呢？

Answer 4

一加载窗口就在指定的路径创建一个空文本文件：
Public Class Form1
Dim path As String = ""d:\zzc.txt ""

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim file As System.IO.FileStream
file = System.IO.File.Create(path)
End Sub