三，生成随机数

一、实验目的：

1. 了解vb数据类型的基本概念

2. 掌握变量的定义方法

3. 掌握运算符和表达式用法

二、   实验内容：

生成指定范围内的随机整数。用int和rnd函数生成指定范围的随机整数，用randomize函数初始化随机数发生器，用val函数将数字字符串转换为数值。

三、  实验步骤：

1．  在窗体上放置三个文本框并在其后输入三个文本框，分别用于输入随机数的下界和上界，并在属性值中输入“请输入随机数的下界”“请输入随机数的下界”“显示生成的整数”。放置一个命令按钮，并在属性值中输入“生成随机数”。

2．  编写程序代码

   双击窗体中的命令按钮在代码窗口编写click事件过程，代码如下：

Dim M as Integer

Dim N as Integer

M=Val(text1.text)

N=val(text2.text)

Text3.text=m+int(rnd*(n-m=1))

End sub

四、  问题及解决方法；

输入代码后不能正常运行，出现“编译码错误”

核对输入的代码，发现把“.“输成了“,“，改正后可正常运行

 

五、  心得体会：

   写VB程序时必须细心，任何一个小的问题都可能导致程序不能运行。当出现问题时，最好逐步调试，从而发现问题，解决问题。越细微的地方越是要仔细。细节决定成败。