Question

How to get the all indexes of specific letter in a string and print all the substrings with VB.NET

Answer 1

Module Module1

    Sub Main()

        Dim s As String = "VB.NET, P PH PHP, Java Python"

        Dim i As Integer = s.IndexOf("P")

        Do While (i <> -1)
            Console.WriteLine(s.Substring(i))
            i = s.IndexOf("P", i + 1)
        Loop

    End Sub

End Module


' run:
' 
' P PH PHP, Java Python
' PH PHP, Java Python
' PHP, Java Python
' P, Java Python
' Python

 

70+ SQL courses for beginners and professionals