计算机二级
在窗体中有一个标签Lb1和一个命令按钮Command1，事件代码如下：Option Compare DatabaseDim a As String*10Private Sub Command1 Click()a＝"1234"b＝Len(A)Me.Lb1.Caption＝bEnd Sub打开窗体后单击命令按钮，窗体中显示的内容是( )。A．4B．5C．10D．40
题目
在窗体中有一个标签Lb1和一个命令按钮Command1，事件代码如下：
Option Compare Database
Dim a As String*10
Private Sub Command1 Click()
a＝"1234"
b＝Len(A)
Me.Lb1.Caption＝b
End Sub
打开窗体后单击命令按钮，窗体中显示的内容是( )。
A．4
B．5
C．10
D．40
相似问题和答案
第1题：
在窗体中有一个标签Lb1和一个命令按钮Command1，事件代码如下： Option Compare Database Dim a AS String*10 Private Sub Command1_Click() a=“1234” b=Len(a) Me.Lb1．Caption=b End Sub 打开窗体后单击命令按钮，窗体中显示的内容是( )。
A．4
B．5
C．10
D．40
解析：本题考查VBA中定长字符串的知识。当声明一个变量为String类型时，如果不加长度说明，则为变长字符串；如果加上长度说明，则为定长字符串。定长字符串变量无论给它赋予何值，长度都为初始声明时指定的长度。由于声明a的长度为l0，故 Len(a)=10。
第2题：
在窗体中有一个标签Lb1和一个命令按钮Command1，事件代码如下： OPtion Compare Databse Dim a As String * 10 Private Sub COmmand1_Click() a="1234" b=Len(a) Me.Lbl.Caption=b End Sub 打开窗体后单击命令按钮，窗体中显示的内容是
A．4
B．5
C．10
D．40
第3题：
在窗体中有一个标签kabel()，标题为“测试进行中”；有一个命令按钮Command1，事件代码如下：
Private Sub Conunandl_Click()
Label(). Caption=“标签”
End Sub
Private Sub Foml_Load()
Form.Caption：“举例”
Commandl.Caption=“移动”
End Sub
打开窗体后单击命令按钮，屏幕显示
A．
B．
C．
D．
第4题：
在窗体上有一个标签Lb1和一个命令按钮Command1，事件代码如下： Option Compare Database Dim a As String * 10 Private Sub Command1_Click( ) a="1234" b=Len(a) Me. Lb1. Caption=b End Sub 打开窗体后单击命令按钮，窗体中显示的内容是( )。
A．4
B．5
C．10
D．40
解析：首先定义a为字符串类型，长度为10，当单击命令按钮后将a的长度值赋予b，并且将b的值10通过标签显示出来。
第5题：
在窗体中有一个标签Lb1和一个命令按钮Command1，事件代码如下：
Option Compare Database
Dim a As String * 10
Private Sub Command1_Click
a = "1234"
b = Len(a)
Me.Lb1.Caption = b
End Sub
打开窗体后单击命令按钮，窗体中显示的内容是
A．4
B．5
C．10
D．40
第6题：
在窗体中有一个标签Lbl和一个命令按钮Commandl，事件代码如下：
打开窗体后单击命令按钮，窗体中显示的内容是（ ）。
A. 4
B. 5
C. 10
D. 40
本题考查VBA中定长字符串的知识。
当声明一个变量为String类型时，如果不加长度说明，则为变长字符串；如果加上长度说明，则为定长字符串。定长字符串变量无论给它赋予何值，长度都为初始声明时指定的长度。由于声明a的长度为10，故1cn(a)=10。
符串；如果加上长度说明，则为定长字符串。定长字符串变量无论给它赋予何值，长度都为初始声明时指定的长度。由于声明a的长度为10，故1cn(a)=10。
第7题：
在窗体中有一个标签Labele，标题为“测试进行中”，有一个命令按钮Command1，事件代码如下：
Private Sub Command1_Click()
Labele.Caption=“标签”
End Sub
Private Sub Form_Load( )
Form.Caption=“举例”
Command1.Caption=“移动”
End Sub
打开窗体后单击命令按钮，屏幕显示( )。
A．
B．
C．
D．
解析：本题考查控件基本属性和事件的知识。在本题中，窗体开始运行时会首先执行Load事件，将窗体的标题设置为“举例”，命令按钮的标题设置为“移动”；单击命令按钮时会将标签的标题设置为“标签”。最后结果如选项D)所示。
第8题：
在窗体中有一个名为(Command1的命令按钮，Click事件的代码如下：
单击命令按钮后，标签显示的结果是( )。
25
第9题：
在窗体中有一个标签 Lb1 和一个命令按钮 Command1 ，事件代码如下：
Option Compare Database
Dim a As String*10
Private Sub Command1_Click()
a="1234"
b=Len(a)
Me.Lb1.Caption=b
End Sub
打开窗体后单击命令按钮，窗体中显示的内容是
A. 4
B. 5
C. 10
D. 40
