假定在窗体（名称为Form1） 的代码窗口中定义如下记录类型：Private Type animalanimalName As String *20aColor As String *10End Type在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click（）Dim rec As animalOpen "c:\vbTest.dat"For Random As #1 Len=Len（reC．rec.animalName= "Cat"rec.aColor= "White"Put #1,,recClose #1End Sub则以下叙述中正确的是（ ）。A．记录类型animal不能在Form1中定义，必须在标准模块中定义B．如果文件c:\vbTest.dat不存在，则Open命令执行失败C．由于Put命令中没有指明记录号，因此每次都把记录写在文件的末尾D．语句"Put #1,,rec"将animal类型的两个数据元素写到文件中
假定在窗体（名称为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类型的两个数据元素写到文件中
相关考题：
一个工程中包含两个名称分别为Form1、Form2的窗体，一个名称为mdlFunc的标准模块。假定在Form1、Form2和mdlFunc中分别建立了自定义过程，其定义格式为： Form1中定义的过程： Private Sub frmFunctionl() End Sub Form2中定义的过程： Public Sub fimFunction2() End Sub mdlFunc中定义的过程： Public SubA．上述三个过程都可以在工程中的任何窗体或模块中被调用B．frmFunction2和mdlFunction过程能够在工程中各个窗体或模块中被调用C．上述三个过程都只能在各自被定义的模块中调用D．只有mdlFunction过程能够被工程中各个窗体或模块调用
假字在窗体(名称为Forml)的代码窗口中定义如下记录类型: Private Type animal Anima1Name 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" Pat#1 , rec Close#1 End Sub 则以下叙述中正确的是A．记录类型animal不能在Form1中定义,必须在标准模块中定义B．如果文件c：\vbTest.dat不存在，则Open命令执行失败C．由于Put命令中没有指明记录号，因此每次都把记录写到文件的末尾D．语句"Put#1，rec"将animal类型的两个数据元素写到文件中
假定窗体的名称为Form1，对该窗体编写如下代码： Private Sub Form_Load() Form1．Caption="计算机" Me．Caption="等级" Caption="考试" End Sub 程序运行后，窗体的标题是A．计算机B．等级C．考试D．Form1
在窗体上有一个名称为Command1的命令按钮，并编写有如下事件过程：记录类型定义如下：下列叙述中正确的是（ ）。A. 记录类型animal不能在Form1中定义，必须在标准模块中定义B. 如果文件c：\vbTest．dat不存在，则Open命令执行失败C. 由于Put命令中没有指明记录号，因此每次都把记录写到文件的末尾D. 语句“Put#1,,rec”将animal类型的两个数据元素写到文件中
假定在窗体(名称为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 End Sub 则以下叙述中正确的是______。A．记录类型animal不能在Form1中定义，必须在标准模块中定义B．如果文件"c:\vbTest. dat"不存在，则Open命令执行失败C．由于Put命令中没有指明记录号，因此每次都把记录写到文件的末尾D．语句“Put #1, , rec”将animal类型的两个数据元素写到文件中
假定在窗体（名称为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类型的两个数据元素写到文件中
假定在窗体(名称为Form1)的代码窗口中定义如下记录类型：Private Type animalanimal Name As String * 20aColor As String * 10End Type在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1 Click()Dim rec As animalOpen "c：\vb Test.dat"For Random As # 1 Len=Len(reC) rec.animalName="cat"rec.aColor="White"Put # 1，，recClose # 1End Sub则以下叙述中正确的是 ______。A．记录类型animal不能在Form1中定义，必须在标准模块中定义B．如果文件c:\vbTest.dat不存在，则Open命令执行失败C．由于Put命令中没有指明记录号，因此每次都把记录写到文件的末尾D．语句"Put # 1，，rec"将animal类型的两个数据元素写到文件中
假定在窗体（名称为Form1）的代码窗口中定义如下记录类型：Private Type animalAnimalName As String*20AColor As String*10End Type在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程:Private Sub Command1_Click（）Dim rec As animalOpen "c:\vbTest.dat" For Random As #1 Len = Len（rec） rec.animalName = "Cat" rec.aColor = "White" Put #1, , recClose #1End Sub则以下叙述中正确的是（ ）。A．记录类型animal不能在Form1中定义，必须在标准模块中定义B．如果文件c:\vbTest.dat不存在，则Open命令执行失败C．由于Put命令中没有指明记录号，因此每次都把记录写到文件的末尾D．语句“Put #1, , rec”将animal类型的两个数据元素写到文件中