生成随机数

 实验步骤：
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