Vb课程设计-掷色子.doc

  1. 1、本文档共2页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 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)

liudao + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档