Imports System
Imports System.Text.RegularExpressions
Public Class Test
Public Shared Sub Main()
Dim s As String = "Hello.world, have a nice day"
Dim arr As String() = Regex.Split(s, "([.,])")
For Each i As String In arr
Console.WriteLine(i)
Next
End Sub
End Class
SW1wb3J0cyBTeXN0ZW0KSW1wb3J0cyBTeXN0ZW0uVGV4dC5SZWd1bGFyRXhwcmVzc2lvbnMKClB1YmxpYyBDbGFzcyBUZXN0CglQdWJsaWMgU2hhcmVkIFN1YiBNYWluKCkKCQkKCQlEaW0gcyBBcyBTdHJpbmcgPSAiSGVsbG8ud29ybGQsIGhhdmUgYSBuaWNlIGRheSIKCQlEaW0gYXJyIEFzIFN0cmluZygpID0gUmVnZXguU3BsaXQocywgIihbLixdKSIpCiAgICAgICAgRm9yIEVhY2ggaSBBcyBTdHJpbmcgSW4gYXJyCiAgICAgICAgICAgIENvbnNvbGUuV3JpdGVMaW5lKGkpCiAgICAgICAgTmV4dAoJCQoJRW5kIFN1YgpFbmQgQ2xhc3M=