[填空題] 設(shè)有如下程序 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=Array(1，3，5，7，9， 11， 13， 15) Call Search(b， 11， n) Print n End Sub 程序運(yùn)行后，輸出結(jié)果是______。

E

本題綜合考查了數(shù)值的初始賦值，Sub過(guò)程的建立與調(diào)用，F(xiàn)or循環(huán)控制語(yǔ)句等多項(xiàng)內(nèi)容。本題的要點(diǎn)在于理解Sub過(guò)程 Search所要表達(dá)的意思．根據(jù)題意，Search需要在數(shù)組a()中尋找等于key的數(shù)，如果找到了，則令I(lǐng)ndex等于該元素的下標(biāo)值，如果沒(méi)有找到，則令I(lǐng)ndex等于-1。據(jù)此，在調(diào)用Search時(shí)，11為b(8)的第6個(gè)元素，下標(biāo)為5，故index為5。