Module Module1
Sub Main()
Dim WebSite As String
Dim Publisher As String = "AAAA"
Console.WriteLine("AAAA: " & Publisher)
WebSite = "CCCC." & Publisher & ".DDDD"
Console.WriteLine("String one " & WebSite)
End Sub
End Module
AAAA: AAAA
String one CCCC.AAAA.DDDD