VB高手请回答,关于RND函数.

来源：百度知道 编辑：UC知道 时间：2024/05/10 07:43:22
有个问题,望能帮助,问题如下:产生50个60-100的随机数,统计其中被6整除余2的个数,并输出.用RND如何表达??望能尽快答复.谢谢

(最大数-最小数+1)*rnd+最小数
再用int取整就行了

randomize
for i=1 to 50
j=int(rnd*41+60)
print j;
if i mod 10=0 then print
if j mod 6=2 then m=m+1
next
print "被6整除余2的个数";m