设有如下程序 Private Sub Search(a()As Variant,ByVa1 key As Variant,index%)
设有如下程序 Private Sub Search(a()As Variant,ByVa1 key As Variant,index%) Dim I% For I=LBound(A)To UBound(a) If key=a(1) Then index=I Exit Sub End If Next I index=I End Sub Private Sub Form_Load() Show Dim b() As Variant Dim n As Integer b = Array(1,3,5,7,9,11,13,15) Call Search(b, 11 ,n) Print n End Sub程序动行后,输出结果是【 】。