题目内容:
假定在窗体(名称为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
Close #1
End Sub
则以下叙述中正确的是( )。 A.记录类型animal不能在Form1中定义,必须在标准模块中定义
B.如果文件c:\vbTesdat不存在,则Open命令执行失败
C.由于Put命令中没有指明记录号,因此每次都把记录写到文件的末尾
D.语句“Put #1, , rec”将animal类型的两个数据元素写到文件中
参考答案:
答案解析: