2. 计算机
  3. 窗体的单击事件过程如下： Private Sub Form_Click() n = FreeFile Open "e:\f1.txt" For Input As n Do While Not EOF(n) Line

窗体的单击事件过程如下： Private Sub Form_Click() n = FreeFile Open "e:\f1.txt" For Input As n Do While Not EOF(n) Line

admin2015-10-23  68
问题 窗体的单击事件过程如下：
Private Sub Form_Click()
    n = FreeFile
    Open "e:\f1.txt" For Input As n
    Do While Not EOF(n)
        Line Input #n, str1
        Print str1
    Loop
    Close
End Sub
对于以上程序，如下叙述中错误的是
选项 A、Open打开一个随机文件
B、n = FreeFile的作用是自动获取文件号，并赋值给n
C、Line Input语句从#n对应的文件中读数据，并赋值给str1
D、Not EOF(n)的含义是没有到达n所对应文件的末尾
答案A
解析 FreeFile函数返回一个整数，即下一个可供OPEN语句使用的文件号，参数范围可以是0或1，也可以省略。FreeFile（0）、FreeFile或FreeFile（）表示返回1～255之间未使用的文件号；FreeFile（1）表示返回256～511之间未使用的文件号。利用这个函数，可以把未使用的文件号赋给一个变量，从而用这个变量作为文件号。故B项表述正确。
    Open语句兼有打开文件和建立文件两种功能。题目中采用Input方式打开文件，指定文件顺序输入方式，故Open打开的是顺序文件。故A项错误。EOF函数用来返回测试文件的结束状态，对于顺序文件来说，如果已达到文件尾，则函数返回值为True，否则返回值为False。利用EOF函数，可以避免在文件输入时出现"输入超出文件尾"的错误。EOF（n）的含义是已到达文件尾，Not EOF(n)的含义是没有到达n所对应文件的末尾。故D选项表述正确。Line Input是从一个顺序文件中读出一个完整的行，并把它赋值给一个字符串变量。Line Input #n, str1指从n的文件号的文件读出一个完整的行，并把它赋值给str1。故C选项表述正确。
转载请注明原文地址:https://kaotiyun.com/show/EULp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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