下面的程序执行时,将把当前目录下的顺序文件smtextl.txt的内容读入内存,并在文本框Textl中显示出来。在横线处应填写( )。 Private Sub Commandl_Click( ) Dim in.DataAs String T

admin2018-12-20  31

问题 下面的程序执行时,将把当前目录下的顺序文件smtextl.txt的内容读入内存,并在文本框Textl中显示出来。在横线处应填写(     )。
Private Sub Commandl_Click(     )
Dim in.DataAs String
Textl.Text=-”“
Open”.\smtextl.txt”_________________As#l
Do While__________________
Input#1,inData
Textl.Text=TeXtl.Text&inData
Loop
Close#l
EndSub

选项 A、Input(EOF(1))
B、Input(NotEOF(1))
C、Append(Not EOF(1))
D、Append  (EOF(1))

答案B

解析 考查文件的操作。程序首先要以读文件的方式(Input)打开文件,题中说明这是个顺序文件,那么如果文件指针没有到文件尾(EOF(1)的值为False),就要从文件中读出数据,所以循环条件应以是否到文件尾为依据,判断是否继续循环。
转载请注明原文地址:https://jikaoti.com/ti/uEm0FFFM
0

最新回复(0)