执行x = InputBox("请输入半径",0,"求面积") ,在输入框中输入3后回车,则下列叙述正确的是( )。
A、 x的值是数值3
B、 x的值是字符"3"
C、 0是默认值
D、 对话框标题是"求面积"
第1题:
如果执行一个语句后弹出如图所示的窗口,则这个语句是( )。
A.InputBox("输人框","请输入VB数据")
B.x=InputBox("输入框","请输入VB数据")
C.InputBox("请输入VB数据","输入框")
D.x=InputBox("清输入VB数据","输入框")
第2题:
如果执行一个语句后弹出如图所示的窗口,则这个语句是( )。
A.InputBox("输人框","请输入VB数据")
B.x=InputBox("输入框","请输入VB数据")
C.InputBox("请输入VB数据","输入框")
D.x=InputBox("清输入VB数据","输入框")
第3题:
运行下列事件过程,在输入框中输入“9”,按“确定”按钮,则窗体上显示的结果为()。 Private Sub Command1_Click() Dim x As Integer x = Val(InputBox("请输入一个整数!")) If x > 4 Then Print 2 * x - 1; If x > 5 Then Print 3 * x - 1; End Sub
A.17 26
B.26
C.17
D.26 17
第4题:
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() x=0 Do Until x=-1 a=InputBox("请输入A的值") a=Val(A)b=InputBox("请输入B的值") b=Val(B)x=InputBox("请输入x的值") x=Val(x) a=a+b+x Loop Print a End Sub 程序运行后,单击命令按钮,依次在输入对话框中输入5、4、3、2、1、-1,则输出结果为 ______。
A.2
B.3
C.14
D.15
第5题:
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() x=0 Do Until x=-1 a=InputBox(“请输入A的值”) a=Val(A)b=InputBox(“请输入B的值”) b=Val(B)x=InputBox(“请输入x的值”) x=Val(x) a=a+b+x Loop Print a End Sub 程序运行后,单击命令按钮,依次在输入对话框中输入5、4、3、2、1、-1,则输出结果为 ______。
A.2
B.3
C.14
D.15