抽奖程序源代码 VB编写 随机抽取 不重复 新版本

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。 请确保程序的当前目录下有存在上述文件，否则会报错。