![](https://cos-cdn.shuashuati.com/pipixue-wap/2020-1230-1107-56/ti_inject-812ce.png)
假定在窗体(名称为 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:\vbtest.dat不存在,则open命令执行失败 C. 由于Put命令中没有指明记录号,因此每次都把记录写到文件的末尾 D. 语句“put #1, , rec”将animal类型的两个数据元素写到文件中