2. 计算机
  3. 假定在窗体(名称为Form1)的代码窗口中定义如下记录类型： Private Type animal animalName As String*20 aColor As String*10 End Type 在窗体上面

假定在窗体(名称为Form1)的代码窗口中定义如下记录类型： Private Type animal animalName As String*20 aColor As String*10 End Type 在窗体上面

admin2013-04-11  47
问题 假定在窗体(名称为Form1)的代码窗口中定义如下记录类型：    Private Type animal      animalName As String*20      aColor As String*10    End Type    在窗体上面一个名称为Command1的命令按钮，然后编写如下事件过程：    Private Sub Command1_Click()      Dim rec As animal      Open "c:\vbTest. dat" For Random As #1 Len=Len(rec)rec. animalName="Cat"      rec. aColor="White"      Put #1, , rec    End Sub    则以下叙述中正确的是______。
选项 A、记录类型animal不能在Form1中定义，必须在标准模块中定义
B、如果文件"c:\vbTest. dat"不存在，则Open命令执行失败
C、由于Put命令中没有指明记录号，因此每次都把记录写到文件的末尾
D、语句“Put #1, , rec”将animal类型的两个数据元素写到文件中
答案D
解析 选项A在一般情况下，记录类型应在标准模块中定义。如果在窗体模块中定义，则必须在"Type"关键字前面加上“Private”；选项B用Open语句打开文件时，如果为输入(Input)打开的文件不存在，则产生“文件未找到”错误；如果为输出(Output)、附加(Append)或随机(Random)访问方式打开的文件不存在，则建立相应的文件；选项C如果没有指明记录号，则将上一个Get或Put语句之后的(或上一个Seek函数指出的)下一个记录或字节写入。选项D由于rec是animal类型变量，对其操作都是对变量animalName和变量aColor的操作。
转载请注明原文地址:https://www.kaotiyun.com/show/hEQp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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