单选题有如下程序:程序运行后,单击窗体,在输入对话框中依次输入15、24、35、46,输出结果为(  )。A100B50C120D70

单选题
有如下程序:程序运行后,单击窗体,在输入对话框中依次输入15、24、35、46,输出结果为(  )。
A

100

B

50

C

120

D

70


参考解析

解析:
程序的作用是输入的数如果是5的倍数就累加,同时把x赋值为输入的数;如果不是5的倍数就与x的值累加,因此最终a的值是15+15+35+35=100。

相关考题:

在窗体上画1个命令按钮,名称为Command1,然后编写如下程序:Dim Flag As BooleanPrivate Sub Command1_Click()Dim intNum As IntegerintNum=InputBox("请输入:")If Flag ThenPrint f(intNum)End IfEnd SubFunction f(X As Integer)As IntegerIf X10 ThenY=XElseY=X+10End Iff=YEnd FunctionPrivate Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single)Flag=TrueEnd Sub运行程序,首先单击窗体,然后单击命令按钮,在输入对话框中输入5,则程序的输出结果为( )。A.0B.5C.15D.无任何输出

在窗体上画1个命令按钮,名称为Command1,然后编写如下程序: Dim Flag As Boolean Private Sub Command1_Click() Dim intNum As Integer intNum=InputBox(“请输入:”) If Flag Then Print f(intNum) End If End Sub Function f(X as Integer)As Integer If X<10 Then Y=X Else Y=X+10 End If f=Y End Function Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X as Single,Y As Single) Flag=True End Sub 运行程序,首先单击窗体,然后单击命令按钮,在输入对话框中输入5,则程序的输出结果为______。A.0B.5C.15D.无任何输出

在窗体上画一个文本框,然后编写如下事件过程:Private Sub Form_Click()x = InputBox("请输入一个整数")Print x + Text1.TextEnd Sub程序运行时,在文本框中输入456,然后单击窗体,在输入对话框中输入123,单击“确定”按钮后,在窗体上显示的内容为( )。A.123B.456C.479D.123456

( 32 )设有以下程序:Private Sub Form_Click()X=50For i=1 To 4Y=InputBox( “ 请输入一个整数 ” )Y=Val(y)If y Mod 5=0 Thena=a+yx=yElsea=a+xEnd IfNext iPrint aEnd Sub程序运行后,单击窗体,在输入对话框中依次输入 15 、 24 、 35 、 46 ,输出结果为A ) 100B ) 50C ) 120D ) 70

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

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

在窗体上画一个命令按钮,然后编写如下程序:Dim k As Longk=1Do While numLoopfun=kEnd FunctionPrivate Sub Command1_Click()Dim n As LongDim r As LongMsgBox rEnd Sub程序运行后,单击命令按钮,在输入对话框中输入234,消息框显示的结果为( )。

在考生文件夹中有一个工程文件execise25.vbp,相应的窗体文件为execise25.timo在在名为Form1的窗体上有一个命令按钮,其名称为Cmd1,标题为“输入”;还有一个文本框,其名称为Text1,初始内容为空白。程序运行后,单击“输入”命令按钮,显示“输入”对话框。在对话框中输入某个月份的数值(1~12),然后单击“确定”按钮,即可在文本框中输出该月份所在的季节。例如输入8,将输出“8月份是秋季”,如下图所示。该程序不完整,请补充完整。要求:去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其能正确运行,但不得修改程序的其他部分。最后用原名保存工程文件和窗体文件。

在窗体上有个命令按钮,然后编写如下事件过程 m=InputBox("enter the first integer") n=InputBox("enter the second integer") Print n+m 程序运行后,单击命令按钮,先后在两个输入框中分别输入“1”和“5”,则输出结果为A.1B.51C.6D.15

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

在窗体上画一个命令按钮,名称为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,则程序的输出结果为______。

在窗体上添加一个命令按钮,名为Command1,事件过程如下:程序运行后,单击命令按钮,依次在输入对话框中输入5、4、3、2、1、-1后,输出的结果是______。A.5B.4C.3D.2

在窗体中添加一个命令按钮,编写如下程序代码:在InputBox对话框中输入Hello,运行结果为:______。

设有以下程序:Private Sub Form_ Click() x=50 For i=1 To 4 y=InputBox(“请输入—个整数”) y=Val(y) If y Mod 5=0 Then a=a+ y x=y Else a=a+ x End If Next i Print aEnd Sub 程序运行后,单击窗体,在输入对话框中依次输入15、24、35、46,输出结果为 ______。A.100B.50C.120D.70

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

在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:程序运行后,单击命令按钮,将显示一个输入对话框,如果在对话框中输入25,则程序的执行结果是( )。A. 输出0B. 输出25C. 输出45D. 无任何输出

在窗体上画一个命令按钮,然后编写如下时间过程( )。程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和123,则输出结果是A. 579B. 123C. 456D. 123456

设程序中有如下语句:x-input box(“输入”,”数据”,100)print x运行程序,执行上述语句,输入5并单击输入对话框上的“取消”按钮,则窗体上输出A)0B)5C)100D)空白

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

在窗体上有个命令按钮,然后编写如下事件过程程序运行后,单击命令按钮,先后在两个输入框中分别输入”1”和”5”,则输出结果为A.1B.51C.6D.15

设有下列程序 Private Sub Form. Click( ) X=50 For i=1 T0 4 y=InputBox("请输入一个整数") y=Val(v) If y Mod 5=0 Then a=a+y x=y Else a=a+x End If Next i Print a End Sub 程序运行后,单击窗体,在输入对话框中依次输入15、24、35、46,输出结果为( )。A.100B.50C.120D.70

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

请教:2016年计算机二级VB基础练习三单选题18如何解答? 假定有如下程序:运行程序,单击窗体,依次输入3,6、9,输出结果为A.3B.6C.9D.1

在窗体上有一个命令按钮,然后编如下事件过程:程序运行后,单击命令按钮,在输入对话框内输入-1,输出结果是 。

在窗体上画一个命令按钮,然后编写如下事件过程:程序运行后,依次输入3,2,1,0,-1,-2,则输出结果是__________。

单选题在窗体上画一个文本框,然后编写如下事件过程:程序运行时,在文本框中输入456,然后单击窗体,在输入对话框中输入123,单击“确定”按钮后,在窗体上显示的内容为(  )。A123B456C579D123456

单选题设程序中有如下语句:运行程序,执行上述语句,输入5并单击输入对话框上的“取消”按钮,则窗体上输出(  )。A0B5C100D空白