填空题以下程序的功能是：把当前目录下的顺序文件smtextl.txt的内容读入内存，并在文本框Texd中显示出来。请填空。 Pfivme Sub Commandl_Click( ) Dim inData As String Textl.Text ="" Open"．/smtextl.txt"{{U}} 【14】 {{/U}}As#1 Do While{{U}} 【15】 {{/U}} Input#1，in Data Text1.Text=Text1.Text&inData Loop Close#1 End Sub

1、

【正确答案】 1、[14]For lnput

【答案解析】[15]Not EOF(1) [解析] 要打开smtext1文件作为读入内容用，所以第14空填：For lnput。 Do循环语句表达的意思是：当还没有读完smtext1文件中的内容时，持续读入，并把读入的内容赋给inDate变量。EOF函数用来测试文件读取完毕的状态。第15空填：Not EOF(1)，表示没有读取完文件中的内容。