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

admin2012-03-22  45

问题 假定在窗体(名称为Form1)的代码窗口中定义如下记录类型:    Private Type animal      animalName As String*20      a Color As String*10    End Type    在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:    Private Sub Command1_Crick()    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:\vbTest.dat不存在,则Open命令执行失败   
C、由于Put命令中没有指明记录号,因此每次都把记录写到文件的末尾   
D、语句“Put#l,,rec”将animal类型的两个数据元素写到文件中

答案D

解析
转载请注明原文地址:https://jikaoti.com/ti/iNO0FFFM
0

最新回复(0)