[填空题] 在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，然后编写如下事件过程：Private Sub Command1_Click()Dim inData As St

17 查阅

[填空题] 在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，然后编写如下事件过程：Private Sub Command1_Click()Dim inData As StringText1.Text=""Open"d:myfile.txt" For（）As#1Do While（）Input #1,inDataText1.Text=Text1.Text+inDataLoopClose#1End Sub程序的功能是，打开D盘根目录下的文本文件myfile.txt，读取它的全部内容并显示在文本框中。请填空。

参考答案:

Input；Not EOF(1)

[评析] Open语句使用以下语法： Open pathname For [Input|Output|Append] As filenumber [Len=buffersize] 当打开顺序文件作为Input时，该文件必须已经存在，否则会产生一个错误。 EOF()函数判断文件是否结束。该程序对指定路径下的文件进行Input操作，由于是遍历整个文件，则最后的EOF(1)必为真。

计算机考试