有如下事件过程: Private Sub Form. Click( ) Dim n As Integcr x=0 n=InputBox("请输入一个整数") For i=1 To i for j =1 To j x=x+1 Next j Next i Print x End sub 程序运行后,单击窗体,如果在输入对话框中输入5,则在窗体上显示的内容是( )。A.13B.14C.15D.16

有如下事件过程: Private Sub Form. Click( ) Dim n As Integcr x=0 n=InputBox("请输入一个整数") For i=1 To i for j =1 To j x=x+1 Next j Next i Print x End sub 程序运行后,单击窗体,如果在输入对话框中输入5,则在窗体上显示的内容是( )。

A.13

B.14

C.15

D.16


相关考题:

请输入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

在窗体上有一个命令按钮,然后编如下事件过程:Function SR(x As Double) As DoubleSelect Case Sgn(x)Case 1SR=Sqr(x)Exit FunctionCase 0SR=0Case -1SR=-1End SelectEnd FunctionPrivate Sub Command1_Click()Dim Msg, SRNDim N As DoubleN=InputBox("请输入要计算平方根的数")Msg=N "的平方根"Select Case SR(N)Case 0Msg=Msg "是0"Case -1Msg=Msg "是一个虚数"Case ElseMsg=Msg "是" SR(N)End SelectMsgBox MsgEnd Sub程序运行后,单击命令按钮,在输入对话框内输入-1,输出结果是 【15】 。

有如下事件过程:Private Sub Form. Click()Dim n As Integerx=0n=InputBox(”请输入一个整数”)For i=1 To iFor j=1 To ix=x+1Next jNext 1Print xEnd sub程序运行后,单击窗体,如果在输入对话框中输入5,则在窗体上显示的内容是( )。A.13B.14C.15D.16

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

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

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

有如下事件过程:Private Sub Form. Click( )Dim n As Integcrx=0n=InputBox(请输入一个整数)For i=1 To iFor i=1 To ix=x+1Next jNext iPrint xEnd sub程序运行后,单击窗体,如果在输入对话框中输入5,则在窗体上显示的内容是( )。A.13B.14C.15D.16

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