code97a.txt

VB大全（精华版）源代码

Public Sub Main()
 Dim Book_Title As String

  Book_Title = " 1001 Visual Basic Programmer's Tips"
  Debug.Print Book_Title & " contains " & Str(Len(Book_Title)) & " characters."
End Sub