Module Tester Sub Main() Dim letters As String = "abcdefghijklmabcdefghijklm" Dim searchLetters As Char() = New Char() {"c"c, "a"c, "$"c} Console.WriteLine(letters.LastIndexOf("def")) Console.WriteLine(letters.LastIndexOf("def", 25)) Console.WriteLine(letters.LastIndexOf("hello", 20, 15)) End Sub End Module
16 16 -1