Debug.Print   向VBA調(diào)試窗口輸出文本信息

Sub multi()
    Dim i, j
    For i = 1 To 9
        For j = 1 To 9
            Debug.Print Left((i & " X " & j & " = " & (i * j) & " ") & String(13, " "), 13);
        Next
        Debug.Print
    Next
End Sub

以打印9*9乘法表為例：

* Debug.Print               不跟參數(shù)，不打印任何內(nèi)容，直接換行，等同于打印換行符

* Debug.Print "ssss"     打印字符串"ssss"并換行

* Debug.Print "ssss";    打印字符串"ssss"不換行

* Debug.Print  var        打印變量var的值

其他相關(guān)內(nèi)容

*  &                     字符串拼接

*  String(n,"s")     將s重復(fù)n遍生成字符串

*  Left("s",n)         從字符串“s”中，從左邊開始，截取長度為n的子串