更多"在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub"的相关试题:
[填空题]在窗体上画一个命令按钮，然后编写如下代码：
Private Sub Commandl_Click（ ）
Dim M(10) As Integer
For k=1 To 10
M(k)=12-k
Next k
x=6
Msgbox M(2+M(x))
End Sub
程序运行后，单击命令按钮，消息框显示的是 。
[单项选择]在窗体上画一个命令按钮，然后编写如下程序：
Private Sub Commandl_Click( )
Dim a AS Integer，b As Integer
a=15
b=2
t N(a，b)
End Sub
Function N(x As Integer，y As Integer) As Integer
N=IIf(x)y，x，y)
End Function
程序运行后，单击命令按钮，输出结果为
A. 1
B. 2
C. 15
D. 8
[填空题]在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Commandl Click（ ）
Do Until b＜0
a=InputBox("输入a的值")
a=Val(a)
b=InputBox("输入b的值")
b=Val(b)
a=a +b
Loop
Print a
End Sub
程序运行后，依次输入5，4，3，2，1，0，-1，-2，则输出结果是 【14】 。
[单项选择]在窗体上画两个命令按钮，然后编写以下代码： Private Sub Commandl_ Click（ ） Dim i As Long Dim i As Integer Dim x For i=1 To 10000000 x=DoEvents For j=1 To 1000000 Next j Cls Print i Next i End Sub Private Sub Command2_Click（ ） Dim x As Integer Dim i As Integer x=0 For i=1 To 10 x=x+i Next i MsgBox x End Sub 当程序执行后，单击命令按钮Command1，在窗体上将显示以一定的时间间隔(从1、2、…一直到 10000000这10000000个数字)，如果再单击命令按钮Command2，将会出现的情况是______。
A. 没有任何变化，数字仍按原有的规律显示
B. 将会中断在窗体上数字从小到大的显示，弹出一个对话框，待用户单击“确定”按钮关闭对话框后，数字再按原来的规律继续在窗体上显示
C. 将会弹出一个对话框，待用户单击“确定”按钮关闭对话框后，窗体上的数字将保持中断时候的值，也就是说不再按规律变化显示
D. 窗体上的数字仍按原有的规律在窗体上显示，然后同时会弹出一个对话框，待用户单击“确定”按钮后对话框关闭
[填空题]在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Commandl_Click（ ）
Dim a (1 To 10)
Dim p(1 To 3)
k=5
For i=1 To 10
a(i)=i
Nexti
Fori=1 To 3
p(i)=a(i*i)
Next i
For i=1 To 3
k=k+p(i)*2
Next i
Print k
End Sub
程序运行后，单击命令按钮，输出结果是 【13】 。
[填空题]在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Commandl_Click（ ）
Dim a (1 To 10)
Dim p(1 To 3)
k=5
For i=1 To 10
a(i)=i
Nexti
Fori=1 To 3
p(i)=a(i*i)
Next i
For i=1 To 3
k=k+p(i)*2
Next i
Print k
End Sub
程序运行后，单击命令按钮，输出结果是 【13】 。
