




版權說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權,請進行舉報或認領
文檔簡介
1、ublicpartialclassForm1:Formpublicinta;publicintb;publicinti;publicintab=newint12;/數(shù)組ab存放臨時的牌的圖片號publicintzhuangnumber;/用于存放莊家點數(shù)publicintgamernumber;/用于存放游戲者點數(shù)publicPictureBoxptb=newPictureBox12;publicForm1()InitializeComponent();/生成牌與點數(shù)privatevoidFirst(outinta,outintb,intq)Randomrd=newRandom();a=rd.
2、Next(0,51);if(a=0&a=4&a=8&a=12&a=16&a=20&a=24&a=28&a=32&a=48&a=0&q=0&a=4&a=8&a=12&a=16&a=20&a=24&a=28&a=32&a=48&a=0&q=21)b=10;elseb=1;elseb=0;Console.Read();for(i=0;igamernumber)for(i=1;i6;i+)if(abi!=100)this.ptbi.Image=this.imageList1.Imagesabi;this.label2.Text=zhuangnumber.ToString();MessageBox.Sh
3、ow(莊家贏了!開始下一局!”);elseif(zhuangnumber=gamernumber)for(i=1;i6;i+)if(abi!=100)this.ptbi.Image=this.imageList1.Imagesabi;this.label2.Text=zhuangnumber.ToString();MessageBox.Show(莊家贏了!開始下一局!”);elsefor(i=1;i6;i+)if(abi!=100)this.ptbi.Image=this.imageList1.Imagesabi;this.label2.Text=zhuangnumber.ToString()
4、;MessageBox.Show(你贏了!開始下一局!”);privatevoid結束ToolStripMenuItem_Click(objectsender,EventArgse)Application.Exit();/游戲規(guī)則在第二個Form上privatevoid游戲規(guī)則ToolStripMenuItem_Click(objectsender,EventArgse)Form2myform=newForm2();myform.Show();/開始在panel上添加PictureBox并設置其屬性,生成四張牌,各兩張(莊家有一張隱藏)privatevoid開始ToolStripMenuIte
5、m_Click_l(objectsender,EventArgse)for(i=0;i12;i+)this.ptbi=newPictureBox();this.ptbi.SizeMode=PictureBoxSizeMode.CenterImage;this.abi=newint();this.ptbi.Visible=true;abi=100;/初始化數(shù)組abthis.ptbi.Image=this.imageListl.Images52;/初始化PicturBox的圖片for(i=0;i6;i+)this.panelT.Controls.Add(this.ptbi);this.ptbi.W
6、idth=85;this.ptbi.Height=120;this.ptbi.Top=11;this.ptbi.Left=17+85*i+15*(i+1);for(i=6;i12;i+)this.panelB.Controls.Add(this.ptbi);this.ptbi.Width=85;this.ptbi.Height=120;this.ptbi.Top=11;this.ptbi.Left=17+85*(i-6)+15*(i-5);this.label2.Visible=true;this.lable4.Visible=true;First(outa,outb,zhuangnumber
7、);zhuangnumber=b;this.ptb0.Image=this.imageList1.Imagesa;ab0=a;First(outa,outb,gamernumber);if(ab0=a)while(ab0=a)First(outa,outb,gamernumber);gamernumber=b;this.ptb6.Image=this.imageList1.Imagesa;ab6=a;elsegamernumber=b;this.ptb6.Image=this.imageList1.Imagesa;ab6=a;First(outa,outb,zhuangnumber);if(a
8、b0=a|ab1=a)while(ab0=a|ab1=a)First(outa,outb,zhuangnumber);zhuangnumber=zhuangnumber+b;ab1=a;elsezhuangnumber=zhuangnumber+b;ab1=a;this.label2.Text=未知!;First(outa,outb,gamernumber);if(ab0=a|ab1=a|ab2=a)while(ab0=a|ab1=a|ab6=a)First(outa,outb,gamernumber);gamernumber=gamernumber+b;this.ptb7.Image=thi
9、s.imageList1.Imagesa;ab7=a;elsegamernumber=gamernumber+b;this.ptb7.Image=this.imageList1.Imagesa;ab7=a;this.lable4.Text=gamernumber.ToString();/要的牌必須是未出現(xiàn)的牌,接著檢測是否有點數(shù)爆了privatevoidbuttoninfo_Click(objectsender,EventArgse)Bijiao(outa,outb,zhuangnumber,ab);for(i=1;i5;i+)if(abi!=100&abi+1=100)abi+1=a;break;zhuangnumber=zhuangnumber+b;this.label2.Text=未知!;Bijiao(outa,outb,gamernumber,ab);for(i=7;i21&gamernumber21)for(i=1;i21)for(i=1;i21)for(i=1;i6;i+)if(abi!=100)this.ptbi.Image=this.imageList1.Imagesabi;this.label2.Text=zhuangnumber.ToString();MessageBox.Show(你爆了!莊家贏了!開始下一
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預覽,若沒有圖紙預覽就沒有圖紙。
- 4. 未經(jīng)權益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負責。
- 6. 下載文件中如有侵權或不適當內(nèi)容,請與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準確性、安全性和完整性, 同時也不承擔用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。
最新文檔
- 老人同居協(xié)議書范本
- 退租交房協(xié)議書范本
- 用地拆遷補償協(xié)議書
- 散伙分家協(xié)議書范本
- 學校廁所維修協(xié)議書
- 商鋪拍賣變賣協(xié)議書
- 結算變更協(xié)議書范本
- 融資保密協(xié)議書范本
- 停息掛賬洽談協(xié)議書
- 入股餐飲協(xié)議書范本
- 湖南水泥倉施工方案
- 肺栓塞的護理診斷及護理措施
- 老人預防電信詐騙
- 2024年11月-礦山隱蔽致災因素普查
- 【2025新教材】教科版一年級科學下冊全冊教案【含反思】
- 《經(jīng)濟學原理》課件
- 第16課《有為有不為 》課件-2024-2025學年統(tǒng)編版語文七年級下冊
- 2025年寧波職業(yè)技術學院高職單招職業(yè)技能測試近5年??及鎱⒖碱}庫含答案解析
- 《節(jié)奏與旋律》課件
- 2024年05月新疆克拉瑪依金龍國民村鎮(zhèn)銀行招考15名客戶經(jīng)理筆試歷年參考題庫附帶答案詳解
- 神經(jīng)源性膀胱的護理
評論
0/150
提交評論