VB6.0 抽奖程序 2010-01-17 在 Windows XP 下调试通过
作者:邓忠 dwjnhkbc123@163.com QQ:751667650
该程序是本人在翔德电子科技(深圳)有限公司就职期间用Visual Basic为2010年尾牙晚会做的一个小抽奖程序,仅供学习参考,不得用于商业用途,否则后果自负。
启动时会生成随机顺序的抽奖名单幸运星名单已经随机确定。运行时随机滚动抽奖名单,按抽奖(或回车键)逐一揭晓幸运星。
关闭程序时会生成幸运星名单luckystars.txt 记录有时间 所中奖项 奖品名 姓名,请及时保存luckystars.txt,以免被下次运行程序时覆盖。
本程序awards.txt保存各奖项目 如: 三等奖 二等奖 awardsname.txt 保存奖项对应的奖品名 如: 电吹风 电饭煲 awardstotal.txt 保存各奖项对应的个数 如: 100 80。
list.txt 保存抽奖名单 为了区分重名的人 可以加入部门名称,工号等。
背景文件为luckybg.jpg,象素1024*768。
请确保程序的当前目录下有存在上述文件,否则会报错。
1