Vb课程设计-掷色子.docVIP

掷色子设计报告 一、设计思路 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．设计方案要完善的