1抽奖程序效果图

 

抽奖代码python 抽奖代码编程教学_Click



2抽奖程序功能设计

1、人员清单、奖项、抽奖记录等数据均在存储在Excel中，易于维护；2、抽奖结束时即可打印中奖人员清单及纪念奖清单，数据可排序、可筛选；3、在Excel中即可定义奖项数量、一次抽取数量、奖品图片等；4、可临时追加抽奖人数；5、每个奖项抽取完成后可显示当前奖项中奖人员清单；6、可自定义背景图片；7、限定每次按键间隔时间约5秒钟，防止误操作；8、限制抽奖数量不超过设定数量，并在屏幕上同步显示已抽取数量；9、奖品图片展示。


3 抽奖原理

人员名单来自人事，按工号升序排序，首次读入程序后，以随机方式打乱顺序，在此基础上，随机抽取。开始抽奖时，程序每隔0.01秒随机取得一个号，屏幕上每0.1秒显示一次当前随机取得的号，当停止抽奖时，程序随机抽取一个号作为中奖号码，并从人员清单中删除。


4运行环境

开发语言c#，开发工具VS2008，运行环境windows XP/VISTA、office2007、.netFrameWork3.5。


5部分代码讲解


5.1取得系统路径

String path = System.Windows.Forms.Application.StartupPath + "\\";


5.2取得电脑屏幕的宽度和高度

int screenWidth = System.Windows.Forms.Screen.GetBounds(this).Width;

int screenHeight = System.Windows.Forms.Screen.GetBounds(this).Height;


5.3设置背景图片，并设置图片自动伸缩

this.BackgroundImage = Image.FromFile(path + "bg.jpg");

this.BackgroundImageLayout = ImageLayout.Stretch;


5.4以RGB方式设置背景颜色

this.BackColor = Color.FromArgb（196, 14, 10）;


5.5读取setting.txt中颜色的RGB值，setting.txt内容是color=196,14,10

String color = "";
try
{
        using (StreamReader sr = new StreamReader(path + "setting.txt"))
        {
            String line;
            while ((line = sr.ReadLine()) != null)
            {
                if (line.StartsWith("color"))
                    color = line;
            }
        }
}
catch (Exception ex1) { MessageBox.Show("未找到文件setting.txt"); }


5.6将字符串拆分成数组，例如color=196,14,10

color = color.Substring(6);

String[] arr = color.Split(',');

//arr[0],arr[1],arr[2]


5.7设置label背景透明，即采用Form背景，以免快速变换时出现白色区域

this.labelMsg.BackColor = Color.Transparent;

设置label大小随文字大小变化

this.labelMsg.AutoSize = true;

this.labelMsg.Text = "";

设置label字体

this.labelMsg.Font = new System.Drawing.Font("LiSu", 16F, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, ((byte)(134)));


5.8设置窗体Form居中

this.Location = new System.Drawing.Point(Convert.ToInt32(screenWidth / 2) - Convert.ToInt32(this.Width / 2), Convert.ToInt32(screenHeight / 2) - Convert.ToInt32(this.Height / 2));



5.9操作Excel

首先引用

using Excel = Microsoft.Office.Interop.Excel;

定义变量

private Excel.Application excel;

private Excel.Workbook wb;//data.xls文件

private Excel.Worksheet renyuanWs, jiangxiangWs, rizhiWs, liwaiWs;

private String dataName = "";

private Excel.XlFileFormat version = Excel.XlFileFormat.xlExcel8;//2003版本


打开Excel进程

excel = new Excel.Application();

不显示Excel界面

excel.Visible = false;

不显示提示或警告

excel.DisplayAlerts = false;

打开data.xls

wb = excel.Workbooks.Add(path + "data.xls");


定义多个Excel区域，

Excel.Range range = null;

取得第一个Sheet

Excel.Worksheet s = (Excel.Worksheet)wb.Worksheets[1];

从第二行读取

for (int i = 2; i < s.UsedRange.Rows.Count + 1; i++)

{

    取得第一个单元格或区域

range = s.get_Range(s.Cells[i, 1], s.Cells[i, 1]);
range.Value2即是range中的内容
    if (range.Value2 !=null && range.Value2.ToString() != "")
MessageBox.Show(range.Value2.ToString());
else
break;
}

按顺序设置工作表的单元格内容

String now = DateTime.Now.ToLocalTime().ToString();

int r = rizhiWs.UsedRange.Rows.Count;

ws.Cells[r + 1, 1] = now;



保存Excel

wb.SaveAs(dataName, version, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Excel.XlSaveAsAccessMode.xlExclusive, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing);



5.10取得随机数

new Random(new Random().Next(100)).Next(100);


5.11动态创建图片按钮

for (int i = 0; i < 10; i++)
{
System.Windows.Forms.PictureBox btn = new System.Windows.Forms.PictureBox();
每行显示6个按钮
if (i > 0 && i % 6 == 0)
level++;
btn.Location = new System.Drawing.Point(30 + (i - 6 * level) * 93, 30 + level * 38);
    加上btn前缀便于识别
    btn.Name = "btn" + i.ToString();
    btn.Size = new System.Drawing.Size(90, 34);
    设置图片按钮
    btn.Image = Image.FromFile(path + "001.jpg");
    btn.SizeMode = PictureBoxSizeMode.StretchImage;
    btn.BackColor = Color.Transparent;
    注册单击事件
    btn.Click += new System.EventHandler(btn_Click);
    btn.Cursor = Cursors.Hand;
    this.Controls.Add(btn);
}
在btn_Click中取得传递过来的对象
private void btn_Click(object sender, EventArgs e)
{
PictureBox pic = (PictureBox)sender;
}

5.12填充字符串到一定长度，便于显示整齐

String str = "abc"

str = new String(' ', 10 - str.Length);


5.13窗体全屏

private void mFullScreen()
{
try
{
if (this.WindowState == FormWindowState.Maximized)
{
this.WindowState = FormWindowState.Normal;
this.FormBorderStyle = FormBorderStyle.Sizable;
}
else
{
this.FormBorderStyle = FormBorderStyle.None;
this.WindowState = FormWindowState.Maximized;
}
}
catch (Exception ex) { MessageBox.Show(ex.ToString()); }
}

5.14注册按键事件

比如按空格键开始或停止抽奖，这里我设置通过PageUp或是PageDown按键，这样就可通过翻页笔来控制
this.KeyDown += new System.Windows.Forms.KeyEventHandler(this.Form1_KeyDown);
private void Form1_KeyDown(object sender, KeyEventArgs e)
{
    if (e.KeyValue == 32 || e.KeyValue == 33 || e.KeyValue == 34)
    {
        ;//抽奖代码
    }
}


5.15取得纳秒

long l = DateTime.Now.Ticks;


5.16显示或隐藏图片按钮

private void mShowCon(bool show)
{
try
{
foreach (Control con in this.Controls)
{
if (con.Name.StartsWith("btn") || con.Name.StartsWith("img"))
{
if (con.Visible == show)
break;
con.Visible = show;
}
}
}
catch (Exception ex) { MessageBox.Show(ex.ToString()); }
}


5.17打开第二个窗体

Form f = new Form2();
可以传递参数
Form f = new Form2("5");
f.Show();

在Form2中接收传递过来的值
public Form2(String str)
{
    InitializeComponent();
    Console.WrietLine(str);
}