题目内容
（请给出正确答案）
A.变量名->元素名
B.变量名.元素名
C.元素名->变量名
D.元素名.变量名
参考答案
简答题官方参考答案
（由简答题聘请的专业题库老师提供的解答）
网友提供的答案
更多“用Type 语句定义的类型称为记录类型，要访问一个某记录型变量中 的某个元素，需采用下述格式（)”相关的问题
假定在窗体(名称为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类型的两个数据元素写到文件中
要建立一个随机文件记录学生的信息，下列定义了学生的记录类型，由学号、姓名、五门课程成绩(百分制)组成，下列的定义正确的是()。
A．Type stu no As Integer name As String score(1 To 5)As Single End Type
B．Type stu no As Integer name As String*10 score()As Single End Type
C．Type stu no As Integer name As String*10 score(1 To 5)As Single End Type
D．Type stu no As Integer name As String score()As Single End Type
要建立一个随机文件记录学生的信息，如下定义了学生的记录类型，由学号、姓名、5门课程成绩(百分制)组成，下列的定义正确的是()。
A．Type sru no As Integer name As String score(1 To 5)As Single End Type
B．Type stu no As Integer name As String*10 score()As Single End Type
C．Type stu no As Integer name As String*10 score(1 To 5)As Single End Type
D．Type stu no As Integer name As String score()As Single End Type
假定在窗体(名称为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类型的两个数据元素写到文件中
A.type="hide"
B.type="text"
C.type="password"
D.type="hidden"
E.type="file"
要建立一个随机文件记录学生的信息，如下定义了学生的记录类型，由学号、姓名、5门课程成绩(百分制)组成，下列的定义正确的是()。
A．Type stu no As Integer name As String score(1 To 5)AS Single End Type
B．Type stu no As Integer name As String*10 score()As Single End Type
C．Type stu no As Integer name As String*10 score(1 To 5)As single End Type
D．Type stu no As Integer name As String score()As Single End Type
假定在窗体（名称为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类型的两个数据元素写到文件中
有如下用户定义类型及操作语句：
Type Teacher
TNo As String
TName AS Strxng
IAge As Integer
End Type
Dim Tea AS Teacher
With Tea
．TNO="20080001"
．TName="张三"
．IAge=32
End With
执行MsgBox Tea.TNaiqle后，消息框的输出结果是______。
警告：系统检测到您的账号存在安全风险
为了保护您的账号安全，请在“简答题”公众号进行验证，点击“官网服务”-“账号验证”后输入验证码“”完成验证，验证成功后方可继续查看答案！
