填空题

在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：
Private Sub f(ByVal x As Integer)
x=x+4
End Sub
Private Sub Command1_Click()
i=3
Call f(i)
If i＞4 Then i=i*2
MsgBox i
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果为______。

【参考答案】

C
<上一题 目录 下一题>
热门 试题

填空题
在窗体上添加一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a(10,10)As Integer Dim i,j As Integer For i=2 To 4 For j=3 To 6 a(i,j)=i*j Next j Next i Text1.Text=a(2,3)+a(4,6) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是______。
填空题
有如下程序： Option Base 1 Private Sub Form_Click() Dim arr,Sum Sum=0 art=Array(1,3,5,7,9,11,13,15,17,19) For i=1 To 10 If arr(i) 3=arr(i) 3 Then Sum=Sum+arr(i) End If Next i MsgBox Sum End Sub 程序运行后，单击窗体，消息框的输出结果为______。
相关试题