1.?手机ֻ??齱??ϷԴ??????
2.急寻VB抽奖程序代码
3.求一个公司员工抽奖易语言源码。要精致一点的抽奖抽奖。

?游戏源码p源ֻ??齱??ϷԴ??????

       &#;

import java.awt.Color;//界面不是很高大上档次，但是下载as3430源码能满足你的基本需求，希望对你有用

       import java.awt.Font;

       import java.awt.GridLayout;

       import java.awt.event.ActionEvent;

       import java.awt.event.ActionListener;

       import javax.swing.JButton;

       import javax.swing.JFrame;

       import javax.swing.JOptionPane;

       import javax.swing.border.Border;

       import javax.swing.border.LineBorder;

       public class 抽奖游戏 extends JFrame {

        static 抽奖游戏 frame;

        public 抽奖游戏() {

         setLayout(new GridLayout(3,手机 3, 3, 3));

         Border border = new LineBorder(Color.BLUE, 4);

         JButton l1 = new JButton();

         JButton l2 = new JButton();

         JButton l3 = new JButton();

         JButton l4 = new JButton();

         JButton l5 = new JButton();

         JButton l6 = new JButton();

         JButton l7 = new JButton("祝你好运");

         JButton l8 = new JButton("中奖规则");

         JButton l9 = new JButton("再次抽奖");

         l1.setBorder(border);

         l2.setBorder(border);

         l3.setBorder(border);

         l4.setBorder(border);

         l5.setBorder(border);

         l6.setBorder(border);

         l7.setBorder(border);

         l8.setBorder(border);

         l9.setBorder(border);

         String[] num2 = {  "1", "2", "3", "4", "5", "6" };

         l8.addActionListener(new ActionListener() {

          public void actionPerformed(ActionEvent arg0) {

           // TODO Auto-generated method stub

           JOptionPane.showMessageDialog(null, "游戏规则:\n" + "特等奖:\n"

             + "第一行或者第二行出现的数字全部相同\n"

             + "第一第二行出现升序的1,2,3,4,5,6或者降序的6,5,4,3,2,1\n" + "一等奖\n"

             + "1:第一行或第二行的数字降序排列或者升序排列\n"

             + "2:第一行或者第二行相邻的按钮出现一样的数字\n");

          }

         });

         l9.addActionListener(new ActionListener() {

          @Override

          public void actionPerformed(ActionEvent e) {

           // TODO Auto-generated method stub

           l1.setText("*");

           l2.setText("*");

           l3.setText("*");

           l4.setText("*");

           l5.setText("*");

           l6.setText("*");

           l7.setBackground(Color.lightGray);

           l7.setText("离中奖不远了！");

          }

         });

         l6.addActionListener(new ActionListener() {

          public void actionPerformed(ActionEvent arg0) {

           // TODO Auto-generated method stub

           int j1 = (int) (Math.random() * ) % 6;

           l1.setText(num2[j1]);

           int j2 = (int) (Math.random() * ) % 6;

           l2.setText(num2[j2]);

           int j3 = (int) (Math.random() * ) % 6;

           l3.setText(num2[j3]);

           int j4 = (int) (Math.random() * ) % 6;

           l4.setText(num2[j4]);

           int j5 = (int) (Math.random() * ) % 6;

           l5.setText(num2[j5]);

           int j6 = (int) (Math.random() * ) % 6;

           l6.setText(num2[j6]);

           if (j1 == j2 && j2 == j3 || j4 == j5 && j5 == j6 || j1 == 1

             && j2 == 2 && j3 == 3 && j4 == 4 && j5 == 5 && j6 == 6

             || j1 == 6 && j2 == 5 && j3 == 4 && j4 == 3 && j5 == 2

             && j6 == 1) {

            l7.setBackground(Color.red);

            l7.setText("特等奖");

           } else if (j1 > j2 && j2 > j3 || j3 > j2 && j2 > j1 || j4 > j5

             && j5 > j6 || j6 > j5 && j5 > j4 || j1 == j2

             && j5 == j4 || j1 == j2 && j5 == j6 || j3 == j2

             && j4 == j5 || j5 == j6 && j2 == j3) {

            l7.setBackground(Color.YELLOW);

            l7.setText("一等奖");

           } else {

            l7.setBackground(Color.lightGray);

            l7.setText("未中奖，抽奖抽奖加油！游戏源码p源");

           }

          }

         });

         l5.addActionListener(new ActionListener() {

          public void actionPerformed(ActionEvent arg0) {

           // TODO Auto-generated method stub

           int j1 = (int) (Math.random() * ) % 6;

           l1.setText(num2[j1]);

           int j2 = (int) (Math.random() * ) % 6;

           l2.setText(num2[j2]);

           int j3 = (int) (Math.random() * ) % 6;

           l3.setText(num2[j3]);

           int j4 = (int) (Math.random() * ) % 6;

           l4.setText(num2[j4]);

           int j5 = (int) (Math.random() * ) % 6;

           l5.setText(num2[j5]);

           int j6 = (int) (Math.random() * ) % 6;

           l6.setText(num2[j6]);

           if (j1 == j2 && j2 == j3 || j4 == j5 && j5 == j6 || j1 == 1

             && j2 == 2 && j3 == 3 && j4 == 4 && j5 == 5 && j6 == 6

             || j1 == 6 && j2 == 5 && j3 == 4 && j4 == 3 && j5 == 2

             && j6 == 1) {

            l7.setBackground(Color.red);

            l7.setText("特等奖");

           } else if (j1 > j2 && j2 > j3 || j3 > j2 && j2 > j1 || j4 > j5

             && j5 > j6 || j6 > j5 && j5 > j4 || j1 == j2

             && j5 == j4 || j1 == j2 && j5 == j6 || j3 == j2

             && j4 == j5 || j5 == j6 && j2 == j3) {

            l7.setBackground(Color.YELLOW);

            l7.setText("一等奖");

           } else {

            l7.setBackground(Color.lightGray);

            l7.setText("未中奖，下载加油！手机");

           }

          }

         });

         l4.addActionListener(new ActionListener() {

          public void actionPerformed(ActionEvent arg0) {

           // TODO Auto-generated method stub

           int j1 = (int) (Math.random() * ) % 6;

           l1.setText(num2[j1]);

           int j2 = (int) (Math.random() * ) % 6;

           l2.setText(num2[j2]);

           int j3 = (int) (Math.random() * ) % 6;

           l3.setText(num2[j3]);

           int j4 = (int) (Math.random() * ) % 6;

           l4.setText(num2[j4]);

           int j5 = (int) (Math.random() * ) % 6;

           l5.setText(num2[j5]);

           int j6 = (int) (Math.random() * ) % 6;

           l6.setText(num2[j6]);

           if (j1 == j2 && j2 == j3 || j4 == j5 && j5 == j6 || j1 == 1

             && j2 == 2 && j3 == 3 && j4 == 4 && j5 == 5 && j6 == 6

             || j1 == 6 && j2 == 5 && j3 == 4 && j4 == 3 && j5 == 2

             && j6 == 1) {

            l7.setBackground(Color.red);

            l7.setText("特等奖");

           } else if (j1 > j2 && j2 > j3 || j3 > j2 && j2 > j1 || j4 > j5

             && j5 > j6 || j6 > j5 && j5 > j4 || j1 == j2

             && j5 == j4 || j1 == j2 && j5 == j6 || j3 == j2

             && j4 == j5 || j5 == j6 && j2 == j3) {

            l7.setBackground(Color.YELLOW);

            l7.setText("一等奖");

           } else {

            l7.setBackground(Color.lightGray);

            l7.setText("未中奖，抽奖抽奖加油！游戏源码p源五八弟源码");

           }

          }

         });

         l3.addActionListener(new ActionListener() {

          public void actionPerformed(ActionEvent arg0) {

           // TODO Auto-generated method stub

           int j1 = (int) (Math.random() * ) % 6;

           l1.setText(num2[j1]);

           int j2 = (int) (Math.random() * ) % 6;

           l2.setText(num2[j2]);

           int j3 = (int) (Math.random() * ) % 6;

           l3.setText(num2[j3]);

           int j4 = (int) (Math.random() * ) % 6;

           l4.setText(num2[j4]);

           int j5 = (int) (Math.random() * ) % 6;

           l5.setText(num2[j5]);

           int j6 = (int) (Math.random() * ) % 6;

           l6.setText(num2[j6]);

           if (j1 == j2 && j2 == j3 || j4 == j5 && j5 == j6 || j1 == 1

             && j2 == 2 && j3 == 3 && j4 == 4 && j5 == 5 && j6 == 6

             || j1 == 6 && j2 == 5 && j3 == 4 && j4 == 3 && j5 == 2

             && j6 == 1) {

            l7.setBackground(Color.red);

            l7.setText("特等奖");

           } else if (j1 > j2 && j2 > j3 || j3 > j2 && j2 > j1 || j4 > j5

             && j5 > j6 || j6 > j5 && j5 > j4 || j1 == j2

             && j5 == j4 || j1 == j2 && j5 == j6 || j3 == j2

             && j4 == j5 || j5 == j6 && j2 == j3) {

            l7.setBackground(Color.YELLOW);

            l7.setText("一等奖");

           } else {

            l7.setBackground(Color.lightGray);

            l7.setText("未中奖，下载加油！手机");

           }

          }

         });

         l2.addActionListener(new ActionListener() {

          public void actionPerformed(ActionEvent arg0) {

           // TODO Auto-generated method stub

           int j1 = (int) (Math.random() * ) % 6;

           l1.setText(num2[j1]);

           int j2 = (int) (Math.random() * ) % 6;

           l2.setText(num2[j2]);

           int j3 = (int) (Math.random() * ) % 6;

           l3.setText(num2[j3]);

           int j4 = (int) (Math.random() * ) % 6;

           l4.setText(num2[j4]);

           int j5 = (int) (Math.random() * ) % 6;

           l5.setText(num2[j5]);

           int j6 = (int) (Math.random() * ) % 6;

           l6.setText(num2[j6]);

           if (j1 == j2 && j2 == j3 || j4 == j5 && j5 == j6 || j1 == 1

             && j2 == 2 && j3 == 3 && j4 == 4 && j5 == 5 && j6 == 6

             || j1 == 6 && j2 == 5 && j3 == 4 && j4 == 3 && j5 == 2

             && j6 == 1) {

            l7.setBackground(Color.red);

            l7.setText("特等奖");

           } else if (j1 > j2 && j2 > j3 || j3 > j2 && j2 > j1 || j4 > j5

             && j5 > j6 || j6 > j5 && j5 > j4 || j1 == j2

             && j5 == j4 || j1 == j2 && j5 == j6 || j3 == j2

             && j4 == j5 || j5 == j6 && j2 == j3) {

            l7.setBackground(Color.YELLOW);

            l7.setText("一等奖");

           } else {

            l7.setBackground(Color.lightGray);

            l7.setText("未中奖，抽奖抽奖加油！游戏源码p源");

           }

          }

         });

         l1.addActionListener(new ActionListener() {

          public void actionPerformed(ActionEvent arg0) {

           // TODO Auto-generated method stub

           int j1 = (int) (Math.random() * ) % 6;

           l1.setText(num2[j1]);

           int j2 = (int) (Math.random() * ) % 6;

           l2.setText(num2[j2]);

           int j3 = (int) (Math.random() * ) % 6;

           l3.setText(num2[j3]);

           int j4 = (int) (Math.random() * ) % 6;

           l4.setText(num2[j4]);

           int j5 = (int) (Math.random() * ) % 6;

           l5.setText(num2[j5]);

           int j6 = (int) (Math.random() * ) % 6;

           l6.setText(num2[j6]);

           if (j1 == j2 && j2 == j3 || j4 == j5 && j5 == j6 || j1 == 1

             && j2 == 2 && j3 == 3 && j4 == 4 && j5 == 5 && j6 == 6

             || j1 == 6 && j2 == 5 && j3 == 4 && j4 == 3 && j5 == 2

             && j6 == 1) {

            l7.setBackground(Color.red);

            l7.setText("特等奖");

           } else if (j1 > j2 && j2 > j3 || j3 > j2 && j2 > j1 || j4 > j5

             && j5 > j6 || j6 > j5 && j5 > j4 || j1 == j2

             && j5 == j4 || j1 == j2 && j5 == j6 || j3 == j2

             && j4 == j5 || j5 == j6 && j2 == j3) {

            l7.setBackground(Color.YELLOW);

            l7.setText("一等奖");

           } else {

            l7.setBackground(Color.lightGray);

            l7.setText("未中奖，助赢源码加油！");

           }

          }

         });

         Font font = new Font("", Font.BOLD, );

         l1.setFont(font);

         l2.setFont(font);

         l3.setFont(font);

         l4.setFont(font);

         l5.setFont(font);

         l6.setFont(font);

         l7.setFont(font);

         l8.setFont(font);

         l9.setFont(font);

         add(l1);

         add(l2);

         add(l3);

         add(l4);

         add(l5);

         add(l6);

         add(l7);

         add(l8);

         add(l9);

        }

        public static void main(String[] args) {

         // TODO Auto-generated method stub

         frame = new 抽奖游戏();

         frame.setTitle("抽奖大战");

         frame.setSize(, );

         frame.setLocationRelativeTo(null);

         frame.setVisible(true);

         frame.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);

        }

       }

急寻VB抽奖程序代码

       我和楼上的差不多，只是觉得楼上的随机抽奖并非随机的，他是由前往后快速循环，人少没关系，古月居源码人一多，这样有失游戏的公平性，并非绝对的随机抽奖。

       我就将他的程序进一步修改了一下。

       一个Command，大大源码一个timer，一个label

       名单存入电脑D盘的1.txt文件中，名单是一行一个名字即可。

       程序如下：

       Dim a() As String

       Dim i As Integer

       Private Sub Command1_Click()

       If Command1.Caption = "开始" Then

          Command1.Caption = "暂停"

          Timer1.Enabled = True

       ElseIf Command1.Caption = "暂停" Then

          Command1.Caption = "开始"

          Timer1.Enabled = False

       End If

       End Sub

       Private Sub Form_Load()

        

        i = 0

       '定义名单跳转的时间间隔为ms

        Timer1.Interval = 

        Timer1.Enabled = False

        Command1.Caption = "开始"

        

        Label1.Alignment = 2         '字体居中

        Label1.Font = "微软雅黑"     '字体为微软雅黑

        Label1.FontSize =          '设置字体大小

        

        '读取名单，注意：名单必须已经放在D盘的1.txt文件内

        Open "d:\1.txt" For Input As #1

        Do Until EOF(1)

         i = i + 1

        ReDim Preserve a(1 To i) As String

        Line Input #1, a(i)      '按行读取，所以名单名字必须一行一个

        Loop

        

       End Sub

       Private Sub Timer1_Timer()

       Dim j As Integer

         

         Randomize

         'i为名单的人数，Rnd为0-1之间的数，不包括0，1

         j = Int(1 + Rnd * i)

         Label1.Caption = a(j)

       End Sub

求一个公司员工抽奖易语言源码。要精致一点的。

       图像这个自己做的，我怕不符合审美观的。

       代码传上了。，照片按源码的意思存在D:\下 按1 2 3 4的次序命名

       3句话解决的问题。