• 2022-06-06
    在窗体中添加一个命令按钮(名为Command1),然后编写如下代码: Public x as integer Private Sub Command1_Click( ) x=5 Call s1 Call s2 MsgBox x End Sub Private Sub s1( ) x=x+10 End Sub Private Sub s2( ) Dim x as integer x=x+10 End Sub 窗体打开运行后,单击命令按钮,则消息框的输出结果是______
  • O

    举一反三

    内容

    • 0

      在窗体中添加一个名称为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 窗体打开运行后,单击命令按钮,则消息框的输出结果为______。

    • 1

      设窗体上有一个Command1命令按钮,还有以下程序代码: Private Sub Command1_Click() Static x As Integer x=x+1 Call proc(x) Print x, End Sub Private Sub proc(a As Integer) Static x As Integer x=x+a:a=x End Sub 程序运行后,3次单击命令按钮,则产生的输出是 A: 1 2 3 B: 1 3 5 C: 1 3 7 D: 2 4 6

    • 2

      在窗体上添加一个名称为Command1的命令按钮,编写如下代码: Private Sub f(ByVal x As Integer) x=x+4 End Sub Pvivate Sub Command1_Click() i=3 Call f(i) If i>4 Then i=i*2 MsgBox i End Sub 运行窗体后,单击命令按钮,则消息框的输出结果为______。

    • 3

      在窗体中添加一个名称为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 窗体打开运行后,单击命令按钮,则消息框的输出结果为______。 A: 3 B: 4 C: 6 D: 7

    • 4

      中国大学MOOC: 单击按钮Command1,下列代码执行的结果是弹出一个对话框,并且( )。 Private Sub Command1_Click() Call pro(3) End Sub Private Sub pro(x As Integer) MsgBox x * x End Sub