[单选题]

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

参考答案与解析:

相关试题

在窗体上画一个命令按钮,然后编写如下事件过程:private sub comma

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

  • 查看答案
  • 在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Comma

    [主观题]在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()D.im Y as StringX=5Y=X & Space(3) & XPrint X;Print Trim(Y);Len(Trim(Y))E.nd Sub该程序的执行结果是[ ]。

  • 查看答案
  • 在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Comma

    [单选题]在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Commandl_Click()D.im I,NumRandomizeD.oF.or I=1 To 1000Num=Int(Rnd*100)PrintNum;SelectCase NumC.ase 12E.xit ForC.ase 58E.xit DoC.ase 65,68,92E.ndE.nd SelectNextILoopE.nd Sub上述事件过程执行后,下列描述中正确的是A.Do循环执行的次数为1000次B.在For循

  • 查看答案
  • 在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Comma

    [单选题]在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()F.or i=1 To 4x=4F.or j=1 To 3X=3F.or k=1 To 2x=x+6NextNextNextPrint xE.nd Sub 程序运行后,单击命令按钮,输出的结果是A.7B.15C.157D.538

  • 查看答案
  • 在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Comma

    [单选题]在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() x=O Do Until X=-1 a=InputBox("请输入a的值") a=Val(A) b=InputBox("请输入b的值") b=Val(B)x=lnputBox("请输入x的值") x=Val(x) a=a+b+x Loop Printa End Sub 程序运行后,单击命令按钮,依次在输入对话框中输入10、8A.12B.13C.14D.15

  • 查看答案
  • 在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Comma

    [单选题]在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() Dim a(5)As String Fori=1 To 5 a(i)=Chr(Asc("A")+(11)) Nexti For Each b In a Print b Next End Sub 程序运行后,单击命令按钮,输出结果是( )。A.ABCDEB.1 2 3 4 5C.abcdeD.出错信息

  • 查看答案
  • 在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Comma

    [单选题]在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a(5)As String For i=1 T0 5 a(i)=Chr(Asc("A")+(i-1)) Next i For Each b In a Print b; Next End Sub 程序运行后,单击命令按钮,输出结果是______。A.ABCDEB.1 2 3 4 5C.abodeD.出错信息

  • 查看答案
  • 在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Comma

    [单选题]在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() For i=1 To 4 x=4 For j=1 To 2 x=x+6 Next Next Print x End Sub 程序运行后,单击命令按钮,输出结果是A.12B.13C.15D.17

  • 查看答案
  • 在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Comma

    [单选题]在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim in As Integer,n As Integer,p As Integer m=3:n=5:p=0 Call Y(m,n,p) Print Str(p) End Sub Sub Y(ByVal i As Integer,ByVal j As Integer,k As Integer) k=i+j End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是A.4B.6C.

  • 查看答案
  • 在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Comma

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

  • 查看答案
  • 在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Comma