设在工程中定义了下列类型：
Type Stutype
ino As Integer
strname As String*20
strsex As String*1
smark As Single
End Type
在窗体上正确使用这个类型的是下列哪个操作( )。
A．Sub Command1_Click()
Dim student As Stutype
With student
.ino=12
.Strname=smith
.strsex=男
.smark=89
End With
End Sub
B．Sub Command1_Click()
Dim Student As Stutype
With student
.ino=12
.strname="smith"
.strsex="男"
.smark=89
End With
End Sub
C．Sub Comnland1_Click()
Dim student As Stutype
With Stutype
.ino=12
.strname="smith"
.strsex="男"
.smark=89
End With
End Sub
D．Sub Command1_Click()
Dim student As Stutype
With student
.ino=12
.Strname="smith"
.strsex="男"
.smark=89
End student
End Sub
参考答案：B
解析： 本题考查为记录类型变量student赋值。使用With语句可以对某个对象执行一系列的语句，而不用重复指出对象的名称。其语法如下：
With记录类型变量
.记录类型变量成员名=要赋的值
…
End With
给记录类型变量中的字符串型成员赋值时要加双引号。