在窗体上画一个命令按钮,然后编写如下代码: Private Type Record ID As IntegerName As String * 20 End Type Private Sub Command1_Click()Dim MaxSize,NextChar,MyCharOpen"D:\temp\female.txt"For Input As # 1Max Size=LOF(1)For Next Char=1 To MaxSize Seek # 1,NextChar MyChar=Input(1,# 1)Next NextCharPrint EOF(1)Close # 1 End Sub 程序运行后,单击命令按钮,其输出结果为 ______。
A.True
B.False
C.0
D.Null
参考答案:A
解析:[评析] 该程序对指定路径下的文件进行Input操作,由于是遍历整个文件,则最后的EOF(1)必为真。