[单项选择题] 在窗体上画一个命令按钮,然后编写如下代码: Private Type Record ID As IntegerName As String * 20 End Type Priv

14 查阅

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

Private Type Record

ID As Integer

Name As String * 20

End Type

Private Sub Command1_Click()

Dim MaxSize,NextChar,MyChar

Open"D:empfemale.txt"For Input As # 1

Max Size=LOF(1)

For Next Char=1 To MaxSize

Seek # 1,NextChar

MyChar=Input(1,# 1)

Next NextChar

Print EOF(1)

Close # 1

End Sub

程序运行后,单击命令按钮,其输出结果为 ______。

A.True

B.False

C.0

D.Null

参考答案:

A

[评析] 该程序对指定路径下的文件进行Input操作,由于是遍历整个文件,则最后的EOF(1)必为真。

计算机考试