code99a.txt

来自「VB大全（精华版）源代码」· 文本 代码 · 共 10 行

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