在窗体上画一个命令按钮,然后编写如下事件过程: 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.14B.3C.2D.12

在窗体上画一个命令按钮,然后编写如下事件过程: 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


参考答案和解析
C 因为X重新赋值,所以每次循环结果一样。计算一次即可,结果为l5。对于y,内层循环一次,其值为3。共循环12次,所以其值为36。当多次单击命令按钮时,x是普通变量,每次单击只是重新计算一次,执行结果一样,仍然为15。但Y是静态变量,程序没有结束运行之前,仍然保持上一次的值。每单击一次按钮,它将累计本次执行结果。执行三次,结果为36+36+36=108。选择C。

相关考题:

请输入B的值在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()x=0DoUntilx=-1a=InputBox("请输入A的值")a=Val(a)b=InputBox("请输入B的值")b=Val(b)x=InputBox("请输入x的值")x=Val(x)() A.2B.3C.15D.14

有下列事件过程: Private Sub Command1_Click() b = 10 Do Until b = -1 a = InputBox("请输入a的值") a = Val(a) b = InputBox("请输入b的值") b = Val(b) a = a * b Loop Print End Sub程序运行后,依次输入数值30,20,10,-1后,输出结果是。A. 6000 B. -10 C. 200 D. -6000

在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()x=0Do Until x=-1a=InputBox("请输入第一个数字a的值")a=Val(A)b=InputBox("请输入第二个数字b的值")b=Val(b)x=InputBox("请输入第三个数字x的值")x=Val(x)a=a + b + xLoopPrint aEnd Sub在程序运行后,单击命令按钮,在对话框中分别输入5,4,8,5,8,-1,输出结果为 【9】 。

窗体上有一个命令按钮Command1,编写如下事件过程:Private Sub Command1_Click()x = InputBox("x=")y = InputBox("y=")Print x + yEnd Sub运行后,单击命令按钮,先后在两个输入对话框中输入123和321,窗体显示的内容是( )。A、 444B、 123321C、 123+321D、 出错信息

在窗体上添加一个命令按钮,名为command1,事件过程为:Private Sub command1_Click( )x=0Do Until c=-1a= val(InputBox(“输入a的值”))b= val(InputBox(“输入b的值”))c= val(InputBox(“输入c的值”))LoopPrint aEnd Sub程序运行后,单击命令按钮,依次在输入对话框中输入5,4,3,2,1,-1后,输出的结果是 ( )A.2B.3C.4D.5

在窗体上画一个命令按钮,然后编写如下事件过程:private sub command1_click()dima,basintegera=Val(inputbox(EntertheFirstinteger))b=Val(inputbox(EntertheSecondinteger))Printb+aend sub程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和111,则输出结果是( )A.456B.111C.567D.111456

(14)窗体中有一个命令按钮,然后编写下列事件过程: 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,8,5,8,-1,输出的结果是。

在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1 Click()a= Val(InputBox(“请输入一个整数”))b=Val(InputBox(“请输入一个整数”))Print a+bEnd Sub程序运行后,单击命令按钮,在输入对话框中分别输入12和34,输出结果为 ______。

在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Commandl_Click()Do Until b a=In put Box("输入a的值")a=Val(a)b=Input Box("输入b的值")b=Val(b)a=a+bLoopPrint aEnd Sub程序运行后,依次输入5,4,3,2,1,0,-1,-2,则输出结果是【 】。

在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_ Click ( ) x = InputBox("Enter the First integer") y = InputBox("Enter the Second integer") Print y +xEnd Sub程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和123,则输出结果是 ______。A.579B.123C.456D.123456

在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()X=0Do While X<>-1X=Val(InputBox("请输入数据X:"))Y=Val(InputBox("请输入数据Y:"))If X*Y<X+Y Then Print X,YLoopEnd Sub程序运行后,依次输入7,2,-3,8,-5,-10,18,-1,-1,则输出结果是【 】

在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1 Click()Do Until b<Oa=InputBox("输入a的值")a=Val(A)b=InputBox("输入b的值")b=Val(B)a=a+bLoopPrint aEnd Sub程序运行后,依次输入5,4,3,2,1,0,-1,-2,则输出结果是 【 】

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

在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl—Click() x=InputBox(“请输入一个整数”) Print x+345 End Sub 程序运行后,单击命令按钮,在输入对话框中输入123,则在窗体上输出的内容为( )A.123345B.468C.123D.345

有如下事件过程: Private Sub Commandl_Click() b=10 Do Until b=-1 a=InputBox(“请输入a的值”) a=Val(A) b=InputBox(“请输入b的值”) b=Val(B) a=a*b Loop Pdnt a End Sub 程序运行后,依次输入数值30,20,10,-1,输出结果为( )。A.6000B.-10C.200D.-6000

在窗体上画一个命令按钮,名称为Commandl,然后编写如下程序:Privme Sub Commandl_Click()Dim intNum As IntegerintNum=InputBox(“请输入:”)MsgBox f(intNum)End SubFunction f(X As Integer) As Integerf=IIf (X10,X,X+5)End Function运行程序,单击命令按钮,在输入对话框中输入5,则程序的输出结果为______。

有如下事件过程: Private Sub Command1_Click() b=10 Do Until b=-1 a=InputBox("请输入a的值") a=Val(A) b=InputBox("请输入b的值") b=Val(B) a=a*b Loop Print a End Sub 程序运行后,依次输入数值30,20,10,-1后,输出结果为( )。A.6000B.-10C.200D.-6000

在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Commandl_Click()DO Until b0a=InputBox(”输入a的值”)a=Val(a)b=InputBox(”输入b的值”)b=Val(b)a=a+bLoopPrint aEnd Sub程序运行后,依次输入5,4,3,2,1,0,-1,-2,则输出结果是【 】。

在窗体中添加一个命令按钮,然后编写如下代码:Private Sub Command1_Click()a=InputBox("请输入一个整数")b=InputBox("请输入一个整数")Print Val(a)+Val(b)End Sub程序运行后,单击命令按钮,在输入对话框中分别输入21和45,输出结果为【 】。

在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() x = 0 n=InputBox(" ") For i = 1 To n For j=1 To i x = x + 1 Next i Next i Print x End Sub 程序运行后,单击命令按钮,如果输入3,则在窗体上显示的内容是A.3B.4C.5D.6

在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Do While b>=0a=Val(InputBox("请输入a的值"))b=Val(InputBox("请输入b的值"))c=a+bLoopMsgBox cEnd Sub程序运行后,依次输入3,2,1,0,-1,-2,则输出结果是______。

在窗体上画一个命令按钮,然后编写如下事件过程: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 aEnd Sub程序运行后,单击命令按钮,依次在输入对话框中输入5、4、3、2、1、-1,则输出结果为 ______。A.2B.3C.14D.15

在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click( )Do Until b < 0a = InputBox( "输入a的值" )a = Val(@A@b = InputBox( "输入b的值" )b =VM(@B@a=a+bLoopPrint aEnd Sub程序运行后,依次输入5,4,3,2,1,0,-1,-2,则输出结果是【 】。

在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() x=0 Do Until x=-1 a=InputDox("请输入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 程序运行后,单击命令按钮,依次在输入对话框中输入10、8、9、2、11、-1,则输出结果为 ______。A.15B.14C.13D.12

在窗体上添加一个命令按纽,名为COMgAND1,事件过程如下: Private Sub CQmmand1_Click() x =0 Do Until c = -1 a=InputBox(“请输入a的值”) a=Val (A) b=InputBox(“请输入b的值”) b=Val(B) c=InputBox(“请输入c的值”) c=Val (C) a=a+b+c Loop Print a End Sub程序运行后,单击命令按纽,依次在输入对话框中输入5,4,3,2,1,-1后,输出的结果是______ 。A.2B.3C.4D.5

在窗体上画一个命令按钮,然后编写如下代码。运行程序后,单击命令按钮,依次在输人对话框中输入2,7,5,3,8,5,12,6,12,在窗体上输出的结果是______。 Private Sub Command1 Click() z=5 Do Until z<>5 x=InputBox“请输入x值”) x=Val(x) y=InputBox(“请输入y值”) y=Val(y) z=InputBox(“请输入z值”) z=Val(z) y=x+y+2 * z Loop Print y End SubA.19B.21C.42D.19

有如下事件过程: Private Sub Command1_Click() b=10 Do Until b=-1 a=InputBox("请输入a的值") a=Val(A)b=InputBox("请输入b的值") b=Val(B)a=a * b Loop Print aEnd Sub程序运行后,依次输人数值30,20,10,-1,输出结果为A.6000B.-10C.200D.-6000

有如下事件过程: Private Sub Command1_Click() b=10 Do Until b =-1 a = InputBox("请输入a的值") a = Val(a)b = InputBox("请输入b值") b = Val(b)a=a*b Loop Print a End Sub 程序运行后,依次输入数值30,20,10,-1后,输出结果为( )。A.6000B.-10C.200D.-6000