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

admin2006-08-15  41

问题 假定在窗体(名称为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(reCreC.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类型的两个数据元素写到文件中

答案D

解析
转载请注明原文地址:https://kaotiyun.com/show/nr2p777K
0

最新回复(0)