Imports System Public Class ConcatTest Public Shared Sub Main() Dim s As String() = {"hello ", "and ", "welcome ", "to ", "this ", "demo! "} Console.WriteLine(String.Concat(s)) Array.Sort(s) Console.WriteLine(String.Concat(s)) End Sub End Class