[填空题] 以下程序的功能是：把程序文件smtextl．txt的内容全部读入内存，并在文本框Textl中显示出来。请填空。 Private Sub Command1

[填空题] 以下程序的功能是：把程序文件smtextl．txt的内容全部读入内存，并在文本框Textl中显示出来。请填空。

Private Sub Command1_Click()

Dim inData As String

Text1.Text=" "

Open"smtext1.txt"______As______

DO While______

Input # 2，inData

Text1.Text=Text1.Text&inData

Loop

Close # 2

End Sub

For Input#2，NOT EOF(2)

打开一个存在的文件，以便读出其中的内容。语句的一般格式是：Open"文件名"For Input As#文件号。 文件号：为被打开的文件指定一个文件号，在以后访问该文件时，以文件号来代表文件。文件号的取值为1～511之间的整数。每个文件号对应唯一的一个文件，不能将已使用的文件号再指定给其他文件。由下面的程序可知应该是#2。 EOF函数用于测试文件的结束状态，格式为：EOF(文件号)，NOT EOF(2)即当文件号为2的文件没有结束时，执行Do While循环体，由下面的Do While中的Input#2，inData知文件号是2，故是NOT EOF(2)。