Access設(shè)計(jì)九九乘法錶

小時(shí)候，相信大傢都背過九九乘法口訣。據(jù)説這箇在春鞦戰(zhàn)國已經(jīng)存在，源遠(yuǎn)流長。

順序語句，條件語句和循環(huán)語句在任何編程語言中都離不開。所以很多入門示例都是要求做一箇這樣的口訣錶。因爲(wèi)需要用循環(huán)語句。

在Access vba中，也可以非常方便創(chuàng)建 這樣的口訣錶，詳細(xì)源碼：

Private Sub 大九九_(tái)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 小九九_(tái)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

大九九乘法口訣錶

小九九乘法口訣錶