[填空题] 下列程序的功能是把顺序文件smtextl.txt的内容全部读入内存，并在文本框Textl中显示出来。请填空。Private Sub Command1_Click()Dim inData A

[填空题] 下列程序的功能是把顺序文件smtextl.txt的内容全部读入内存，并在文本框Textl中显示出来。请填空。Private Sub Command1_Click()Dim inData As StringText1.Text=""Open "smtext1.txt" （） As （）Do While （）Input #2，inDataText1.Text=Text1.Text & inDataLoopClose #2End Sub

参考答案：

For Input, #B, NOT EOF(B)

问题解析:

第一空考查的考点是有关文件的打开的。打开顺序文件的基本格式为： Open FileName For Mode As #FileNumber。 其中，FileName表示要打开的文件的路径；Mode为文件打开模式：OutPut用于输出、Append用于追加写入、Input用于读取： FileNumber为打开文件时指定的句柄(文件号)。 第二空中由于要读取数据，所以(13)空应为ForInput；在下面出现了在2号文件中读取的语句，所以[14]空应为#2。 第三空考查的考点是有关文件结束的。EOF函数用于判断文件指针是否已到文件结尾。对于本题来说，要求把顺序文件中所有内容读入内存，应该只有文件结束才终止，所以只要没有结束就继续循环，此处应填NOTEOF(2)。