设有如下程序
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
程序运行后，输出结果是______。