Concatenate strings in Console.WriteLine statement

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