Module Tester
Public Sub Main()
Dim sHello As String = "Hello World"
Console.WriteLine("Original string: {0}", sHello)
Console.WriteLine("Find character (Instr(1, sHello, 'l')) : {0}", InStr(1, sHello, "l"))
End Sub
End Module
Original string: Hello World
Find character (Instr(1, sHello, 'l')) : 3