在窗体上放置一个命令按钮Command1,并编写下列单击事件的程序:Option Base1Private Sub Command1_Click()Dim c As Integer,d As Integerd=0c=6X=Array(2,4,6,8,10,12)For i=1 To 6If X(i)>c Thend=d+X(i)c=X(i)Elsed=d-cEnd IfNext iPrint dEnd Sub程序运行后,单击命令按钮,则在窗体上输出的内容为( )。A.10B.12C.16D.20

题目

在窗体上放置一个命令按钮Command1,并编写下列单击事件的程序:

Option Base1

Private Sub Command1_Click()

Dim c As Integer,d As Integer

d=0

c=6

X=Array(2,4,6,8,10,12)

For i=1 To 6

If X(i)>c Then

d=d+X(i)

c=X(i)

Else

d=d-c

End If

Next i

Print d

End Sub

程序运行后,单击命令按钮,则在窗体上输出的内容为( )。

A.10

B.12

C.16

D.20


相似考题
更多“在窗体上放置一个命令按钮Command1,并编写下列单击事件的程序:Option Base1Private Sub Command1 ”相关问题
  • 第1题:

    在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:

    程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。

    A.

    B.H

    C.

    D.


    正确答案:A
    【解析】分析程序,程序开始循环时i=1,j=1to1,PrintSUing(i,“Hello”)语句输出一个H,然后执行Print进行换行;当i=2时,j=1to2,PrintString(i,“Hello”)语句输出两行分别为两个HH,然后执行Print换行:当i=3时,退出循环。

  • 第2题:

    在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Privme Sub Command1_Click( ) a$="VisualBasic" Print String(3,a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是

    A.VVV

    B.Vis

    C.sic

    D.11


    正确答案:A
    解析:String返回n个字符。如果为字符串,则返回n个字符串的首字符。返回3个"VisualBasic”的首字母“V”。

  • 第3题:

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

    Private Sub Command1_Click()

    a = 12345

    Print Format$(a, "000.00")

    End Sub

    程序运行后,单击命令按钮,窗体上显示的是( )。

    A.123.45

    B.12345.00

    C.12345

    D.00123.45


    正确答案:B

  • 第4题:

    在窗体上放置一个命令按钮Command1,并编写下列单击事件的程序: Option Base 1 Private Sub Command1_Click() Dim c As Integer,d As Integer d=0 c=6 X=Array(2,4,6,8,10,12) For i=1 To 6 If X(i)>c Then d=d+X(i) c=X(i) Else d=d-c End If Next i Print d End Sub 程序运行后,单击命令按钮,则在窗体上输出的结果为( )。

    A.10

    B.12

    C.16

    D.20


    正确答案:B
    解析:程序首先使用Array函数为x数组变量赋值,然后利用For循环和If结构语句实现程序功能。程序执行过程如下:①当i=1时,X(i)=2,d=d-c=-6:②当i=2时,X(i)=4,d=d-c=12;③当i=3时,X(i)-6,d=d-c=-18;④当i=4时,X(i)=8,d=d+X(i)=-10,c=8;⑤当i=5时,X(i)=10,d=d+X(i)=0,c=10;⑥当i=6时,X(i)=12,d=d+X(i)=12,c=12。

  • 第5题:

    在窗体上画一个名为Command1的命令按钮,编写如下程序:

    程序运行后,单击命令按钮,输出的结果是_________。


    正确答案:
    4
    【解析】本题考查了数组的嵌套使用。程序首先通过一个For循环给数组M的各个数组元素赋值,然后通过数组下标嵌套本身。注意:这样的嵌套时,要保证数组下标不出界,否则程序将出错。