[单项选择题] 在窗体上画一个命令按钮,然后编写如下代码: Private Type Record ID As IntegerName As String * 20 End Type Priv
19 查阅
[单项选择题] 在窗体上画一个命令按钮,然后编写如下代码:
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
参考答案: