时间:2012-07-08 20:27:27
a(m,n)=m*n
Next n
Next m
MsgBox a(2,5)+a(3,4)+a(4,5)
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果是______。
A)22 B)32 C)42 D)52
(32)在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1),并在命令按钮中编写如下事件代码:
Private Sub Command1_Click()
m=2.17
n=Len(Str$(m)+Space(5))
Me!Text1=n
End Sub
打开窗体运行后,单击命令按钮,在文本框中显示______。
A)5 B)8 C)9 D)10
(33)在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码:
Private Sub Command1_Click()
A=75
If A>60 Then I=1
If A>70 Then I=2
If A>80 Then I=3
If A>90 Then I=4
MsgBox I
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果是______。
A)1 B)2 C)3 D)4
(34)在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码:
Private Sub Command1_Click()
s="ABBACDDCBA"
For I=6 To 2 Step –2
x=Mid(s,I,I)
y=Left(s,I)
z=Right(s,I)
z=x & y & z
Next I
MsgBox z
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果是______。
A)AABAAB B)ABBABA C)BABBA D)BBABBA
(35)在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:
Public x As Integer
Private Sub Command1_Click()
x=10
Call s1
Call s2
MsgBox x
End Sub
Private Sub s1()
x=x+20
End Sub
Private Sub s2()
Dim x As Integer
x=x+20
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为______。
A)10 B)30 C)40 D)50