[单项选择题] 窗体上画一个命令按钮，然后编写如下代码：Private Type Record ID As Integer Name As String * 20End TypePrivate S

[单项选择题] 窗体上画一个命令按钮，然后编写如下代码：

Private Type Record

ID As Integer

Name As String * 20

End Type

Private Sub command1 _ Click(

Open "c: file. txt" for Input As

MaxSize = LOF (1)

for NextChar =MaxSize To Step-1

Seek #1, NextChar

MyChar=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。