VB程序设计-九九乘法表.doc

《VB程序设计-九九乘法表.doc》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、VB程序设计－九九乘法表（作者：草原飞狼2014年5月31日）声明：仅供学习与交流使用，高手请飘过，谢谢！所有代码都是个人亲自编写并调试成功。布局运行界面（1）运行界面（2）源代码如下：PrivateSubCommand1_Click()Rem乘法表算法一Dimi,jAsIntegerFori=1To9Forj=1Toiexpss=i&"*"&j&"="&i*jForm1.Picture1.PrintTab((j-1)*8+1);'控制每个输出表达式的输出位置Form1.Picture1.Printexpss;NextjForm1.Picture1.PrintN

2、extiEndSubPrivateSubCommand2_Click()Rem乘法表算法二Dimi,jAsIntegerFori=9To1Step-1Forj=1Toiexpss=j&"*"&i&"="&i*jForm1.Picture1.PrintTab((j-1)*10+1);'控制每个输出表达式的输出位置Form1.Picture1.Printexpss;NextjForm1.Picture1.PrintNextiEndSubPrivateSubCommand3_Click()Rem清空Form1.Picture1.ClsEndSubPrivateSubC

3、ommand4_Click()Rem退出Dimint_msgAsIntegerint_msg=MsgBox("单击“是”退出程序,单击“否”返回程序！",vbYesNo+vbQuestion+vbDefaultButton1,"退出提示")Ifint_msg=vbYesThenUnloadMeEndIfEndSubPrivateSubForm_Load()Rem初始化WithPicture1.FontName="宋体".FontSize=12.FontBold=True.ForeColor=&H80FF&EndWithEndSub