2014年11月20日 星期四

賽馬遊戲與亂數


public partial class Form1 : Form
    {
        int i,j=0,k,r;
        public Form1()
        {
            InitializeComponent();
         
        }

        private void button1_Click(object sender, EventArgs e)
        {
            Random random1 = new Random();
            //這邊Random為一種物件類別,宣告random1為此類別
            if (j == 0)
            {
                j = 1;
                i = random1.Next(1, 7);
                label1.Text = i.ToString();
                k = (Form1.ActiveForm.Size.Width - pictureBox1.Left) / 32;
                for (r = 1; r <= i; r++)
                {
                    pictureBox1.Left = pictureBox1.Left + k;
                    Application.DoEvents();
                    Thread.Sleep(100);
                    Application.DoEvents();

                    // Thread.Sleep(100)可讓程式等待0.1秒
                    //Application.DoEvents();可在等待過程中執行其他行程式

                    if (pictureBox1.Left+ pictureBox1.Width >= Form1.ActiveForm.Size.Width) {
                        r = i + 1;
                        j = 2;
                        MessageBox.Show("play1 win");
                    }
                }
             
            }
            else if (j == 1)
            {
                j = 0;
                i = random1.Next(1, 7);
                label2.Text = i.ToString();
                k = (Form1.ActiveForm.Size.Width - pictureBox1.Left) / 32;
                for (r = 1; r <= i; r++)
                {
                    pictureBox2.Left = pictureBox2.Left + k;
                    Application.DoEvents();
                    Thread.Sleep(100);
                    Application.DoEvents();
                    if (pictureBox2.Left +pictureBox2.Width >= Form1.ActiveForm.Size.Width)
                    {
                        r = i + 1;
                        j = 2;
                        MessageBox.Show("play2 win");
                    }
                }
             
            }
        }
-------------------------------------------------------------------------------------
執行畫面

沒有留言:

張貼留言