题目内容
（请给出正确答案）
设有程序： Option Base 1 Private Sub Command1_Click() Dim arrl, Max As Integer arrl=Array(12, 435, 76, 24, 78, 54, 866, 43) 【 】=arrl(1) For i=1 To 8 If arrl(i)＞Max Then【 】 Next i Print "最大值是:" ; Max End Sub 以上程序的功能是，用Array函数建立一个含有8个元素的数组，然后查找并输出该数组中元素的最大值。请填空。
如果结果不匹配，请 联系老师 获取答案
更多“设有程序： Option Base 1 Private Su…”相关的问题
设有程序： Option Base 1 Pfivme Sub Command1_Click() Dim arr1，Max as Integer arr1=Array(12，435，76，24，78，54，866，43) 【 】=arr1(1) For i=1 To 8 If arr1(i)＞MaxThen【 】 Next i Print"最大值是："；Max End Sub 以上程序的功能是：用Array函数建立一个含有8个元素的数组，然后查找并输出该数组中元素的最大值。请填空。
设有如下程序： Option Base 1 Pfivme Sub Command1_Click() Dim arr1 Dim Min As Integer，i As Integer arrl=Array(12，435，76，-24，78，54，866，43) Min=【 】 For i=2 TO 8 If arr1(i)＜Min Then【 】 Next i Print“最小值是：”；Min End Sub 以上程序的功能是：用Array函数建立一个含有8个元素的数组，然后查找并输出该数组中各元素的小值。请填空。
A.13579
B.97531
C.12345678910
D.10987654321
A.1234
B.1111
C.4444
D.4321
A.25
B.26
C.27
D.28
在窗体上画一个命令按钮，然后编写如下事件过程：
Option Base 1
Private Sub Command1_Click()
Dima As Variant
a=Array(1，2，3，4)
j=1
Fori=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 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．4
B．5
C．6
D．7
