单项选择题

使用Do While循环从打开的文件中逐条读取记录。以下能够正确读取数据的程序段是

A.Open "c:\File1.txt" For Input As #1
Do While Not EOF()
Line Input #1, strLine
Loop
B.Open "c:\File1.txt" For Input As#1
Do While Not EOF(#1)
Line Input #1, strLine
Loop
C.FileNo=FreeFile
Open FileNo For Input As #1
Do While Not EOF(FileNo)
Line Input #1, strLine
Loop
D.FileNo=FreeFile
Open FileNo For Input As #1
DoWhile Not EOF(#FileNo)
Line Input #1, strLine
Loop