2. 计算机
  3. 已知c:\1．txt是一个非空文件，其程序代码如下。 Private Sub Command1_Click() Dim MaxSize，NextChar，MyChat Open"c:\1．txt"For Input As#1

已知c:\1．txt是一个非空文件，其程序代码如下。 Private Sub Command1_Click() Dim MaxSize，NextChar，MyChat Open"c:\1．txt"For Input As#1

admin2009-02-13  56
问题 已知c:\1．txt是一个非空文件，其程序代码如下。    Private Sub Command1_Click()      Dim MaxSize，NextChar，MyChat      Open"c:\1．txt"For Input As#1      MaxSize=LOF(1)      For NextChar=MaxSize To 1 Step-1        Seek #1，NextChar        MyChar=Input(1，#1)     Next NextChar   Print EOF(1)    Close #1    End Sub    程序运行后，单击命令按钮，其输出结果为______。
选项 A、True
B、Null
C、0
D、False
答案8
解析 For循环开始执行时，由于NextChar＝MaxSize，所以要执行语句Seek #l，NextChar，文件指针指向文件尾，使EOF(1)为真，循环结束后，文件指针指向文件的开始处，故其输出结果为False。
转载请注明原文地址:https://www.kaotiyun.com/show/V21p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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