• 2021-04-14
    下列Find函数的功能是在数组里查找数字key,返回该key在数组中的下标,如果找不到则返回-1。请在_________处填入适当的内容完善程序。


    Function Find(ByRef a%(), ByVal key%) As Integer


    Dim idx%, i%


    idx = -1


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


    If a(i) = key Then


    _________


    Exit Function


    End If


    Next


    Find = idx


    End Function
  • 举一反三