2. 计算机
  3. 在窗体上有一个名称为Command1的命令按钮，并编写有如下事件过程： Private Sub Command1_Click() Dim rec As animal Open"c：＼vbTest．dat"For Random As #1 Len=Len(r

在窗体上有一个名称为Command1的命令按钮，并编写有如下事件过程： Private Sub Command1_Click() Dim rec As animal Open"c：＼vbTest．dat"For Random As #1 Len=Len(r

admin2016-09-18  57
问题 在窗体上有一个名称为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
Close #1
End Sub
记录类型定义如下：
Private Type animal
animalName As String*20
aColor As String*10
End Type
下列叙述中正确的是(    )。
选项 A、记录类型animal不能在Form1中定义，必须在标准模块中定义
B、如果文件c：＼vbTest．dat不存在，则Open命令执行失败
C、由于Put命令中没有指明记录号，因此每次都把记录写到文件的末尾
D、语句“Put #1，，rec”将animal类型的两个数据元素写到文件中
答案B
解析 本题考查随机文件的基本操作。随机文件以记录作为存储单位，以Random打开文件的格式为：Open文件名For Random As#文件号[Len=记录长度]。如果文件不存在，则打开失败。写操作格式为：Put[#]文件号，[记录号]，变量名。可以将一个记录变量的内容写到指定的记录位置处，忽略记录号，则表示在当前记录后的位置插入一条记录。读操作格式为：Get[#]文件号，[记录号]，变量名。如果忽略记录号，则读出当前记录后面的那一条记录。一般记录类型在VB中是以Type定义的自定义类型，可以在窗体和标准模块中定义。
转载请注明原文地址:https://www.kaotiyun.com/show/XpLp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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