巧用VB编制缤纷多彩的万花筒

巧用VB编制缤纷多彩的万花筒
杨玉兰
【摘要】本文详细讲述了一个为初中起点的五年高职学生"量身制作"的趣味教学
项目万花筒的制作过程.
【期刊名称】《智能计算机与应用》
【年(卷),期】2010(000)005
【总页数】2页(P99-100)
【关键词】VB编程;VB绘图;代码
【作者】杨玉兰
【作者单位】江苏省徐州医药高等职业学校,江苏,徐州221116
【正文语种】中文
【中图分类】TP312
这款万花筒程序，是在讲授VB绘图时为学生量身订作的实践项目，不仅为学生充分展示了VB绘图的魅力无穷，更是激发了学生学习VB的无限兴趣。

1 万花筒程序效果展示
“万花筒”程序界面如图1所示：程序运行后，单击“波纹”、“方块”、“气泡”按钮后，相应的图案每隔1秒钟变幻，程序效果分别如图2，图3，图4所示。

单击“清除”按钮后则清除窗体中图案；单击“结束”按钮则终止程序。

2 制作界面
（1）启动VB，新建一个标准工程。

（2）设置窗体背景“BackColor”为黑色。

在窗体中添加三个时钟控件timer1，timer2，timer3,其Interval属性设置为1000，分别用于实现“万花筒”中的波纹、方块、气泡效果。

（3）添加五个命令按钮，其Caption属性分别为“波纹”、“方块”、“气泡”、“清除”及“结束”；将五个命令按钮的“Style”属性设置为“1-Graphical”，然后将其“Back-Color”属性设置为自己喜欢的颜色即可。

3 为各个控件注入生命之血—编写代码
4 结束语
万花筒程序不仅趣味盎然，涉及的VB编程知识十分丰富，有For语句的使用，有RGB函数的使用；同时用了三个时钟控件分别实现波纹、方块、气泡自动产生，
并用三个命令按钮对相应的时钟控件进行启动调用或关闭。

当然，程序的精华部分是有VB绘图Line、Circl方法的精巧应用。

参考文献
[1]王天华，万缨.Visual Basic程序设计实用教程.北京：清华大学出版社，2006-08.
[2]崔武子.界面设计与Visual Basic实训教程.北京：清华大学出版社，2006-01.
[3]刘炳文，编著.精通Visual Basic 6.0中文版.北京：电子工业出版社，1999.。