在你的程序目录下放一个名为123的txt文件(里面含有内容)
命令按钮中添加代码:
Private Sub Command1_Click()
Open App.Path &"\123.txt" For Output As #1
Print #1, ""
Close #1
End Sub
实现效果:单击命令按钮后,123.txt文件中的内容被清空
第二题:一个窗体,一个命令文本框
文本框change事件中添加代码:
Private Sub Text1_Change()
Open "C:\a.txt" For Output As #1
Print #1, Text1.Text
Close #1
End Sub
1 把txt 文件读入textbox2 执行 text1.text=""
3 再将你的输入内容写到txt中
你可以看
http://www.vkwd.cn/list.asp?id=58看这里的内容:
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)