更多"设有命令按钮Command 1的单击事件过程，代码如下： Priv"的相关试题:
[填空题]设有命令按钮Command 1的单击事件过程，代码如下：
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 a(3,3)As Integer
For i=1 To 3
For j=1 To 3
a(i,j)=i*j+i
Next j
Next i
Sum=0
For i=1 To 3
Sum=Sum+a(i,4-i)
Next i
Print Sum
End Sub
运行程序，单击命令按钮，输出结果是（）。
A. 20
B. 7
C. 16
D. 17
[单项选择]设有命令按钮Command1的单击事件过程，代码如下：
Private Sub Command1_Click（ ）
Dim a[3,3) As Integer
For i=1 To 3
For j=1 To 3
a(i,j):i*j+i
Next j
Next i
Sum=0
For i=1 To 3
Sum=Sum+a(i,4-i)
Next i
Print Sum
End Sub
运行程序，单击命令按钮，输出结果是( )。
A. 20
B. 7
C. 16
D. 17
[填空题]设有命令按钮Command1的单击事件过程，代码如下，请填空。
Private Sub Command1_Click（ ）
Dim a(30) As Integer
For i=1 To 30
a(i) =i
Next
For Each arrItem______a
If arrItem Mod 7=0 Then Print arrItem；
If arrItem＞90 Then Exit For
Next
End Sub
[单项选择]窗体上有一个命令按钮，命令按钮的单击事件过程如下。
Private Sub Command1_Click（ ）
Dim a
a:Array(1,2,3,4,5)
For k=1 To 4
s=s+a(k)
Next
Print s
End Sub
运行程序后，单击命令按钮，输出结果是( )。
A. 10
B. 14
C. 15
D. 120
[单项选择]
窗体上有一个名称为Command1的命令按钮，其单击事件过程如下：
Private Sub Command1_Click( )
Dim a,b(2,3) As Integer
a=Array(3,7,5,11,31,43,17,62,9,23,37,41)
i=0
Do While i<=UBound(a)
For j=0 To 2
For k=0 To 3
B(j,k)=a(i)
i=i+1
Next
Next
Loop
Pritn b(2,2)
End Sub
运行程序，窗体上显示的是（）。
A. 43
B. 17
C. 37
D. 23
[单项选择]命令按钮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
[单项选择]单击命令按钮，下列事件过程的执行结果为( )。
Private Sub Command1_Click( )
Dim x As Integer, y As Integer
x=40：y=72
Call PtoP(x, y)
Print x; y
End Sub
Public Sub PtoP(Byval n AS Integer, ByVal m Aa Integer)
n = n / 10+2
m = m / 10+2
End Sub
A. [Page]/，总[Pages]
B. =[Page]/，总[Pages]
C. [Page]＆“//，总”＆ [Pages]
D. =[Page]＆“/，总”＆[Pages]
