A.10
B.12
C.16
D.20
[单选题]在窗体上放置一个命令按钮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 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 SubA.10B.12C.16D.20
[单选题]在窗体上放置一个命令按钮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