vba九九乘法表代码_Access设计九九乘法表

小时候，相信大家都背过九九乘法口诀。据说这个在春秋战国已经存在，源远流长。

顺序语句，条件语句和循环语句在任何编程语言中都离不开。所以很多入门示例都是要求做一个这样的口诀表。因为需要用循环语句。

在Access vba中，也可以非常方便创建 这样的口诀表，详细源码：

Private Sub 大九九_Click()

Dim i, j As Integer

For i = 1 To 9

For j = 1 To 8

Me.Text0 = Me.Text0 & i & "*" & j & "=" & i * j & ";"

Next j

Me.Text0 = Me.Text0 & i & "*" & j & "=" & i * j & Chr(13) & Chr(10)

Next i

End Sub

Private Sub 小九九_Click()

Dim i, j As Integer

For i = 1 To 9

For j = i To 8

Me.Text0 = Me.Text0 & i & "*" & j & "=" & i * j & ";"

Next j

Me.Text0 = Me.Text0 & i & "*" & j & "=" & i * j & Chr(13) & Chr(10)

Next i

End Sub

大九九乘法口诀表

小九九乘法口诀表