Question

vb中，怎样产生1~100之间的随机整数？怎样写代码？

能不能完整的告诉我程序代码
谢谢……

Answer 1

x
=
int
(rnd()*6
+
1)
这个才对
rnd
*
6
能产生
0-5的数字，由于后面再
+
1
所以int整取后就成了
1-6
所以应该是这个才对

Answer 2

一个Command1控件，一个text1控件
Private Sub Command1_Click()
Text1.Text = Int(100 * Rnd()) + 1
End Sub