安徽彩票大奖 欧洲百万乐透大奖 七星彩17049规律大奖 双色球中大奖领奖过程 3d近期中大奖故事 广州番禺中福彩大奖的 鸡男注定会中大奖 2016江苏彩民中大奖 趣彩网大奖网黑平台 大乐透4.97亿大奖 霍邱一彩民6元中双色球547万大奖 双色球黑龙江中大奖图 体育彩票中大奖名单 什么样的人能中大奖 彩票大奖作假

Access设计九九乘法表

2017-12-15 16:50:00
tmtony8
原创
1432

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

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


在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


大九九乘法口诀表




小九九乘法口诀表


    分享
    ? 1999-2019 Office交流网?? 中山市天鸣科技发展有限公司 粤ICP备10043721号-5 SQL查询:18
    内存占用:7.75MB
    PHP 执行时间:0.2
    双色球大奖2000年
    安徽彩票大奖 欧洲百万乐透大奖 七星彩17049规律大奖 双色球中大奖领奖过程 3d近期中大奖故事 广州番禺中福彩大奖的 鸡男注定会中大奖 2016江苏彩民中大奖 趣彩网大奖网黑平台 大乐透4.97亿大奖 霍邱一彩民6元中双色球547万大奖 双色球黑龙江中大奖图 体育彩票中大奖名单 什么样的人能中大奖 彩票大奖作假
    不朽情缘官方网站 功夫派怎么刷金龙珠 大乐透开奖结果查询 快乐10分开奖5237 wwe摔角传奇游戏手机版下载 76人和服 浙江风采福彩15选5走势图 古怪猴子官网 冰球突破豪华版 福彩欢乐生肖中奖规则