code93b.txt

VB大全（精华版）源代码

Public Sub Main ()
  Dim I as Integer,  StringVar as String * 10

  StringVar = "A" 
  For I = 66 to 90
     StringVar = Trim(StringVar) & Chr(I)
  Next
  Debug.Print "The string contains"