商场搞活动想要制作一个抽奖程序,今天我们就来看看使用vb6.0制作抽奖小程序的教程。
1、首先启动vb6.0,执行文件-新建命令,弹出新建工程对话框,在该对话框中选择标准的exe后点击打开按钮,进入vb程序主界面。
2、在主界面中,按住鼠标左键按住窗体周围的任意一个小正方形进行拖拽,调节窗体的大小,直至自己满意为止。
3、选择窗体,在其右边的属性中找到boderstyle属性,设置属性值为none,接着再找到startupposition属性,修改属性值为2-屏幕中心,再次修改backcolor属性值为淡黄色。
4、在工具箱里选择frame1,然后在窗体上进行拖拽,大小比窗体小一些,并调整其位置,使其居中,在属性窗口找到backcolor属性修改其属性值为粉红色,这样设置看起来就有层次感了。
5、在工具箱里双击标签控件两次,在frame1中显示两个标签控件,修改lable1的caption属性名称为“幸运抽奖”,修改label2的caption属性为“0”,同时修改这两个标签控件的backcolor属性为粉色,和frame控件保持一致。
6、分别选择label1和label2,修改其font属性,打开字体对话框选择字体为王羲之书法字体,字形为常规,字号为三号,点击确定按钮。
7、选择工具箱里按钮控件,连续双击四次,在frame1上显示四个按钮,调整他们在frame1上的位置,使排列整齐,并依次修改四个按钮的caption属性,属性值依次为“号码滚动”、“号码停止”、“号码重置”、“退出程序”。
8、接着选择工具箱里计时器控件并双击,在frame1上显现出来该控件,该控件的作用很大,起到计时作用,同时需要注意的是在程序运行时控件是不显示出来的。
9、双击号码滚动控件,进入代码编辑区域,对象选择command1,过程选择click事件,在其输入代码为
Timer1.Enabled = True
主要作用是触发器开始工作。
10、双击号码停止按钮,输入代码为Timer1.Enabled = False,起到的作用是触发器停止工作。