> [填空题] 在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,然后编写如下事件过程: Private Sub Command1_Click() Dim inData As String Text1.Text="" Open"d:myfile.txt"Fo (8) As#1 Do While (9) Input #1,inData Text1.Text=Text1.Text+inData Loop Close #1 End Sub 程序的功能是,打开D盘根目录下的文本文件myfile.txt,读取它的全部内容并显示在文本框中。请填空。
问题:
发布时间:2022-07-01
[填空题] 在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,然后编写如下事件过程: Private Sub Command1_Click() Dim inData As String Text1.Text="" Open"d:myfile.txt"Fo (8) As#1 Do While (9) Input #1,inData Text1.Text=Text1.Text+inData Loop Close #1 End Sub 程序的功能是,打开D盘根目录下的文本文件myfile.txt,读取它的全部内容并显示在文本框中。请填空。