更多"在窗体上画一个命令按钮，然后编写如下程序： Option Base "的相关试题:
[单项选择]在窗体上画一个命令按钮，然后编写如下程序：
Option Base 1
Private Sub Command1_Click( )
Dim Arr1(12)As Integer， Arr2(3)As Integer
Dim Sum As Integer
Sum = 2
For i = 1 To 12
Arr1(i)= i
Next i
For i = 1 To 3
Arr2(i)= Arr1(i * i)
Next i
For i = 1 To 3
Sum = Sum + Arr2(i)
Next i
Print Sum
End Sub
程序运行后，单击命令按钮，在窗体上的输出结果是________。
A. 16
B. 24
C. 32
D. 36
[单项选择]在窗体上画一个命令按钮，然后编写如下事件过程：
Option Base 1
Private Sub Command1_Click（ ）
Dim a As Variant
a= Array (1,2,3,4)
j=1
for i=a 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
[填空题]在窗体上画一个命令按钮，然后编写如下事件过程：
Option Base 1
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
运行上面的程序，单击命令按钮，其输出结果是 【15】 。
[填空题]在窗体上画一个命令按钮，然后编写如下事件过程：
Option Base1
Private Sub Command1_Click（ ）
Dim a
s=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
运行上面的程序，单击命令按钮，其输出结果是 【15】 。
[单项选择]在窗体上画一个命令按钮，然后编写如下事件过程：
Option Base 1
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. 4321
B. 12
C. 34
D. 1234
[单项选择]在窗体上画一个文本框，然后编写如下程序：
Option Base 1
Private Sub Form_Click(
)
Dim Arr(10)As Integer
For i = 6 To 10
Arr(i)= i - 3
Next i
Text1.Text = Str(Arr(6)+ Arr(Arr(6)+ Arr(10)))
End Sub
程序运行后，单击窗体，在文本框中显示的内容是________。
A. 1
B. 3
C. 6
D. 10
[单项选择]在窗体上画一个文本框，然后编写如下代码：
Option Base 1
Private Sub Form_Click( )
Dim arr
Dim Start As Integer， Finish As Integer
Dim Sum As Integer
arr = Array(12， 4， 8， 16)
Start = LBound(arr)
Finish = UBound(arr)
Sum = 0
For i = Start To Finish
Sum = Sum + arr(i)
Next i
c = Sum / Finish
Text1.Text = c
End Sub
程序运行后，单击窗体，则在文本框中显示的内容是________。
A. 40
B. 10
C. 12
D. 16
