网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

在窗体上画一个命令按钮,其名称为Command1,然后编写如下程序: Option Base 1 Private Sub Command1_Click() Dim a As Variant 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.4321

B.12

C.34

D.1234


参考答案

更多 “ 在窗体上画一个命令按钮,其名称为Command1,然后编写如下程序: Option Base 1 Private Sub Command1_Click() Dim a As Variant 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.12C.34D.1234 ” 相关考题
考题 在窗体上画一个名称为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,然后编写如下事件过程: Private Sub Command1_Click() a=12345 Print Format S(a, "000. 00") End Sub 程序运行后,单击命令按钮,窗体上显示的是______。A.123.45B.12345.00C.12345D.00123.45

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

考题 在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:

考题 (30)在窗体上画一个名为 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)1234B)12C)34D)4321

考题 (10)在窗体上画一个命令按钮,其名称为 Command1,然后编写如下代码:Option Base 1Private Sub Command1_Click( )Dim ArrArr=Array(43, 68, -25, 65, -78, 12, -79, 43, -94, 72)pos=0neg=0For k=1 To 10If Arr(k)0 Then【10】Else【11】End IfNext kPrint pos, negEnd Sub以上程序的功能是,计算并输出数组 Arr 中 10 个数的正数之和 pos 与负数之和 neg,请填空。

考题 ( 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

考题 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Option Base 1Private Sub Command1_Click( )Dim s As IntegerDim aa(3, 2) As IntegerFor i = 1 To 3For j = 1 To 2aa(i, j) = i + jNext jNext is = aa(1, 2) + aa(2, 1)Print sEnd Sub程序运行后,单击命令按钮,窗体上显示的值是( )A. 4B. 5C.6D. 7

考题 在窗体上画一个命令按钮,名称为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后,窗体上显示的结果为【 】。

考题 在窗体上画一个命令按钮,名称为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() 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

考题 在窗体上画一个命令按钮,其名称为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 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() Dim arr(4)As String For i=1 To 4 arr(i) = Chr(Asc("A")+(i-1)) Next i For Each b1 In arr Print b1; Next End Sub 程序运行后,如果单击命令按钮,则在窗体上输出的内容为 ______。A.ABCDB.abcdC.出错信息D.1 2 3 4

考题 在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:程序运行后,如果单击命令按钮,则在面体上显示的内容是( )。

考题 在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_ Click() Dim arr (10) For i = 1 To 10 arr (i) = i ^ 2 Next i Print arr(i - 2) End Sub程序运行后,单击命令按钮,在窗体上输出的是______。A.49B.64C.81D.100

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

考题 在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.B.HC.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

考题 在窗体上画一个名为Command1的命令按钮,然后编写下列程序:Option Base 1Private Sub Command1_Click()Dim ArrArr=Array(1,2,3,4,5)j=1For i=5 To 1 Step-1S=S+Arr(i)*jj=j*10NextPrint SEnd Sub程序运行后,单击命令按钮,输出结果是( )。A.54321B.123C.12345D.345

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

考题 在窗体上画一个命令按钮,其名称为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 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

考题 在窗体上画一个命令按钮,其名称为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的命令按钮,然后编写如下事件过程: 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