2. 计算机
  3. 在窗体上画一个命令按钮，然后编写如下代码： Private Type Record ID As Integer Name As String *20 End Type

在窗体上画一个命令按钮，然后编写如下代码： Private Type Record ID As Integer Name As String *20 End Type

admin2009-02-13  32
问题 在窗体上画一个命令按钮，然后编写如下代码：         Private Type Record               ID As Integer              Name As String *20        End Type        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(I)               Close 31         End Sub     程序运行后，单击命令按钮，其输出的结果为
选项 A、True
B、False
C、0
D、Null
答案2
解析 这个题目的重点在于考核函数LOF、 EOF和Input$的使用。LOF函数能够返回文件的实际长度。EOF函数用于测定记录指针是否到达文件末尾。Input$函数用于从文件中读出指定个数的字符。
转载请注明原文地址:https://kaotiyun.com/show/mb1p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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