Private Sub cmd1_Click()
no = Text1.Text
na = Text2.Text
Open "C:\a.txt" For Output As #2
Write #2, no, na
Close #2
End Sub
他可以记录2组数据~但是在txt文件中无法多行记录~为什么?
...全文
255打赏收藏
谁能告诉我?(2)
Private Sub cmd1_Click() no = Text1.Text na = Text2.Text Open "C:\a.txt" For Output As #2 Write #2, no, na Close #2 End Sub 他可以记录2组数据~但是在txt文件中无法多行记录~为什么?
Private Sub cmd1_Click()
Dim no As String, na As String
no = Text1.Text
na = Text2.Text
Open "C:\a.txt" For Output As #2
Print #2, no & vbCrLf & na
Close #2
End Sub
Private Sub cmd1_Click()
Dim no As String, na As String
no = Text1.Text
na = Text2.Text
Open "C:\a.txt" For Output As #2
Print #2, no & vbCrLf & na
Close #2
End Sub