杭州交通信息网吹画疯狂的头发图片:VB编程 急！！！
来源：百度文库 编辑：杭州交通信息网 时间：2024/04/27 18:43:39
在Form1的窗体上画一个文本框，名称为Text1，能显示多行；再画一个命令按钮，名称为Command1，标题为“存盘”。
并编写适当的事件过程，使得在加载窗体时，把in087.txt文件的内容显示在文本框中，
然后在文本的最前面手工插入一行汉字“计算机等级考试”。最后单击“存盘”按钮，可以把文本框中修改过的内容存到文件out087中。
谢谢了！！！
并编写适当的事件过程，使得在加载窗体时，把in087.txt文件的内容显示在文本框中，
然后在文本的最前面手工插入一行汉字“计算机等级考试”。最后单击“存盘”按钮，可以把文本框中修改过的内容存到文件out087中。
谢谢了！！！
Sub Form_Load()
Dim S1$,S2$
Open "in087.txt" For Input As #1
Do Until Eof(1)
Line Input #1,S1$
S2$=S2$+S1$
Loop
Text1="计算机等级考试"+vbCrLf+S2$
Close #1
End Sub
Sub Command1_Click()
Open "out087.txt" For Output As #1
Print#1,Text1
Close #1
MsgBox"存盘完毕!"
End Sub
deng deng kan