当前位置:文档之家› VB游戏 石头剪刀布

VB游戏 石头剪刀布

课程设计报告
题目:小游戏《石头剪刀布》
专业班级:10级信管安全
学号:101115010
姓名:朱录雅
指导教师:张志宏
完成时间:2011年6月16日
功能简述:
在vs2005环境下,通过触发按钮事件,添加图片,显示图片,隐藏图片并进行相应的赋值,通过if else语句,Randomize函数实现相应条件完成游戏的操作。

界面设计:
应用visual basic开发工具,新建一窗体,用picture box显示图片,并将其image属性设置为相应图片。

添加按钮,实现相应任务。

图片一界面设置
程序设计:
(1)启动调试按钮,选择想要的单选按
钮。

If RadioButton1.Checked Then TextBox1.Text="石头"
If RadioButton2.Checked Then TextBox1.Text="剪刀"
If RadioButton3.Checked Then TextBox1.Text="布”
图片二
(2)单击pk按钮,系统调用Randomize()函数随机产生选项,
与你pk。

Randomize()
Select Case Int(3*Rnd())
Case0:TextBox2.Text="石头"
Case1:TextBox2.Text="剪刀"
Case2:TextBox2.Text="布"
(3)按照石头剪刀布的规则,游戏会根据胜负,出现不同提示。

If TextBox1.Text=TextBox2.Text Then
PictureBox2.Visible=True
MsgBox("你俩平手哦再来一局")
PictureBox2.Visible=False
Else If TextBox1.Text="石头"And TextBox2.Text="布"Then
PictureBox3.Visible=True
MsgBox("你输了加油哦")
PictureBox3.Visible=False
Else If TextBox1.Text="布"And TextBox2.Text="石头"Then
PictureBox1.Visible=True
MsgBox("你赢了好厉害哦")
PictureBox1.Visible=False
图片三
图片四
图片五
存在的问题:
游戏程序相对简单,运用的按钮不是很多,画面不太生动。

只追求了游戏的可行性,没能很好的做好界面的美观。

心得体会:
复杂的程序不能很好的写出来,想把画面做的相对复杂一点,却有心无力,暴露出很多学习的漏洞。

相关主题