Imports System
Public Class Test
Public Shared Sub Main()
Dim s As String = "substring 1" +
" " +
"substring 2" +
" " +
"substring 3" +
" " +
"substring 4"
Console.WriteLine(s)
End Sub
End Class
' run:
'
' substring 1 substring 2 substring 3 substring 4
'