如何在对象列表中查找对象的索引？VB.Net

Dim myList As New List(Of String)()
myList.Add("Apple")
myList.Add("Banana")
myList.Add("Orange")

Dim index As Integer = myList.IndexOf("Banana")
If index <> -1 Then
    Console.WriteLine("索引位置为：" & index)
Else
    Console.WriteLine("对象不存在于列表中")
End If

Dim myList As New List(Of String)()
myList.Add("Apple")
myList.Add("Banana")
myList.Add("Orange")

Dim index As Integer = myList.FindIndex(Function(item) item = "Banana")
If index <> -1 Then
    Console.WriteLine("索引位置为：" & index)
Else
    Console.WriteLine("对象不存在于列表中")
End If