public class Test
public Shared Sub Main
Dim aryStrings() As String = {"string1", "string2", "string3", "string4"}
Dim strLongString As String
strLongString = String.Concat(aryStrings)
Console.WriteLine(strLongString)
End Sub
End class
string1string2string3string4