问题:[填空题]
[填空题] 设有如下程序: Private Sub search(a()As Variant,ByVal key As Variant,index%) Dim I% For i=LBound(A) To UBound(A) If key=a(I)Thenindex=IExit Sub End If Next I index=-1 End Sub Private Sub Form_Load() Show Dim b() As Variant Dim n As Integer b=Arr