在窗本上放置一个命令按钮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

[单选题]在窗体上放置一个命令按钮Command1，并编写下列单击事件的程序： Option Base 1Private Sub Commandl_Click0Dim 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 dEnd Sub程序运行后，单击命令按钮，则

[单选题]在窗体上放置一个命令按钮Command1，并编写下列单击事件的程序： Option Base 1 Private Sub Command1_Click() Dim c As Integer ， d As Integer d = 0 c = 6 X = Araay(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程序运行后，

[单选题]在窗体上放置一个命令按钮Command1，并编写下列单击事件的程序：Option Base1Private Sub Command1_Click()D．im c As Integer,d As Integerd=0c=6X=Array(2,4,6,8,10,12)F．or i=1 To 6If X(i)＞c Thend=d+X(i)c=X(i)E．lsed=d-cE．nd IfNext iPrint dE．nd Sub程序运行后，单击命令按钮，则在窗体上输出的内容为( )。A．10B．12C．1

[单选题]在窗体上放置一个命令按钮Command1，并编写下列单击事件的程序：Option Base 1Pdvate Sub Command1_Click()D．im c As Integer,d As Integerd=0c=6X=Array(2,4,6,8,10,12)F．or i=1 To 6If X(i)>c Thend=d+X(i)c=X(i)E．lsed=d-cE．nd IfNext iPrint dE．nd Sub程序运行后，单击命令按钮，则在窗体上输山的结果是( )。A．10B．12

[单选题]在窗体上放置一个命令按钮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 程序运行后，单击命令按钮，则在窗体上输出的结果为(

[单选题]（26）在窗体上放置一个命令按钮Command1，并编写下列单击事件的程序： Private Option Base 1 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 IfX(i)>c Then d=d+X(i) c=X(i) Else d=d-c End If Next i Print d End Sub 程序运行后，单击命令按钮，则在窗体上输出

[单选题]在窗体上有一个命令按钮Command1，编写下列程序：Private Sub Command1_Click()Print pp1(3,7)E．nd SubPublic Function pp1(x As Single,n As Integer)As SingleIf n=0 Thenpp1=1E．lseIf n Mod 2=1 Thenpp1=x*x+nE．lsepp1=x*x-nE．nd IfE．nd IfE．nd Function程序运行后，单击该命令按钮，屏幕上显示的是( )。A．2B．1

[单选题]在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程： Option Base 0 Private Sub Command1_Click() Dim city As Variant city=Array("北京"，"上海"，"天津"，"重庆") Print city(1) End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。A．空白B．错误提示C．北京D．上海

[单选题]在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程； Option Base 0 Private Sub Command1_Click() Dim city As Variant city=Array("北京", "上海", "天津", "重庆") Print city(1) End Sub 程序运行后，单击命令按钮，则在窗体上显示的内容是______。A．空白B．错误提示C．北京D．上海

[单选题]在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： option Base 1 Private Sub Command1_Click() Dim a a=Array(1, 2, 3, 4, 5) For i=1 To UBound(a)a(i)=a(i)+i-1 Next Print a(3) End Sub 程序运行后，单击命令按钮，则在窗体上显示的内容是______。A．4B．5C．6D．7