Public Sub Main()
 Dim Name As String

  Name = "Joe"
  Name = Name & " Smith"
  Debug.Print "My full name is ", Name
  Name = "Mister " & Name & " Jr."
  Debug.Print Name, " is my full name."
End Sub