在窗体上画一个命令按钮，然后编写如下代码： Private Sub Command

问题单项选择题

在窗体上画一个命令按钮，然后编写如下代码：
Private Sub Command1_Click()
Dim MaxSize,NextChar,MyChar
Open"d:\temp\female.txt"For Input As#1
MaxSize=LOF(1)
For NextChar=MaxSize To 1 Steo-1
Seek#1,NextChar
MyChar=Input(1,#1)
Next NextChat
Print EOF(1)
Close #1
End Sub
程序运行后，单击命令按钮，其输出结果为( )。

A．True

B．False

C．0

D．Null

答案

参考答案：B

解析：本题考查文件的操作。以读的方式打开文件female.txt，Nextchar表示从文件的最后一个字符开始。程序首先定位到该字符，然后取出一个字符，存放到字符串Myrchar中。输出的EOF(1)表示文件指针是否到达文件1的末尾。返回值有True(移动到末尾)和False(没有到末尾)。既然是从后往前读出每个字符，因此操作结束以后，文件指针不可能移动到文件的末尾，所以EOF(1)的值必然为False。