宣告一個可變寬度的字串變數

Dim surname As String 'surname can accept strings of variable length
surname = "Smith"
surname = "Johnson"