[填空题] 以下程序的功能是：把当前目录下的顺序文件smtext1.txt的内容读入内存，并在文本框 Text1中显示出来。请填空。
Private Sub Command1_Click()
Dim inData As String
Textl.Text=" "
Open ".smtext1.______ As #1
Do While ______
Input #1，inData
Text1.Text=Text1.Text&inData
Loop
Close #1
End Sub
[填空题] 以下程序的功能是：把当前目录下的顺序文件smtext1.txt的内容读入内存，并在文本框 Text1中显示出来。请填空。
Private Sub Command1_Click()
Dim inData As String
Textl.Text=" "
Open ".smtext1.______ As #1
Do While ______
Input #1，inData
Text1.Text=Text1.Text&inData
Loop
Close #1
End Sub
For Input Not EOF(1)
本题考查顺序文件的打开与读写操作以及EOF函数的用法。要打开smtext1文件作为读入内容用，所以第14空填：ForInput。 Do循环语句表达的意思是： 当还没有读完 smtext1文件中的内容时，持续读入，并把读入的内容赋给inDate变量。EOF函数用来测试文件读取完毕的状态。第15空填：Not EOF(1)，表示没有读取完文件中的内容。
VIP截止日期：2025-01-03 15:09:40
←请使用支付宝扫码支付
VIP截止日期：2025-01-03 15:09:40
←请使用微信扫码支付
