更多"有如下事件过程，单击命令按钮扣，输出结果是 Private Sub"的相关试题:
[单项选择]命令按钮Command1的单击事件过程如下：
Private Sub Command1_Click( )
Dim a( 10, 10)As Integer
x=0
For i = 1 To 3
For j = 1 To 3
a(i, j) =i * 2 Mod j
If x＜a(i, j)Then x=a(i, j)
Next
Next
Print x
End Sub
执行上述事件过程后，窗体上显示的是( )。
A. 1
B. 2
C. 3
D. 4
[单项选择]命令按钮Command1的事件过程如下：
Private Sub Command1_Click（ ）
Dim art(5, 5) As Integer
Dim i As Integer, j As Integer
For i = 1 To 4
For j = 2 To 4
arr(i, j) =i+j
Next j
Next i
Print arr(1, 3) + arr(3, 4)
End Sub
执行上述过程，输出结果是( )。
A. 6
B. 7
C. 11
D. 12
[单项选择]在窗体上画1个命令按钮，并编写如下事件过程： Private Sub Command1_Click（ ） Dima(3,3) For m=1 To 3 For n=1 To 3 If n=m Or n=4-m Then a(m,n)=m+n Else a(m,n)=0 End If Print a(m,n)； Next n Print Next m End Sub 运行程序，单击命令按钮，窗体上显示的内容为（）
A. 2 0 0 0 4 0 0 0 6
B. 2 0 4 0 4 0 4 0 6
C. 2 3 0 3 4 0 0 0 6
D. 2 0 0 0 4 5 0 5 6
[单项选择]在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click( )
Dim m As Integer，n As Integer，p As Integer
m=3：n=5：p=O
Call Y(m，n，p)
Print Str(p)
End Sub
Sub Y(ByVal i As Integer，ByVal j As Integer，k As Integer)
k=i + j
End Sub
程序运行后，如果单击命令按钮，则在窗体上显示的内容是
A. 4
B. 6
C. 8
D. 10
[填空题]
窗体上命令按钮Commandl的事件过程如下：
Private Sub Command1_Click（ ）
Dim total As Integer
total=s(1)+s(2)
Print total
End Sub
Private Function s(m As Integer)As Integer
Static x As Integer
For i=1 To m
x=x+1
Next i
s=x
End Function
运行程序，第3次单击命令按钮Command1时，输出结果为（）。
[填空题]在窗体上添加一个命令按钮，编写如下事件过程：
Private Sub Command1_Click（ ）
sum=0
For i=3 To 7
sum=i+2
Next i
MsgBox sum+i
End Sub
运行窗体后，单击命令按钮，消息框的输出结果是______。
[填空题]设有命令按钮Command1的单击事件过程，代码如下：
Private Sub Command1_Click（ ）
Dima(3,3)As Integer
For i＝1 To 3
For j＝1 To 3
a(i,j)＝i*j+i+j
Next j
Next i
Sum＝0
For i＝1 To 3
Sum＝Sum+a(i,4-i)
Next i
MsgBox Sum
End Sub
运行程序，单击命令按钮，消息框输出结果是______。
[填空题]窗体上命令按钮Command1的事件过程如下：
Private Sub Command1_Click（ ）
Dim total As Integer
total=s(1)+s(2)
Print total
End Sub
Private Function s(m As Integer)As Integer
Static x As Integer
For i=1 To m
x=x+1
Next i
S=x
End Function
运行程序，第3次单击命令按钮Command1时，输出结果为______。
[填空题]窗体中有一个命令按钮，然后编写下列事件过程：
Private Sub Command1_Click（ ）
x=0
Do Untilx=-1
a=InputBox("请输入第一个数字a的值")
a=Val(a)
b=InputBox("请输入第二个数字b的值")
b=Val(b)
x=InputBox("请输入第三个数字x的值")
x=Val(x)
a=a+b+x
Loop
Print a
End Sub
在程序运行后，单击命令按钮，在对话框中分别输入5,4,8,5,8,-1，输出的结果是______。
[填空题]在窗体中有一个名为(Command1的命令按钮，Click事件的代码如下：
Private Sub(20mnlan d1_Click（ ）
f=0
For n=1 to 10 Step 2
f=f+n
Next n
Me!lb1.Caption=f
End Sub
单击命令按钮后，标签显示的结果是______。
[填空题]
在窗体中有一个名为Command1的命令按钮，Click事件的代码如下：
Private Sub Command1_Click（ ）
f=0
For n = 1 To 10 Step 2
f = f+n
Next n
Me!Lb1.Caption = f
End Sub
单击命令按钮后，标签显示的结果是（）。
[单项选择]
在窗体上画1个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1 Click（ ）
a=0
For i=1 To 2
For j=1 To 4
If j Mod 2＜＞0 Then
a=a-1
End If
a=a＋1
Next j
Next i
Print a
EndSub
程序运行后，单击命令按钮，输出结果是（）。
A. 0
B. 2
C. 3
D. 4
[单项选择]在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) c="ABCD" For n = 1 To 4 Print ______ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： D CD BCD ABCD 则在 ______ 处应填入的内容为
A. Left(c,
B. Right(c,
C. Mid(c,n,1)
D. Mid(c,n,
