单选题 使用Do While循环从打开的文件中逐条读取记录,以下能够正确读取数据的程序是______。
A) Open " c:/File1.txt" For Input As #1
Do While Not EOF()
Line Input #1, strline
……
Loop
B) Open " c:/Filel.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, strline
……
Loop
C) FileNo=FreeFile
Open "c:/File1.txt" For Input As #1
Do While Not EOF(FileNo)
Line Input #1 , strline
……
Loop
D) FileNo=FreeFile
Open "c: /File1.txt" For Input As #1
Do While Not EOF(#FileNo)
Line Input #1, strline
……
Loop

【正确答案】 B
【答案解析】[解析] 本题考查的是如何使用文件号。在选项A) 中,EOF()函数中应有文件号;在选项C) 和D) 中都有文件号使用时前后不统一的错误,其中选项D) 中,"#FileNo"的表示形式是错误的。