还剩10页未读,继续阅读
本资源只提供10页预览,全部文档请下载后查看!喜欢就下载吧,查找使用更方便
文本内容:
内容摘要本程序是利用vb编写的一个打字游戏,游戏具有功能上方有文字掉下,按键可将其击掉,有速度选择,难度选择,难度低时为单个字符,难度高时为单词本游戏,可以让用户从零开始逐步变为打字高手,短时间内运指如飞!48小时成为打字高手,寓教于乐本设计报告包括初始的设计想法,概要设计和详细设计详细设计包括界面设计和所需代码,及其运行后的结果图,以便具体使用本设计适用于VB初学者、爱好者的参考资料由于编者水平有限,时间仓促,难免有不足之处,敬请读者不吝赐教目录
1.功能描述…………………………………………
32.概要设计…………………………………………
33.详细设计…………………………………………
44.效果及存在问题…………………………………
95.心得体会…………………………………………12小组成员……………………………………………12____……………………………………………121.功能描述本程序是利用vb编写的一个打字游戏,游戏可以选择难易程度,选择简单时上方掉落的是单个字符,选择困难时上方掉落的是单词,当正确按键时可以将其击掉,成绩相应增加一分,开始前可以选择游戏速度,__加减按钮可以调节游戏速度本程序还有许多实用功能,可以将游戏暂停、继续、从来、结束等2.概要设计打字游戏简单方框图3.详细设计1界面设计在窗体上添加6个命令按钮com__nd
1、com__nd
2、com__nd
3、com__nd
4、Com__nd5com__nd
6、8个标签Label
1、Label
2、Label
3、Label
4、Label
5、Label
6、Label
7、Label
8、2个定时器time
1、time
2、1个文本框text1和2个单选按钮option
1、option2按表修改它们的属性,如图所示对象属性值Com__nd1Caption加Com__nd2Caption减Com__nd3Caption开始Com__nd4Caption结束Com__nd5Caption暂停/继续Com__nd6Caption重来Label1CaptionLabel2CaptionLabel3Caption成绩Label4Caption速度Label5Caption18Label6CaptionLabel7CaptionLabel8Captiontime1Interval0Time2Interval0Option1Caption简单Option2Caption困难Text1text2编写程序代码如下PrivateSubCom__nd1_Click曾加速度Label
5.Caption=Label
5.Caption+1EndSub减小速度PrivateSubCom__nd2_ClickLabel
5.Caption=Label
5.Caption-1EndSub开始游戏PrivateSubCom__nd3_ClickIfOption
1.ValueThenTimer
1.Interval=1Timer
2.Interval=0Label
7.Caption=Label
1.Top=8760Label
6.Top=8760Label
1.Visible=TrueLabel
6.Visible=TrueEndIfIfOption
2.ValueThenTimer
2.Interval=1Timer
1.Interval=0Label
1.Caption=Label
6.Caption=RandomizeClsa=Arrayonetwothreefreefeelflylackingthepowerthatx=IntRnd*UBounda+1Label
7.Caption=axCom__nd
1.Enabled=FalseCom__nd
2.Enabled=FalseLabel
7.Top=0Label
7.Visible=TrueEndIfText
1.SetFocusEndSubPrivateSubForm_KeyPressKeyAsciiAsInteger判断简单时是否打中,并使成绩加一IfOption
1.ValueThenTimer
1.Interval=1IfKeyAscii=AscLabel
1.CaptionThenLabel
1.Top=0Label
1.Left=Rnd*10800Label
1.Caption=Chr$Rnd*26+97Label
2.Caption=Label
2.Caption+1EndIfIfKeyAscii=AscLabel
6.CaptionThenLabel
6.Top=0Label
6.Left=Rnd*10800Label
6.Caption=Chr$Rnd*26+97Label
2.Caption=Label
2.Caption+1EndIfEndIf判断困难时是否打中,并使成绩加一IfOption
2.ValueThenTimer
2.Interval=1EndIfIfKeyAscii=65AndKeyAscii=86OrKeyAscii=97AndKeyAscii=122ThenLabel
8.Caption=Label
8.CaptionChrKeyAsciiElseIfKeyAscii=32ThenLabel
8.Caption=Text
1.Text=EndIfIfLabel
7.Caption=Label
8.CaptionThenLabel
7.Caption=Label
8.Caption=Text
1.Text=Label
7.Top=0Label
7.Left=Rnd*10800RandomizeClsa=Arrayonetwothreefreefeelflylackingthepowerthatx=IntRnd*UBounda+1Label
7.Caption=axLabel
2.Caption=Label
2.Caption+1EndIfEndSub结束PrivateSubCom__nd4_ClickEndEndSub暂停或继续游戏PrivateSubCom__nd5_ClickStaticfAsIntegerIff=0ThenTimer
1.Interval=0Timer
2.Interval=0f=1Com__nd
3.SetFocusElseTimer
1.Interval=1Timer
2.Interval=1f=0Com__nd
3.SetFocusEndIfEndSub重新游戏PrivateSubCom__nd6_ClickTimer
1.Interval=0Label
2.Caption=0Label
5.Caption=18Timer
1.Interval=0Timer
2.Interval=0Label
1.Visible=FalseLabel
6.Visible=FalseLabel
7.Visible=FalseLabel
1.Caption=Label
6.Caption=Label
7.Caption=Com__nd
1.Enabled=TrueCom__nd
2.Enabled=TrueEndSubPrivateSubTimer1_TimerRandomize简单时游戏速度Label
1.Top=Label
1.Top+Label
5.CaptionLabel
6.Top=Label
6.Top+Label
5.Caption+15判断是否到底,并随机生成字母,从顶开始IfLabel
1.Top8760ThenLabel
1.Top=0Label
1.Left=Rnd*10800Label
1.Caption=Chr$Rnd*26+96EndIfIfLabel
6.Top8760ThenLabel
6.Top=0Label
6.Left=Rnd*10800Label
6.Caption=Chr$Rnd*26+96EndIfEndSubPrivateSubTimer2_TimerRandomize困难时游戏速度Label
7.Top=Label
7.Top+Label
5.Caption+10判断是否到底,并随机生成单词,从顶开始IfLabel
7.Top8760ThenLabel
7.Top=0Label
7.Left=Rnd*10800RandomizeClsa=Arrayonetwothreefreefeelflylackingthepowerthatx=IntRnd*UBounda+1Label
7.Caption=axElseLabel
7.Top=Label
7.Top+5EndIfEndSub4.效果及存在问题运行后得到如图界面选择简单模式时,单击开始,上方掉落的是单个字符选择困难模式时,单击开始,上方掉落的是单词存在问题:1结束时没有提示是否确定结束游戏2游戏还缺许多人性化设计
5.心得体会通过本次的VB实验程序设计,使我对VB课程有进一步的了解,使自己的上机能力有大幅度提升,在设计这个程序时,首先我开始构思游戏的内容,再从书本、网上找了一些有关打字游戏设计的资料,但是当把基本的弄好了之后,发现了一些棘手的问题,使我无从下手,经过与同学的商讨和老师的指导后,终于明白了其中的奥妙其实在打字游戏程序上花费最多事时间是在键盘的输入如何问题,当对应的输入和掉落的单个字符、单词相同时屏幕上的单个字符、单词会消失,最后经过自己的反复尝试以及与同学的讨论,打字游戏最终设计成功从这一个多星期的设计过程中,使我明白自己动手编程序原来是这么一件快乐的事情俗话说得好“熟能生巧”所以不仅是要学会它更加需要会运用它,这次设计程序让我受益良多,我会好好珍惜像这种难得的机会小组成员08XXXXXXXXX____
[1]朱从旭.Visualbasic程序设计综合教程.北京清华大学出版社,2005
[2]莫德举、夏涛.Visualbasic程序设计.北京北京邮电大学出版社,2008屏幕上方掉落单个字符时键盘输入对应的单个字符屏幕上的单个字符消失与单词最比较相同时单词消失屏幕上方掉落为单词时键盘输入对应的单词单词存在在标签label8的caption上。