VB课程的设计.doc

PAGE PAGE 1 课 程 大 作 业 报 告 课程名称： vb程序设计（自学） 课程编号： 0533006 作业内容： 制作小游戏（排排看） 专 业： 计算机科学与技术 班 级： 学 号： 姓 名： 指导教师： 20 年 月 日  目 录 TOC \o 1-2 \h \z HYPERLINK \l _Toc231891915 1.课程大作业目的 PAGEREF _Toc231891915 \h 1 HYPERLINK \l _Toc231891916 1.1加深对VB的运用 PAGEREF _Toc231891916 \h 1 HYPERLINK \l _Toc231891917 运用所学VB知识自行设计一个小游戏，加深对VB的相关了解，熟练掌握其操作过程。 PAGEREF _Toc231891917 \h 1 HYPERLINK \l _Toc231891918 2.课程大作业题目描述和要求 PAGEREF _Toc231891918 \h 1 HYPERLINK \l _Toc231891919 2.1 课程设计该小游戏的描述 PAGEREF _Toc231891919 \h 1 2.2课程设计小游戏要求 HYPERLINK \l _Toc231891920 3.课程大作业报告内容 PAGEREF _Toc231891920 \h 1 HYPERLINK \l _Toc231891921 3.1 在VB应用程序里设计好小游戏（排排看）窗口。共有控件如下： PAGEREF _Toc231891921 \h 1 HYPERLINK \l _Toc231891922 3.2 设计好界面后，打开“代码”窗口，编写如下代码： PAGEREF _Toc231891922 \h 2 HYPERLINK \l _Toc231891923 4.总结 PAGEREF _Toc231891923 \h 5 浙江林学院信息工程学院课程大作业报告 PAGE 1 1.课程大作业目的 1.1加深对VB的运用 运用所学VB知识自行设计一个小游戏，加深对VB的相关了解，熟练掌握其操作过程。 1.2 提高兴趣 通过所做的课程设计来提高学习VB的个人兴趣。 2.课程大作业题目描述和要求 2.1 课程设计该小游戏的描述 游戏者打开以设计好的该款exe格式的游戏，会弹出一个游戏界面。点击游戏菜单项里的开局项，游戏开始。 通过单击鼠标来移动数字，直到数字按首行１，２，３，次行４，５，６，第三行排列７，８时，游戏者胜利。 期间游戏者可以通过菜单项进行“重玩”、“退出”及“帮助”操作。 2.2课程设计小游戏要求 要在对游戏的原理进行深入分析的基础上，利用标签控件数组和鼠标事件来设计该款游戏。 3.课程大作业报告内容 3.1 在VB应用程序里设计好小游戏（排排看）窗口。共有控件如下： 控件名称 Form Label Shape 数量 1 11 1 设计界面如下图所示： 3.2 设计好界面后，打开“代码”窗口，编写如下代码： Private Sub Form_Load() End Sub Private Sub lbl_DragDrop(Index As Integer, Source As Control, x As Single, Y As Single) If (Abs(Source.Index - Index) = 1 Or Abs(Source.Index - Index) = 3) And lbl(Index) = Then term = Source.Caption Source.Caption = lbl(Index).Caption lbl(Index) = term flag = True For i = 0 To 7 If Val(lbl(i)) i + 1 Then flag = False Next If flag Then MsgBox 你赢了!, 48, 排排看 End If End Sub Priva