Class Program Shared Sub Main() Dim chars() As Char = { "w"c, "o"c, "r"c, "d"c } Dim string1 As New String(chars) Console.WriteLine(string1) End SubEnd Class