在窗体中添加一个命令按钮,编写如下程序代码:
在InputBox对话框中输入Hello,运行结果为:______。
第1题:
在窗体上画一个命令按钮,名称为Commandl,然后编写如下程序:
Privme Sub Commandl_Click()
Dim intNum As Integer
intNum=InputBox(“请输入:”)
MsgBox f(intNum)
End Sub
Function f(X As Integer) As Integer
f=IIf (X<10,X,X+5)
End Function
运行程序,单击命令按钮,在输入对话框中输入5,则程序的输出结果为______。
第2题:
在窗体中添加一个命令按钮,然后编写如下代码:
Private Sub Command1_Click()
a=InputBox("请输入一个整数")
b=InputBox("请输入一个整数")
Print Val(a)+Val(b)
End Sub
程序运行后,单击命令按钮,在输入对话框中分别输入21和45,输出结果为【 】。
第3题:
在窗体中添加一个命令按钮Command1,并编写如下程序: Private Sub Command1_Click() x = InputBox(x) If x ^ 2 = 9 Then y = x If x ^ 2 < 9 Then y = 1 / x If x ^ 2 > 9 Then y = x ^ 2 + 1 Print y End Sub 程序运行时,单击命令按钮,在InputBox中输入3,然后单击“确定”按钮,程序的运行结果为()。
A.3
B.0.33
C.17
D.0.25
第4题:
在窗体中添加一个命令按钮,并编写如下程序代码:
程序运行后,消息对话框中显示______。
A.0
B.21
C.20
D.19
第5题:
在窗体上画一个命令按钮,然后编写如下事件过程: x = 0 Do Until x = -1 a = val(InputBox("A的值")):b = val(InputBox("B的值")) x = val(InputBox("x的值")) a = a + b + x Loop Print a 程序运行后,单击命令按钮,依次在输入对话框中输入5、4、3、2、1、-1,则输出结果为_____。
A.14
B.3
C.2
D.12