191问答库 > VB里面，文本框里每更新一条数据就写入到指定的TXT里，请问这个代码如何实现的？（在线等

VB里面，文本框里每更新一条数据就写入到指定的TXT里，请问这个代码如何实现的？（在线等

2024-11-17 12:51:32

推荐回答（2个）

回答1：

应该用文本框改变事件，而不是鼠标移动事件，另外不要用追加的方式写文本：
Private Sub Text1_Change()

FileNum = FreeFile
Open "d:\" & Date & ".txt" For OutPut As #FileNum
Print #FileNum, Text1.Text

Close #FileNum

End Sub

回答2：

你上面的代码是没用你只需要：
Private Sub Text1_Change()
Open “c:\123.txt” For Output As #1
Print #1, Text1.Text
Close #1
End Sub