Zeichenkette über VBA heraussenden

Bin Anfänger.....
Ich möchte mehrere Werte (die in Textboxen) stehen über die Serielle 
Schnittstelle in VBA ausgeben.

Einzelne Zeichen funktionieren auch:

SerialPort1.Write("J" & vbCr)

Wie baue ich jetzt einen String aus verschiedene Textboxen zusammen den 
ich der Funktion (siehe oben) übergeben kann?

Ich habe es mal so versucht geht aber nicht....

Dim dummy As String
Dim dummy1 As String
Dim dummy2 As String

dummy1 = TextBox1.Text
dummy2 = TextBox2.Text

dummy = dummy1 & dummy2

SerialPort1.Write(dummy & vbCr)