如何在VB.NET中从列表中找到对象的索引？

Imports System.Collections.Generic

Module Module1

    Sub Main()
        Dim list As New List(Of String)
        list.Add("apple")
        list.Add("banana")
        list.Add("orange")

        Dim index As Integer = list.IndexOf("banana")
        Console.WriteLine("Index of 'banana': " & index)

        index = list.IndexOf("grape")
        If index = -1 Then
            Console.WriteLine("'grape' not found in the list")
        End If

        Console.ReadLine()
    End Sub

End Module