VB打字游戏课程设计报告.doc1111.docVIP

课程设计题目:设计简单打字游戏 内容摘要： 本程序是利用vb编写的一个打字游戏，游戏具有功能：上方有文字掉下，按键可将其击掉，有速度选择，难度选择，难度低时为单个字符，难度高时为单词。本游戏，可以让用户从零开始逐步变为打字高手，短时间内运指如飞！48小时成为打字高手寓教于乐………………………………………… 概要设计………………………………………… 详细设计………………………………………… 效果及存在问题………………………………… 心得体会………………………………………… 小组成员…………………………………………… 参考文献…………………………………………… 1．功能描述 本程序是利用vb编写的一个打字游戏，游戏可以选择难易程度，选择简单时上方掉落的是单个字符，选择困难时上方掉落的是单词，当正确按键时可以将其击掉，成绩相应增加一分，开始前可以选择游戏速度，点击加减按钮可以调节游戏速度。本程序还有许多实用功能，可以将游戏暂停、继续、从来、结束等。 (1).代码主要是是经过本组成员，共同讨论出来的。 (2).张芹主要负责代码编辑 (3).蒋伟超和王风主要负责查找资料和协助编写课程报告。 (4).王立夫主要负责设计界面和协助查找资料。 2．概要设计 打字游戏简单方框图： 3．详细设计 (1)界面设计 在窗体上添加6个命令按钮command1、command2、 command3 、command4、 Command5 command6、8个标签Label1、Label2、Label3、Label4、Label5、Label6、Label7、Label8、2个定时器time1、time2、1个文本框text1和2个单选按钮option1、option2按表修改它们的属性，如图所示。 对象 属性 值 Command1 Caption 加 Command2 Caption 减 Command3 Caption 开始 Command4 Caption 结束 Command5 Caption 暂停/继续 Command6 Caption 重来 Label1 Caption Label2 Caption Label3 Caption 成绩 Label4 Caption 速度 Label5 Caption 18 Label6 Caption Label7 Caption Label8 Caption time1 Interval 0 Time2 Interval 0 Option1 Caption 简单 Option2 Caption 困难 Text1 text (2)编写程序代码如下： Private Sub Command1_Click() Label5.Caption = Label5.Caption + 1 End Sub Private Sub Command2_Click() Label5.Caption = Label5.Caption - 1 End Sub Private Sub Command3_Click() Timer1.Interval = 1 Timer2.Interval = 1 If Option1.Value = True Then Timer1.Interval = 1 Timer2.Interval = 0 Label7.Caption = Label1.Top = 8760 Label6.Top = 8760 Label1.Visible = True Label6.Visible = True End If If Option2.Value = True Then Timer2.Interval = 1 Timer1.Interval = 0 Label1.Caption = Label6.Caption = Randomize Cls a = Array(one, two, three, free, feel, fly, lacking, the, power, that) X = Int(Rnd * (UBound(a) + 1)) Label7.Caption = a(X) Command1.Enabled = False Command2.Enabled = False Label7.Top = 0 Label7.Visible = True End If Text1.SetFocus End Sub Private Sub Command5_Click() Static f As Integer If f = 0 Then Timer1.Interval = 0 Timer2.Interval = 0 f = 1 Command3.Set