Dim strTest As String = "He said ""Help me please""" Dim intIndex As Integer = strTest.IndexOf(ControlChars.Quote)