Imports System Imports System.Data Imports System.Collections public class MainClass Shared Sub Main() Dim A As String = "ABCD" Console.WriteLine(InStr(A, "C")) End Sub End Class