2. 计算机
  3. 在窗体上画一个命令按钮，然后编写如下代码： Private Sub Command1_Click( ) Dim MaxSize，NeXtChar，MyChar Open"d：＼temp＼female．txt"For Input As

在窗体上画一个命令按钮，然后编写如下代码： Private Sub Command1_Click( ) Dim MaxSize，NeXtChar，MyChar Open"d：＼temp＼female．txt"For Input As

admin2018-09-29  57
问题 在窗体上画一个命令按钮，然后编写如下代码：
    Private Sub Command1_Click( )
    Dim MaxSize，NeXtChar，MyChar
    Open"d：＼temp＼female．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、Tme
B、False
C、0
D、Null
答案B
解析 本题考查文件的操作。以读的方式打开文件female．txt，Nextchar表示从文件的最后一个字符开始。程序首先定位到该字符，然后取出一个字符，存放到字符串Mychar中。输出的EOF(1)表示文件指针是否到达文件1的末尾。返回值有True(移动到末尾)和False(没有到末尾)。既然是从后往前读出每个字符，因此操作结束以后，文件指针不可能移动到文件的末尾，所以EOF(1)的值必然为False。
转载请注明原文地址:https://www.kaotiyun.com/show/GQFp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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