vb6.0怎么制作一个抽奖小程序? vb6.0抽奖器的制作方法

来源：脚本之家　2021-12-24 18:22:49

商场搞活动想要制作一个抽奖程序，今天我们就来看看使用vb6.0制作抽奖小程序的教程。

VB 6.0中文企业版免费下载(206M)

类型：编译工具大小：206MB语言：简体中文时间：2020-01-08查看详情

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，起到的作用是触发器停止工作。

推荐DIY文章

精彩新闻