




版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、ublicpartialclassForm1:Formpublicinta;publicintb;publicinti;publicintab=newint12;/数组ab存放临时的牌的图片号publicintzhuangnumber;/用于存放庄家点数publicintgamernumber;/用于存放游戏者点数publicPictureBoxptb=newPictureBox12;publicForm1()InitializeComponent();/生成牌与点数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();/游戏规则在第二个Form上privatevoid游戏规则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;/初始化数组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();/要的牌必须是未出现的牌,接着检测是否有点数爆了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. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 2024年淄博桓台县教体系统招聘工作人员笔试真题
- 2024年肇庆市高要区教育局赴高等院校招聘教师笔试真题
- 2024-2025学年高中语文 第一单元 二 克己复礼教学实录 语文版选修《论语》选读
- 2024年盐城市亭湖区招聘教师笔试真题
- 2024年无锡市市属事业单位统一招聘笔试真题
- 人要自强 教案
- 墙体的保温与隔热墙体保温陈冬74课件
- 品茗BIM赛项V答辩课件
- 学前教育的价值重要性
- 学生心理问题的识别与评估
- 5.2《稻》课时练-【中职专用】高二语文同步(高教版2023拓展模块下册)
- 2025年河南农业职业学院单招职业技能测试题库及参考答案
- 人教PEP版英语五年级下册全册教案
- 2025年个体古董借款质押合同示范本
- 交管12123驾驶证减分学法题库(部分)(图文版)
- 油气藏产能预测模型-深度研究
- 2025年四川成都市蒲江乡村建设发展集团有限公司招聘笔试参考题库附带答案详解
- 2024版房产经纪人无底薪劳动协议
- 2025年上海烟草集团上海新型烟草制品研究院限公司招聘8人高频重点提升(共500题)附带答案详解
- 2025年中邮证券有限责任公司招聘笔试参考题库含答案解析
- 社戒社康培训
评论
0/150
提交评论