[填空题] 设有如下程序 Private Sub Search(a()As Variant， ByVal key As Variant， index%) Dim I% For I=LBoun

[填空题] 设有如下程序

Private Sub Search(a()As Variant， ByVal key As Variant， index%)

Dim I%

For I=LBound(a) To UBound(a)

If key=a(I) Then

Index=I

Exit Sub

End If

Next I

Index=-1

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

程序运行后，输出结果是______。