Visual Basic程序设计项目化教程 管小清 项目5 制作36选7揺奖机

《Visual Basic程序设计项目化教程 管小清 项目5 制作36选7揺奖机》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、VisualBasic程序设计项目化教程主编管小清郭贺彬项目五制作36选7揺奖机项目目标：本项目是制作一个36选7的摇奖机，包括摇出6个正选号码和一个特选号码，要保证没有重复号码；可以多次摇奖等功能。利用控件数组来设计摇奖机界面，产生随机数，通过循环控制语句和分支控制产生满足要求的摇奖号码，并把产生的摇奖号码显示在界面上。通过本项目，应掌握循环结构，随机数以及控件数组的使用方法和技巧。项目五制作36选7揺奖机项目主要知识点：1、Label控件属性事件方法2、控件数组画法和使用复制-粘贴统一命名3、顺序程序结构4、随机函数的使用—Randomize5、产生随机数的方法6、框架控件的使用7、输

2、出框8、循环结构初步知识9、循环结构初步10、程序调试，断点和监视的用法项目五制作36选7揺奖机项目实施步骤：阅读相关基础知识界面设计窗体设计程序设计程序调试，功能完善5.1第1步：基础知识5.1.1随机函数随机数的产生在VB中用随机函数来实现。1.Randomize语句：始化随机数生成器。语法:Randomize[number]可选的number参数是Variant或任何有效的数值表达式。说明：Randomize用number将Rnd函数的随机数生成器初始化，该随机数生成器给number一个新的种子值。如果省略number，则用系统计时器返回的值作为新的种子值。如果没有使用Randomi

3、ze，则（无参数的）Rnd函数使用第一次调用Rnd函数的种子值。注意若想得到重复的随机数序列，在使用具有数值参数的Randomize之前直接调用具有负参数值的Rnd。使用具有同样number值的Randomize是不会得到重复的随机数序列的。5.1第1步：基础知识2.Rnd函数返回一个包含随机数值的Single。语法：Rnd[(number)]可选的number参数是Single或任何有效的数值表达式。返回值：如下表5-1所示。表5-1参数与返回值关系number值Rnd生成小于0每次都使用number作为随机数种子得到的相同结果。大于0序列中的下一个随机数。等于0最近生成的数。省略序列

4、中的下一个随机数。5.1第1步：基础知识说明：Rnd函数返回小于1但大于或等于0的值。number的值决定了Rnd生成随机数的方式。对最初给定的种子都会生成相同的数列，因为每一次调用Rnd函数都用数列中的前一个数作为下一个数的种子。在调用Rnd之前，先使用无参数的Randomize语句初始化随机数生成器，该生成器具有根据系统计时器得到的种子另：若要产生某个区间范围内的随机数，如【A，B】,则可利用下面的公式：Int((B–A+1)*Rnd+A)这里：A是随机数范围的上限，而B则是随机数范围的下限。5.1第1步：基础知识5.1.2VB循环语句和顺序结构、选择结构一样，循环结构是结构化程序中的

5、三种基本程序结构之一。在程序中，凡是需要重复相同或相似的操作步骤，都可以用循环结构来实现。循环结构由两部分组成：循环体，即要重复执行的语句序列；循环控制部分，即用于规定循环的重复条件或重复次数，同时确定循环范围的语句。若想让计算机能够正常执行某循环，由循环控制部分所规定的循环次数必须是有限的，即循环体可以重复0次到若干次。VB支持的循环结构有：For…Next循环Do…Loop循环ForEach…Next循环While…Wend循环其中For…Next循环结构常用于设计已知循环次数的程序，而Do…Loop和While…Wend循环结构更适合于设计循环次数未知，而只知道循环结束条件的程序。5

6、.1第1步：基础知识1.循环结构1：For…Next循环结构在已知循环要执行多少次时，最好使用For…Next循环。在For…Next循环中使用一个起计数器作用的循环变量，每重复一次循环之后，循环变量的值就会按一定的步长增加或者减少，直到超过某规定的终值时退出循环。格式如下：For<循环变量>=<初值>To<终值>[Step<步长>]<语句组1>[ExitFor]<语句组2>Next[<循环变量>]5.1第1步：基础知识说明：<循环变量>、<初值>、<终值>和<步长>都是数值型的，其中，<循环变量>、<初值>和<终值>是必需的。<步长>可正可负，也可以省略。若<步长>为正，则<初值>必须小

7、于或等于<终值>，否则不能执行循环体内的语句；若<步长>为负，则<初值>必须大于或等于<终值>，否则不能执行循环体内的语句；若<步长>省略，则默认为1。ExitFor可选,语句用于退出循环体，执行Next语句之后的语句。必要时，循环体中可以放置多条ExitFor语句。该语句一般放在某条件结构中，用于表示当某种条件成立时，强行退出循环。Next语句中的<循环变量>必须与For语句中的<循环变量>一致，也可以省略。5.1第1