[单选题]

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

A.12

B.13

C.14

D.15

参考答案与解析:

相关试题

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

[单选题]在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() A="12" B="34" C="56" Print A+B+C End Sub 程序运行后,单击命令按钮,输出结果是( )。A."123456"B.123456C.102D.显示出错信息

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

    [单选题]在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a() a=Array(1,3,5,7) s=0 For i=1 To 3 s=s*10+a(i) Next i Print s End Sub 程序运行后,输出结果为( )。A.135B.357C.531D.753

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

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

    [单选题]在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() MsgBox Str(123+321) End Sub 程序运行后,单击命令按钮,则在信息框中显示的提示信息为A.123+321B.字符串"444"C.数值444D.空白

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

    [单选题]在窗体上画一个命令按钮,然后编写如下事件过程。 Private Sub Command1_Click( ) Dim m 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

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

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

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

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

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

    [单选题]在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() Dim m 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 程序运行后,如果单击命令按钮,则在窗体上显示的内容是(

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

    [单选题]在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() a:InputBox("Enter the First Integer") b:InputBox("Enter the Second Inteeer") Print b+a End Sub 程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和123,则输出结果是 ( )A.579B.123C.456D.123456

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