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

题目

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

B．3

C．14

D．15

相似考题

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

2.在窗体上画一个命令按钮，其名称为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．-5B．25C．-1D．1

3.在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x = 0 n=InputBox(" ") For i = 1 To n For j=1 To i x = x + 1 Next i Next i Print x End Sub 程序运行后，单击命令按钮，如果输入3，则在窗体上显示的内容是A．3B．4C．5D．6

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

参考答案和解析
正确答案：A
更多“在窗体上画一个命令按钮,然后编写如下事件过程:Prevate Sub Command1_ Click()x=0Do Until x=－1 ”相关问题

  • 第1题：

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

    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。

  • 第2题：

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

  • 第3题：

    在窗体上画一个名称为Comillarldl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x=0 n=InputBox(" ") For i=1 To n For j=1 To i x=x+1 Next j Next i Print x End Sub 程序运行后，单击命令按钮，如果输入3，则在窗体上显示的内容是( )。

    A．3

    B．4

    C．5

    D．6


    正确答案：D
    解析：本题是一个简单的双重For-Next循环考题，这里需要注意的是，循环的终值都是由变量设置的。当步长大于0时，循环的初值与终值相等，仍然要执行一次循环；只有当循环变量大于终值的时候才跳出循环。x的值实际上等于循环执行的次数6。如果考生认为Fori=1To1并不执行循环，则会认为选项C为答案。答案为D。

  • 第4题：

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

  • 第5题：

    在窗体上画一个命令按钮，然后编写如下事件过程： 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时，执行内循环所得到的结果就可以。

  • 第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

相关内容