UC知道怎么错了?
来源：百度知道 编辑：UC知道 时间：2024/06/26 05:27:06
Private Sub Command1_Click()
Open "C:\Documents and Settings\lz.SSS-3C512EF4DCC\桌面\a.txt" For Random As #1
Print #1, Text1.Text
Close #1
End Sub
Open "C:\Documents and Settings\lz.SSS-3C512EF4DCC\桌面\a.txt" For Random As #1
Print #1, Text1.Text
Close #1
End Sub
如果你是用 Random 写操作文件,这样是错误的,请看MSDN
Dim MyRecord As Record ' 声明变量。
Open "TESTFILE" For Random As #1 Len = Len(MyRecord)
' 若要以其他方式打开文件，必需先关闭此文件。
Close #1
其实你应该使用:
Private Sub Command1_Click()
Open "C:\Documents and Settings\lz.SSS-3C512EF4DCC\桌面\a.txt" For output As #1
Print #1, Text1.Text
Close #1
End Sub