Access数据库抽奖系统设计

抽奖功能的实现

　　通过抽奖模块实现最终抽奖功能。

　　通过奖励等级组合框控制抽奖等级，通过抽奖数量组合框控制每批次抽奖数量，通过总抽奖数组合框控制总抽奖数。当奖励等级分别为一、二、三等奖时，抽奖数量和总抽奖数默认值分别

　　为5、10、10和10、30、50。各组合框的具体数值也可以通过上下箭头控制。抽奖界面如图2。

　　
　　图 2 抽 奖 界 面

　　其程序设计比较简单，主要程序如下:

　　……
　　If Me!奖励等级.Value = 1 Then
　　　Me!总数量.Value = 10
　　End If
　　If Me!奖励等级.Value = 2 Then
　　　Me!总数量.Value = 30
　　End If
　　If Me!奖励等级.Value = 3 Then
　　　Me!总数量.Value = 50
　　End If
　　Forms!抽奖.Q_抽奖统计.Requery
　　If Me!奖励等级.Value = 1 Then
　　　Me!抽奖数量.Value = 5
　　End If
　　If Me!奖励等级.Value = 2 Or Me!奖励等级.Value = 3 Then
　　　Me!抽奖数量.Value = 10
　　End If
　　……

　　通过点击开始按钮开始抽奖，同时按钮标题变为停止，再次点击停止此批次抽奖，同时按钮标题变为开始，继续点击开始下一批次抽奖，如此反复，直至完成总抽奖数，此时提示“抽奖总数已到”，如果未完成总抽奖数就开始另外一轮抽奖，则提示“抽奖限制”。

共3页: 上一页 [1] 2 [3] 下一页