【简答题】设有如下程序: Option Base 1 Private Sub Command1_Click() Dim arr1 Dim Min As Integer, i As Integer arr1 = Array(12, 435, 76, -24, 78, 54, 866, 43) Min = ______ For i = 2 To 8 If arr1(i) < Min Then______ Nex...
【单选题】设有如下程序 Option Base 1 Private Sub Command1_Click( ) Dim a(10)As Integer Dim n As Integer n=lnput Box(“输入数据”) If n<10 Then Call GetArray(a,n) End If End Sub Private Sub GetArray(b( )As Integer,n As Inte...
【单选题】设有如下程序 Option Base 1 Private Sub Command1_Click() Dim a(10)As Integer Dim n As Integer n=InputBox('输入数据') If n<10 Then Call GetArray(a,n) End If End Sub Private Sub GetArray(b()As Integer,n As Integer...