itgle.com

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

B．3

C．14

D．15

相似考题

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

2.在窗体上画一外名称Command1的命令按钮，然后编写如下事件过程:Private Sub Command1_Click( )x=0n=InputBox(" ")For i = 1 To nFor j = 1 To ix=x+1Next jNext iPrint xEnd Sub程序运行后，单击命令按钮，如果输入3，则在窗体上显示的内容是【 】。

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

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

更多“在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_ Click()x=0Do Until x=－1a ”相关问题

  • 第1题：

    在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() x=-5 If Sgn(x) Then y=Sgn(x^2) Else y=Sgn(x) End If Print y End Sub 程序运行后，单击命令按钮，其输出结果为 ______。

    A．-5

    B．25

    C．-1

    D．1


    正确答案：D
    解析：Sgn(number)函数的功能是返回number的正负号。如果number＞0，Sgn返回1；number=0，Sgn返回0；number0，Sgn返回-1。在本题中Sgn(-5)的返回值为-1，-1为真，所以执行y=Sgn(x^2)，返回1，所以y的值为1。

  • 第2题：

    在窗体上画一个命令按钮，然后编写如下事件过程: Private Sub CommAnd1_Click() For i=1 To 4 x=0 For j=1 To 3 x=j For k=1 To 2 x=x+6 Next k Next j Next i Print x End Sub 程序运行后，单击命令按钮,输出结果是______ 。

    A．7

    B．15

    C．157

    D．538


    正确答案：B

  • 第3题：

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

    B．13

    C．16

    D．17


    正确答案：C
    解析：观察程序，由于每次执行外层循环时x都被重新赋值，因此只要看当i=4时，执行内循环所得到的结果就可以。

  • 第4题：

    在窗体上画一个命令按钮，然后编写如下事件过程：

    Private Sub Command1_Click()

    For i=1 To 4

    x=4

    For j=1 To 3

    X=3

    For k=1 To 2

    x=x+6

    Next

    Next

    Next

    Print x

    End Sub 程序运行后，单击命令按钮，输出的结果是

    A．7

    B．15

    C．157

    D．538


    正确答案：B
    解析：本题的难点在于循环体外的变量初值问题。虽然该段程序中有3重循环，但仔细观察发现，x=3将前面的内容替代了，只剩下最后的结果，即3+6+6=15。

  • 第5题：

    在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) For i =1 To 4 x=4 For j = 1 To 3 x=3 For k = 1 To 2 x=x+6 Next Next Next Print x End Sub 程序运行后，单击命令按钮，输出的结果是

    A．7

    B．15

    C．157

    D．538


    正确答案：B
    解析：本题的难点在于循环体外的变量初值问题。虽然该段程序中有3重循环，但仔细观测发现，x=3将前面的内容替代了，只剩下最内的结果，即3+6+6=15。

  • 第6题：

    在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：

    Private Sub Command1_Click（）

    x = -5

    If Sgn（x） Then

     y = Sgn（x ^ 2）

    Else

     y = Sgn（x）

    End If

    Print y

    End Sub

    程序运行后，单击命令按钮，窗体上显示的是（ ）。

    A．-5

    B．25

    C．1

    D．-1


    正确答案：C

相关内容