作业帮 > 综合 > 作业

如何用vb中的随机函数产生奇数?(只要奇数)

来源:学生作业帮 编辑:搜搜考试网作业帮 分类:综合作业 时间:2024/05/24 21:39:19
如何用vb中的随机函数产生奇数?(只要奇数)
如何用vb中的随机函数产生奇数?(只要奇数)
要只用Rnd函数就产生奇数的话,是不行的啊,得多用一个循环结构!比如下面代码!dim a (20) '定义一个数组
for i = 1 to 20
a(i)=int(Rnd*100) ' 为数组中每一个数覆值!
if a(i) mod 2=0 then i=i-1 '判断该数是不是奇数,不是的话,重新给个值!
next i