抽奖
快到年终活动了，发个抽奖系统给大家使用：一、抽奖操作说明：
1、点击选中相应的奖项设置，没有选中时为“随机奖”；
2、设置抽取相应奖项的名额数（可在“设置”中预设）；
3、点击“开始”，或按“空格键”为开始运行抽奖程序；
（当没有下一步操作时，一直在随机读取，没有进行抽取模式）
4、按任意字母键，主键盘数字键，或点击鼠标， 则进入抽取模式，开始进行抽奖。
（抽奖为批量抽取模式，即一次抽取“名额”中规定的数量）
二、抽奖显示：
1、当设置为“慢速”时，中奖名单逐一显示。（适合于现场抽奖）
2、当设置为“快速”时，中奖名单批量显示。（适合于非现场抽奖）
三、数据操作：
1、点击“中奖统计：”，可以读取所有中奖名单；
2、选中相应的奖项，点击“读取”，可载入相应的中奖名单；
3、点击“保存”，相应保存表中记录；
4、点击“删除”，则删除表格选中的一条记录;
5、点击“刷新”，回到起始界面。
四、预先“设置”：
1、点击“设置”，进入设置相关字段、数据；
如“主题”、“奖项设置”、“名单设置”等
2、人员名单：
本抽奖系统，读取是ini中的记录数据。因此，需将人员名单存为ini文本记录。
（推荐方法：先建立人员名单的Excel表<List.xls> —>再点击“存为ini记录”，将人员名单存为ini文本记录)
（1）、Excel表格：xls、et格式
行1为表头，行2开始为人员名单记录
列1、列2、列3，为相关记录项，可为姓名、员工号、所在部门
（2）、Excel存为ini：
点击“读取表”，载入人员名单记录，再点击“存为ini记录”，将名单存为文本记录。
五、List.ini说明：
[字段名]
关键字=值
字段名: name
关键字：数字序列
值：姓名|员工号|所在部门
ini示例：
1=任我行|GENBT0126301|总经室
2=东方不败|GENBT0290491|信息管理部
3=西门吹牛|GENBT0127049|市场部
六、“残存记录”提示：
为防止程序错误关闭而设。
当打开“抽奖系统”时，可能会出现提示：“有残存记录,会影响抽奖！”
1、全新抽奖时，必须清理残余记录！点击“是”；
2、抽奖过程中断后，再打开“抽奖系统”时，点击“否”。
设计得不错，帖子也图文并茂 au3写的？这个能不能做弊？就是事先指定好的人获奖？ redapple2008 发表于 2019-10-22 11:21
au3写的？这个能不能做弊？就是事先指定好的人获奖？
是用au3写的。
为了公平，没有设置“做弊”的代码。 设计好炫，拿来学习学习。 很用心的设计，赞一个！ 可惜没有原码....
可惜没有原码.... 设计好炫，拿来学习学习。可惜没有原码.... 炫酷，不错。
页:
[1]