问题
单项选择题
窗体上画一个命令按钮，然后编写如下代码：Private Type Record ID As Integer Name As String * 20End TypePrivate Sub command1 _ Click( Open "c: \file. txt" for Input As MaxSize = LOF (1) for NextChar =MaxSize To Step-1Seek #1, NextCharMyChar=Input(1，#1) Next NextChar Print EOF(1) Close #1 End Sub程序运行后，单击命令按钮，其输出结果为______。
A．True
B．False
C．0
D．Null
答案
参考答案：B
解析： 本题的难点是如何确定文件的指针是否指在文件的末尾处。Seek语句把相应文件的文件指针由后向前移动，当循环结束时，文件指针在文件的开始处，所以EOF(1)为False。