在窗体上画一个命令按钮,名称为Command1,然后编写下列代码: Option Base 0 Private Sub Command1 Click( ) Dim A1(4)As Integer,A2(4)As Integer For k=0 To 2 A1(k+1)=InputBox(”请输入一个整数”) A2(3-k)=A1(k+1) Next k Print A2(k) End Sub 程序运行后,单击命令按钮,在输入对话框中依次输入2、4、6,则输出结果为( )。A.0B.1C.2D.3

在窗体上画一个命令按钮,名称为Command1,然后编写下列代码: Option Base 0 Private Sub Command1 Click( ) Dim A1(4)As Integer,A2(4)As Integer For k=0 To 2 A1(k+1)=InputBox(”请输入一个整数”) A2(3-k)=A1(k+1) Next k Print A2(k) End Sub 程序运行后,单击命令按钮,在输入对话框中依次输入2、4、6,则输出结果为( )。

A.0

B.1

C.2

D.3


相关考题:

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

在窗体上画一个命令按钮,名称为 Command1, 然后编写如下代码:Option Base 0Private Sub Command1_Click()Dim A (4)As Integer,B(4) As IntegerFor k=0 To 2A(k+1)=InputBox(“ 请输入一个整数 ”)B(3-k)=A(k+1)Next kPrint B(k)End Sub程序运行后,单击命令按钮,在输入对话框中分别输入2、4、6,输入结果为( )。 A.0B.2C.3D.4

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

( 23 )在窗体上画一个命令按钮,其名称为 command1, 然后编写如下代码:Option Base 1Private Sub Command1_Click()Dim aa = Array(1, 2, 3, 4)j = 1For i = 4 To 1 Step -1s = s + a(i) * jj = j * 10Next iPrint sEnd Sub程序运行后,单击命令按钮后,其输出结果是A ) 4321B ) 1234C ) 34D ) 12

在窗体上画一个命令按钮,名称为Command1,然后编写如下代码: Option Base() Private Sub Command1 Click() Dim A(4)As Integer,B(4)As Integer For k=0 To 2 A(k+1)=InputBox(“请输入一个整数”) B(3-k)=A(k+1) Next k Print B(k) End sub 程序运行后,单击命令按钮,在输入对话框中分别输入2、4、6,输出结果为______。A.0B.2C.3D.4

在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:Private Sub Commandl_Click( )Static X As IntegerStatic Y As IntegerClsY=1Y=Y+5X=5+XPrint X, YEnd Sub程序运行时,3次单击命令按钮Command1后,窗体上显示的结果为【 】。

在窗体上画一个命令按钮(其Nmne属性为Command1),然后编写如下代码: Option Base l Private Sub Command1_Click( ) Dim a s=0 a=Array(1,2,2,4) j=1 For i=4 To 1 Step-1 s=s+a(i)*j j=j*10 Next i Print s End Sub 运行上面的程序,单击命令按钮,其输出结果是A.4321B.1234C.34D.12

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

在窗体上画一个命令按钮(名称为Command1),然后编写如下事件过程: Private Sub Command1_Click() Dim b As Integer b=b+1 End Sub 运行程序,三次单击命令按钮后,变量b的值是: ______。A.0B.1C.2D.3

在窗体上画一今名称为Command1的命令按钮,然后编写如下代码: Option Base 1 Private Sub Command1_Click() d=0 c=10 x=Array(10,12,21,32,24) For i=1 To 5 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.89B.99C.23D.77

在窗体上画一个名称为Command1的命令按钮,然后编写如下代码: OPtion Base l Private Sub Commandl_Click( ) d=0 c=10 x=Array(10,12,21,32,24) For i=1 To 5 If x(i)>c Then d=d+x(i) C=x(i) Else d=d-c End lf Next i Print d End Sub 程序运行后,如果单击命令按钮,则在窗体上输出的内容为A.89B.99C.23D.77

在窗体中添加名称为Command1和名称为Command2的命令按钮以及文本框Text1,然后编写如下代码: Private Sub Command1 Click() Text1.Text="AB" End Sub Private Sub Command2 Click() Text1.Text="CD" End Sub 首先单击Command1按钮,然后再单击Command2按钮,在文本框中显示A.ABB.CDC.ABCDD.CDAB

在窗体上画—个命令按钮,其名称为Command1,然后编写如下代码:Option Base 1Private Sub Command1_ Click() Dim a a=Array(1,2,3,4) j=1 For i=,4 To 1 Step-1 s=s+ a(i)*j j=j*10 Next i Print sEnd Sub程序运行后,单击命令按钮,其输出结果是______。A.4321B.1234C.34D.12

在窗体上画—个名称为Command1的命令按钮,然后编写如下代码: Option Base 1 Private Sub Command1_Click() d=0 c=10 x=Array(10,12,21,32,24) For i=1 To 5 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.89B.99C.23D.77

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: 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.3B.4C.5D.6

在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:Private Sub Command1_Cilck()End Sub运行程序,单击命令按钮,则在弹出的信息框的标题栏中显示的是( )。

在窗体上画一个命令按钮(其名称为Command1),然后编写如下代码:Private Sub Command1 Click( ) Dim a a=Array(1,2,3,4) i=3:j=1 Do While=0 s=s+a i)*j i=i-1 j=j*1c Loop Print S End Sub 运行上面的程序,单击命令按钮,则输出结果是( )。A.4321B.123C.234D.1234

在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() a = 12345 Print Format$(a, "000.00") End Sub 程序运行后,单击命令按钮,窗体上显示的是A. 123.45B.12345.00C.12345D.00123.45

在窗体上画一个名称为Command1的命令按钮,然后编写如下代码: Option Base 1 Private Sub Command1 Click() d = 0 :c = 10 x=Array(10,12,21,32,24) For i = 1 To 5 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.89B.99C.23D.77

在窗体上画一个命令按钮,名称为Command1,然后编写如下代码: Option Base 0 Private Sub Command1_Click() Dim Al(4) As Integer, A2(4) As Integer For k = 0 To 2 A1(k + 1) = InputBox (“请输入1个整数”) A2(3 - k) = A1(k + 1) Next k Print A2(k) End Sub程序运行后,单击命令按钮,在输入对话框中依次输入2、4、6,输出结果为______。A.1B.2C.3D.4

在窗体上画一个命令按钮,其名称为Command1,然后编写下列代码:Option Base lPrivate Sub Command1 Click( )Dim aa=Array(1,2,3,4)j=1For i=4 To 1 Step-1s=s+a(i)*jj=j*10Next iPrint SEnd Sub程序运行后,单击命令按钮,其输出结果是( )。A.4321B.1234C.34D.12

在窗体中添加一个命令按钮(其Name属性为Command1),然后编写如下代码: Option Base 1 Private Sub Command1 Click() Dim a a=Array(2, 4, 6, 8) j=1 For i = 4 To 1 Step -3 s=s+a(i) (j j = j ( 10 Next i Print s End Sub 运行上面的程序,单击命令按钮,其输出结果是A.22B.24C.26D.28

在窗体上画一个命令按钮,其名称为Command1,然后编写如下代码: Option Base 1 Private Sub Command1_Click () Dim a a = Array(1, 2, 3, 4) j = 1 For i = 1 To 4 s = s + a(i) * j j = j * 10 Next i Print s End Sub程序运行后,单击命令按钮,其输出结果是______。A.1234B.12C.34D.4321

在窗体上画一个命令按钮,其名称为Command1,然后编写下列代码: Option Base l Private Sub Command1 Click( ) Dim a a=Array(1,2,3,4) j=1 For i=4 To 1 Step-1 s=s+a(i)*j j=j*10 Next i Print S End Sub 程序运行后,单击命令按钮,其输出结果是( )。A.4321B.1234C.34D.12

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1 Click() For n=1 To 20 If n Mod 3<>0 Then m=m+n\3 Next n Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是______。A.15B.18C.21D.24

在窗体上画一个名称为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

在窗体上画一个命令按钮(其NAME属性为Command1),然后编写如下代码:Option Base 1Private Sub Command1_Click()Dim as = 0a = Array(1,2,3,4)j = 1For i = 4 To 1 Step -1 s = s + a(i) * j j = j * 10Next iPrint sEnd Sub运行上面的程序,单击命令按钮,其输出结果是( )。A.4321B.1234C.34D.12