【原】【VBA实例】在立即窗口获得九九乘法口诀

1.案例说明

在早期的Basic版本中，程序运行结果主要依靠Print语句输出到终端。在VB中，Print

作为窗体的-一个方法，用来在窗体中显示信息。但是在VBA中，用户窗体已经不支持Print

方法了。在VBA中，Print 方法只能向“立即窗口”中输出程序的运行中间结果，供开发人员调试程序时使用。

本例使用Print 方法在立即窗口中输入九九乘法表。

2.关键技术.

在VBA中，Print 方法只能应用于Debug对象，其语法格式如下: 

Debug. Print [outputlist]

参数outputlist是要打印的表达式或表达式的列表。如果省略，则打印一个空白行。

●Print首先计算表达式的值，然后输出计算的结果。在outputlist参数中还可以使用分隔

符，以格式化输出的数据。格式化分隔符有以下几种: 

●Spc(n): 插入n个空格到输出数据之间;

●Tab(n): 移动光标到适当位置，n为移动的列数;

●分号:表示前后两个数据项连在一 起输出;

●逗号:以14个字符为- -个输出区，每个数据输出到对应的输出区。

3.编写代码

(1)在VBE中，单击菜单“插入/模块”命令插入-一个模块。

(2)在模块中输入以下代码:

Sub 乘法口诀()

For i = 1 To 9

    For j = 1 To i

    Debug.Print j; "x"; i; "="; i * j; " ";

    Next

    Debug.Print

'换行

Next

End Sub

运行代码效果如下