- 1、本文档共2页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
Vb课程设计-掷色子
掷色子设计报告
一、设计思路
1.要达到的目的
①培养学生综合利用VB语言进行程序设计的能力。
②培养学生综合使用基本控件的、子过程和控件数组等操作能力。
③单击“开始”后,使时钟控件出发Timer事件,利用随机函数,产生一个1~6的随机数,将这个数作为“点数”在标签中显示,并调用子过程将Shape控件数组圆形按点数做相应的显示注意Visible和FillColor属性的使用。
2.关键问题的解决
①游戏启动过程中筛子从0~6做循环,需要设置点的样式
②过程用于根据显示0~6数字,显示相应的控件组合
③单击停止按钮,会停止骰子的滚动并显示一个随机生成的点数
二、模块之间的调用关系,或程序流程图
三、部分程序关键源代码及注释
程序运行起来,单击开始按钮,设Timer控件的Enabled属性为True,点数开始滚动,实现代码如下
Private Sub Command1_Click
Timer1.Enabled True
End Sub
当Timer控件可用时,会触发Timer控件的Timer事件,程序代码如下
Private Sub Timer1_Timer
Randomize
num Int Rnd * 6 + 1
Label1.Caption num 点
DisPlay num
End Sub
四、设计方案的完善及目前存在的问题
1.设计方案要完善的地方
①掷色子的界面过于单调,背景不够吸引人。
②有些代码过于繁琐,没有用更加简便的方法。
2. 目前存在的问题
①有一部分代码自己还是会出现逻辑上的问题
②时间仓促,本次设计还有好多地方不理想
本次设计的收获及心得体会
在本次课程设计中发现了自己存在好多问题,有些课本上的知识在课程设计中还是不能应用到课程设计当中。本来就对自己的能力感到不足,便找了个相对简单的题目,没想到一旦做起来还是相当的困难。对于编程语言来说,思维,联系,和动手能力的要求都是特别高,在课堂学习的过程中缺少了理论联系实际操作的的能力。
做这个课程,真的是翻了不少书,问了许多同学,在网上翻阅了好多资料,其实到现在还有一些问题搞不清楚。
真的很感谢老师,这门课程现在真正的培养了我们动手能力,独立思考能力。
六、对该题目和VB设计的意见和建议
1. 对该题目的意见和建议 掷色子的游戏虽然简单,但对于控件的应用确实是比较有点难度,可能对于我来说吧。请教了好多同学,在网上找了好多资料。
2.对本次设计的意见和建议 课程设计给的时间稍微有点紧张,再加上课程的时间段安排在将近期末考试的时间段,连上复习其他科目确实感觉时间有点不够用。建议把VB课程设计的时间与期末考试的时间拉开一段时间。总体来说这次设计还是很成功的,VB课程设计可以锻炼大家的动手能力和动脑能力。
掷色子课程设计报告(VFP) 编号:55
Label停止shape控件组显示label的点数
Time事件启动label 1~6随机变动
开始程序
停止程序
文档评论(0)