在窗体上有一个命令按钮和一个文本框。编写如下事件过程:Private Sub Command1_Click()a=InputBox("请输入一个整数")Text1.Text=aIf a > 0 ThenIf a Mod 3 = 0 ThenMsgBox "True"ElseMsgBox "error"End IfEnd IfEnd Sub程序运行后,单击命令按钮,在输入对话框里输入12,则弹出的提示内容是______。

题目

在窗体上有一个命令按钮和一个文本框。编写如下事件过程:

Private Sub Command1_Click()

a=InputBox("请输入一个整数")

Text1.Text=a

If a > 0 Then

If a Mod 3 = 0 Then

MsgBox "True"

Else

MsgBox "error"

End If

End If

End Sub

程序运行后,单击命令按钮,在输入对话框里输入12,则弹出的提示内容是______。


相似考题
更多“在窗体上有一个命令按钮和一个文本框。编写如下事件过程:PrivateSubCommand1_Click()a=InputBox(" ”相关问题
  • 第1题:

    在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a=InputBox("请输入一个整数") b=InputBox("请输入一个整数") Print a+b End Sub 程序运行后,单击命令按钮,在输入对话框中分别输入37和18,输出结果为

    A.3718

    B.55

    C.0

    D.a+b


    正确答案:A
    解析:InputBox函数能产生一个对话框,并显示提示,等待用户输入内容或按下按钮,并返回包含文本框内容的字符串。在此题中,变量a和b都是变体型变量,InputBox函数返回的分别是“37”和“18”。“+”运算符除了计算数值的和以外,在对字符串操作时,也可以用来做字符串的连接操作。输出的结果为“3718”。

  • 第2题:

    在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为textl),编写如下事件过程:

    打开窗体运行后,单击命令按钮,文本框中显示的内容是__________。


    正确答案:
    15【解析】本题考查函数调用中参数传递的知识。在VBA的函数调用时,参数有两种传递方式:传址传递和传值传递。如果在函数声明时没有说明传递类型,则默认为传址传递,即形参的结果会传递给实参。本题中形参均为传址传递,即a=x=3,b=y=5,c=z=10。但是在子程序里面对c重新赋值为c=a*b=15,这个值l5会回送给实参2,所以最后显示的值Z也就是l5。

  • 第3题:

    在窗体上添加一个命令按钮Command1和一个文本框Text1,把文本框的Text属性设置为空白,然后编写如下事件过程: Private Sub Command1_Click() a = InputBox("Enter an Integer") b = InputBox("Enter an Integer") Text1.Text = b + a End Sub 程序运行后,单击命令按钮,如果在输入对话框中分别输入8和10,则文本框中显示的内容是()。

    A.108

    B.18

    C.810

    D.出错


    C

  • 第4题:

    在窗体上画一个命令按钮,然后编写如下事件过程。该程序运行后,单击命令按钮,在输入对话框中分别输入321和456,则输出结果为【 】。

    Private Sub Command1_Click()

    a=InputBox("请输入一个整数")

    b=InputBox("请再输入一个整数")

    Print a+b

    End Sub


    正确答案:321456
    321456 解析:由于Visual Basic中的InputBox函数的返回值是字符串,那么a和b分别为字符串321和456,所以a+b就只能将两个字符串连接为321456,而不是可能想要得到的321和456的和777。

  • 第5题:

    在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为Textl),然后编写如下事件过程:


    正确答案:
    15【解析】本题考查VBA程序中过程调用的知识。由于VBA中,默认情况下,参数是按地址传递(ByRef),对形参的改变会影响到实参。本题中2的值等于a b,这个z值会返回给实参c,所以文本框中显示的内容为15。