用VB随机函数设计数学程序
技术与开发
VB的随机函数很简单，不过如果用得好可以设计出很多实用的小程序，例如自动出题程序、抽签程序等。
VB随机函数的格式是Rnd(number)，Rnd函数返回小于1但大于或等于0的值。number (可选项)的值决定了Rnd生成随机数的方式。下面我们以设计一个数学程序为例，详细介绍随机函数的应用。
在要设计的数学程序中，当答题者在得数下面的标签内输入答案时，单击判断按钮，程序就会将得数和题目之间进行比较，如果你答错了，会给出提示的信息。当你答完题后，再单击出题按钮，就可以做新的题目。
1.设计程序基本界面
先启动VB6.0，点击“文件”，选择“新建工程”，在出现的对话框选择“标准 EXE”，点击“确定”。
在表单“Form1”中，加入5个Label控件，3个CommandButton控件和1个TexBox控件。将“Form1”的Caption属性设置为“加法练习”，Label3、Label4、Label5的Caption属性分别设置为“题目”“得数”“对错”，其他控件的修改如表所示。
2.添加代码实现随机出题功能
设计好了程序界面，下面我们就开始输入代码。
第一步：在表单的空白处双击鼠标左键，在Private Sub Form_Load()和End Sub之间输入“CmdPanDuan.Enabled = Flase”，这样我们启动程序时，“判断”按钮就会处于不可用的状态，只有当你答完题目，“判断”按钮才会处于可用的状态。
第二步：双击“出题”按钮，在Private Sub CmdChuTi_Click()和End Sub之间输入相关代码。
第三步：双击“判断”按钮，在Private Sub CmdPanDuan_Click()和End Sub之间输入如图1所示的代码。
第四步：双击“退出”按钮，在Private Sub CmdTuiChu_Click()和End Sub之间输入“End”即可。在代码开头加入声名：Public a, b。
3.检测随机出题的效果
点击“文件”，选择“生成工程1.exe”，选择编译好的程序的保存的位置，点击“确定”按钮即可。
双击编译好的程序，就可以来做题了。单击“出题”按钮，电脑将随机出一道加数小于10的加法算式，在文本框中输入答案后，单击“判断”按钮，就可以知道得数的对错（图2）。如果题目算错了，还可以在文本框中重新输入修改后的答案，再接着点击“判断”按钮，直到算对为止。
总结
随机函数除了可以用来设计数学程序外，还可以设计其他学习程序，例如英语单词、成语等。此外，利用随机函数我们还可以设计更复杂的程序，例如可随机出题的计算机考试系统、动态数字显示等。
完整代码已放到《电脑报》网站上了，敬请关注。