[填空題] 設(shè)有如下程序： Private Sub search(a()As Variant，ByVal key As Variant，index%) D
2021-07-20
[填空題] 設(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)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
程序運(yùn)行后，輸出結(jié)果是 【6】 。
正確答案：E
參考解析：該過程實(shí)現(xiàn)順序查找的功能，即從數(shù)組的第0個(gè)元素開始，依次和關(guān)鍵字key進(jìn)行比較，如果相等，則返回其下標(biāo)并結(jié)束查找。Visual Basic中默認(rèn)數(shù)組元素的下標(biāo)從。開始，因此11是第6個(gè)元素，其下標(biāo)為5。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。