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

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

admin2009-01-15  64
问题 假定在窗体(名称为Form1)的代码窗口中定义如下记录类型：
   Private Type animal
     animal Name As String * 20
     aColor As String * 10
   End Type
   在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
   Private Sub Command1 Click()
   Dim rec As animal
      Open "c：\vb Test.dat"For Random As # 1 Len=Len(reC)        rec.animalName="cat"
        rec.aColor="White"
        Put # 1，，rec
      Close # 1
   End Sub
   则以下叙述中正确的是 ______。
选项 A、记录类型animal不能在Form1中定义，必须在标准模块中定义
B、如果文件c:\vbTest.dat不存在，则Open命令执行失败
C、由于Put命令中没有指明记录号，因此每次都把记录写到文件的末尾
D、语句"Put # 1，，rec"将animal类型的两个数据元素写到文件中
答案8
解析 记录类型可以在标准模块中定义，也可以在窗体模块中定义。如果文件c:\vbTest.dat不存在，Open命令是可以执行的；随机访问模式中文件的写操作使用Put命令，其形式如下：Put[#]文件号，[记录号]，变量名。其中：记录号是大于1的整数，表示写入的是第几条记录；如果忽略记录号，则表示在当前记录后插入一条记录。
转载请注明原文地址:https://www.kaotiyun.com/show/vg2p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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