VB随机数趣味教学

周仪兰

摘 要： 中职学生学习VB后，要培养他们运用VB解决实际问题的能力，作者以几个趣味程序为例，培养学生的学习兴趣，充分调动学生的学习主动性，体验随机数的不同应用：用于产生一定范围的随机整数、控件的属性、数组的下标，开阔学生的视野，提高学生的探究能力，达到更好的教学效果。

关键词： VB教学 随机数 趣味教学

中职学生在学习VB时，大多感到枯燥、乏味，学习主动性得不到很好的发挥。因此教师在教学时要多管齐下，采用不同的教学方法激发学生的学习兴趣，充分调动学生的学习主动性，让学生喜欢学VB。只要激发了学生的学习兴趣，学生就会成为学习的主人，把抽象的理论和概念融入具体问题中，使创造力得到发挥。VB的随机数能够提供千变万化的数据，运用随机数函数生成一组一定范围内的数据。在教学中，我们要合理地处理教材，突破教材限制，利用随机数制作一些趣味小程序，让学生对这些小程序感兴趣，进入主动学习、主动探究的境界，把抽象的理论变成趣味的小应用，提高用VB解决实际问题的能力，让VB走进我们的生活，为我们所用。

一、用随机数制作趣味小程序

学完随机数后，让随机数为我们解决一些实际的问题。由简单到复杂，在探索中前进，最终熟练地掌握随机数。例如要让小朋友加强10以内的加法运算，教师可采用案例教学在课堂上演示上述应用的EXE文件，随机出十道10以内的数的加法运算题，小朋友答完题后进行正确性检验、评分，填错的数显示出正确的答案（红色的字体），正确的数显示√，显示出最后得分及鼓励性语言：满分的显示太棒了，其他则显示继续努力。制作为EXE文件后，它可以脱离VB的运行环境，直接使用。这个小应用引发了学生的兴趣，但学生感到无从下手，教师可将问题分解成学生熟悉的小问题：

1.随机生成算术题目：随机生成十组10以内的整数及答题控件。

2.探究数据的存储：这十组数如何存放，正确答案如何存放。

3.批改这十道题：将答题的数据与标准答案进行比较，计算得分。

4.调试程序，生成exe.文件。

这些问题都是学生熟悉的问题，这几个问题解决了，小程序就完成了。用这种方法，学生可以用已有的知识解决一些实际问题。在程序的运行过程中，引导学生根据出现的问题完善程序，在这个应用的基础上加以改进，制作出四则运算的小应用。

二、用随机数制作游戏小应用

随机数不仅可以直接产生具体的数，还可以用于对象的属性中。教师演示小应用的功能：在屏幕上出现随机移动的变色小球，鼠标击中小球时，得分加10分，随即小球随机移动，3分钟内计算总得分，高于500分显示你真棒。我们将这个小应用分解成以下几个问题，引导学生逐步完成：

1.定期随机地显示小球：用shape显示小球

2.定期移动小球：随机产生小球的Top属性及Left属性。

3.变色小球：随机产生0-255的RGB值。

4.计算得分：击中小球时，总得分加10分。

在编写程序的过程中，学生发现shape控件没有事件，需要学生进行探究学习，如何实现点击shape时，进行加分，让shape借助其他控件实现点击事件，引导学生用已有的知识解决出现的问题。实现了点击shape事件后，运行时发现只能加到10分点击而第二次时无法加到20分，让学生解决变量的作用域问题，问题就得到解决。学生在这一过程中体验到成功的喜悦。

在这个案例中，小球的颜色是由rnd函数随机产生的，小球的位置也是随机的，由rnd函数进行控制，Timer控件触发小球改变位置及颜色。让学生体验随机数的拓展应用，开阔学生的视野。

三、用随机数制作闪烁的彩色霓虹

教师在课堂上演示彩色霓虹程序的运行结果，界面上显示60个圆形的图案，在程序运行前小灯的颜色全部都一样，运行时每隔20毫秒会跳转一次颜色，各彩灯的颜色随机改变，出现闪烁的效果，让VB炫起来。可将这个小程序分解为以下几个小问题：

1.彩灯可用shape控件显示，如何才能访问到每一个彩灯。

2.实现彩灯前景色的随机改变。

学生在实践中发现用控件数组设置这些小灯，容易访问。用一个循环结构就实现60个小灯的访问。学生完成这个效果后，再引导学生制作更多的效果，如流转霓虹。

通过这个案例，将控件数组与随机数结合在一起，使程序对60个控件的设置变得简单、方便，运用随机数，从而实现用同一代码达到60个控件的不同效果的目标。

四、用随机数实现抽奖的程序

学生晚会上要进行各奖次的抽奖，针对这一活动，教师演示抽奖的小应用，界面上显示身份证号码、开始抽奖、中奖号码，运行时要求输入所有的身份证号码，单击开始抽奖时，文本框随机地滚动显示所有的身份证号码，单击中奖号码时，文本框停止滚动，最后显示的身份证号码就是抽取的中奖号码。教师引导学生将问题分解：

1.所有的身份证号码如何存放，变量的类型如何定义。

2.能按顺序显示身份证号码吗？如何随机出现身份证号码，并且循环滚动？

3.触发滚动用什么事件，按钮还是定时器？

学生在调试中发现，单独用定时器，程序一开始就滚动，单独用按钮，不会循环滚动，在探索中单击开始抽奖，定时器才开始作用，问题得到解决。在这个应用中，随机数用在数组的下标中。

通过学习，学生发现随机数的运用是灵活的，可以用在数据中，用在属性中，用在数组的下标中，以此培养学生的兴趣，鼓励学生多思考。

参考文献：

[1]贺洪鸣，符水波.桌面应用程序设计[M].北京：清华大学出版社，2006：10.

[2]李可欣.案例教学法在VB教学中的应用[J].北京：中国科技信息，2008：09.