Access中如何在立即窗口获得九九乘法口诀?

如题所述

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
运行代码效果如下
温馨提示:答案为网友推荐,仅供参考
第1个回答  2020-07-04
Private Sub Command4_Click()
Dim m As Integer
Dim n As Integer
Dim t, s As String
m = 1
n = 1
t=""
For m = 1 To 9
s=""
For n = m To 9
s =s& m & "×" & n & "=" & m * n & ""
Next n
t = t & s
Next m
Me.Text5 = t
End Sub本回答被网友采纳

相关了解……

你可能感兴趣的内容

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 非常风气网