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

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

参考答案：

Input Not EOF(1)

问题解析:

打开文件的语句形式：Open文件名For读写方式As[#]文件号[Len=记录长度]，其中读写方式有：Output、Input和Append。根据题意可知myfile. txt作为输入文件，故填Input。EOF函数的语法为EOF(filenumber)，filenumber包含任何有效的文件号。使用EOF的目的是为了避免因试图在文件结尾处进行输入而产生错误。直到到达文件的结尾，EOF函数都返回False。而Do while的条件表达式必须为真，才可进入循环体。所以应填Not EOF(1)，1为myfile. txt的文件号。