Imports System
Public Module Module1
Public Sub Main()
Dim s As String = "vb.net-c c++ c# java:python"
Dim arr() AS String = s.Split(New [Char]() {CChar(" "), CChar("-"), CChar(":")})
For i As Integer = 0 To arr.Length - 1
Console.WriteLine(arr(i))
Next
End Sub
End Module
' run:
'
' vb.net
' c
' c++
' c#
' java
' python
'