问题
单项选择题
在窗体上画一个命令按钮，然后编写如下代码： Private Type RecordID As Integer Name As String *20End TypePrivate Sub Command1_Click() Dim Maxsize, NextChar, MyChar Open "d:\temp\female.txt" For Input As #1 Maxsize = LOF(1) For NextChar = Maxsize To 1 Step -1 Seek #1, NextChar MyChar = Input(1, #1)Next NextCharPrint EOF(I)Close 31 End Sub 程序运行后，单击命令按钮，其输出的结果为
A．True
B．False
C．0
D．Null
答案
参考答案：B
解析：
[分析]： 这个题目的重点在于考核函数LOF、 EOF和Input$的使用。LOF函数能够返回文件的实际长度。EOF函数用于测定记录指针是否到达文件末尾。Input$函数用于从文件中读出指定个数的字符。