VB语言中随机函数~

随机函数是Rnd
范围是0≤Rnd＜1
表达式你可以这样写
Dim int a
a=int(Rnd*100)

rnd，产生随机函数，所得值在0-1之间
所以要产生0-100的随机数，那么就用100*rnd+1 就可以产生0-100的随机数
如果要取正的话 就用int(rnd*100+1)
还有一点要强调
如果每次都要使随机数不一样，那么还要在产生随机数之前加上
randomize 这个表示产生的随机数不一样
例子
dim n
randomize
n=int(100*rnd+1)
print n

int(101*rnd)

Rnd 随机函数：

Int((上限－下限＋1)*Rnd+下限)

有等回复这功夫百度都百1W遍了

定义一个函数：

Function SuiJiZhengShu()
SuiJiZhengShu =Int( Rnd * 100)
End Function

说明：Rnd是vb内部函数，产生一个0与1之间的随机数(如0.12332,0.92142)。