在窗体上面一个名称为Commandl的命令按钮,并编写如下程序: Pri vate Type Record ID As Integer Nanle As String*20 End Type Private Sub Commandl_Cli

admin2013-11-29  34

问题 在窗体上面一个名称为Commandl的命令按钮,并编写如下程序:
Pri vate Type Record
    ID As Integer
    Nanle As String*20
End Type
Private Sub Commandl_Click()
    Dim MaxSize,NextChar,MyChar
    Open“d:\temp\female.txt”For Input As#l
    MaxSize=LOF(1)
    For NextChar=MaxSize To 1 Step-1
       MyChar=hnput(1,#1)
    Next NextChar
    Print EOF(1)
    Close#l
End Sub
    运行程序,单击命令按钮,其输出结果为(     )。

选项 A、True
B、假
C、0
D、Null

答案A

解析 程序中以顺序输入方式打开d:\temp\fe-male.txt文件。Lof。函数取得打开文件的长度。EOF函数用来测试文件的结束状态。根据文件长度值,利用Input函数逐一取出文件中的字符,每读取一个字符,文件指针自动下移,指向下一个字符。当执行最后一次循环时,Input函数读取了最后一个字符,文件指针再向下移动就会指向文件的结尾。因此当EOF函数测试文件结束状态时,就会返回Trueo对于逻辑值,Print语句会直接输出“True”。因此答案为A。
转载请注明原文地址:https://kaotiyun.com/show/TXQp777K
0

相关试题推荐
随机试题
最新回复(0)