[填空題] 以下程序的功能是：把程序文件smtextl．txt的內(nèi)容全部讀入內(nèi)存，并在文本框Textl中顯示出來(lái)。請(qǐng)?zhí)羁铡?/p>

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)

打開(kāi)一個(gè)存在的文件，以便讀出其中的內(nèi)容。語(yǔ)句的一般格式是：Open"文件名"For Input As#文件號(hào)。 文件號(hào)：為被打開(kāi)的文件指定一個(gè)文件號(hào)，在以后訪問(wèn)該文件時(shí)，以文件號(hào)來(lái)代表文件。文件號(hào)的取值為1～511之間的整數(shù)。每個(gè)文件號(hào)對(duì)應(yīng)唯一的一個(gè)文件，不能將已使用的文件號(hào)再指定給其他文件。由下面的程序可知應(yīng)該是#2。 EOF函數(shù)用于測(cè)試文件的結(jié)束狀態(tài)，格式為：EOF(文件號(hào))，NOT EOF(2)即當(dāng)文件號(hào)為2的文件沒(méi)有結(jié)束時(shí)，執(zhí)行Do While循環(huán)體，由下面的Do While中的Input#2，inData知文件號(hào)是2，故是NOT EOF(2)。