VB 中c=QBCOLOR (rnd*15+1)哪里错了如题求解><应该就这句错了,要做成这个200个随机彩色点(颜色用QBColor实现),点的大小在单位3~6之间变化,改成rnd*15就对了,可是不久取不到15这个颜色了吗,QBco

来源:学生作业帮助网 编辑:六六作业网 时间:2024/11/22 14:20:39
VB中c=QBCOLOR(rnd*15+1)哪里错了如题求解><应该就这句错了,要做成这个200个随机彩色点(颜色用QBColor实现),点的大小在单位3~6之间变化,改成rnd*15就对

VB 中c=QBCOLOR (rnd*15+1)哪里错了如题求解><应该就这句错了,要做成这个200个随机彩色点(颜色用QBColor实现),点的大小在单位3~6之间变化,改成rnd*15就对了,可是不久取不到15这个颜色了吗,QBco
VB 中c=QBCOLOR (rnd*15+1)哪里错了
如题求解><应该就这句错了,要做成这个200个随机彩色点(颜色用QBColor实现),点的大小在单位3~6之间变化,

改成rnd*15就对了,可是不久取不到15这个颜色了吗,QBcolor不是就0-15这16个颜色吗

VB 中c=QBCOLOR (rnd*15+1)哪里错了如题求解><应该就这句错了,要做成这个200个随机彩色点(颜色用QBColor实现),点的大小在单位3~6之间变化,改成rnd*15就对了,可是不久取不到15这个颜色了吗,QBco
这是因为Rnd的返回值是个纯小数(大于等于0,小于1的小数),所以当rnd*15+1的值为15.5以上时,VB会自动进位为16,这样就出错了.

其实你的算法本身就有问题,rnd*15的话,怎么算都只有15种颜色,不可能是16种,即使不会出错,也要么没有15这个颜色,要么没有0这个颜色.
正确的应该是:
QBColor(Int(Rnd * 16))
Rnd * 16 将得到 0 到 15.99999...的值,再用Int取整后就得到0到15这16个颜色值了.

VB 中c=QBCOLOR (rnd*15+1)哪里错了如题求解><应该就这句错了,要做成这个200个随机彩色点(颜色用QBColor实现),点的大小在单位3~6之间变化,改成rnd*15就对了,可是不久取不到15这个颜色了吗,QBco VB中qbcolor函数中,qb是什么字母的缩写? VB中Rnd(5)是什么意思 vb中int(rnd(0)+1)+int(rnd(1)-1)值是多少?为什么? vb 中设 a = 5,b = 10,则执行 c = Int((b-a)* Rnd + a) + 1后,c的值为 vb中个随机选取一个0到1000之间的数怎么写是x=Rnd*1000还是x=Rnd*1000+1 VB 编程 vb中 Int(Rnd(0)+1)+Int(Rnd(1)-1) 值等于多少vb中 Int(Rnd(0)+1)+Int(Rnd(1)-1) 值等于多少 怎么算出的 VB中rnd如何出现小数啊 VB 中int(Rnd*10+10)是什么意思?Rnd*10与10*Rnd是一个意思吗? VB中在picturebox中应用Line函数为什么画不出直线form1.Picture1.Line (300,300)-(9000,300),QBColor(1)对,我放在了form_Load里面了. VB随机数i = Int(Rnd() + 4) vb 中设 a = 5,b = 13,则执行 c = Int((b-a)* Rnd + a) + 1后,c的范围为6~14.为什么?为什么不是6~13呢,14难道可以取到么? 产生[5,46]之间的随机整数VB表达式是 A.Int(Rnd(1)*42)+6 B.Int(Rnd(1)*42)+5 C.Int(Rnd(1))+41 D.Int(Rnd(1)*41)+5 如何使VB中Rnd函数产生的随机数是在[0,1]内? vb.net 产生随机数问题M=int(4+95*rnd())+1vb.net中,这个语句能产生4~99之间的随机数吗?书上说随机数产生的公式是:int((upperbound-lowerbound+1)*rnd+lowerbound)根据这个公式,不应该是这样:M=int(4+96*rnd()) 写 在VB中调用rnd函数不是产生(0,1)之间的数吗,为什么T=(b-a)*rnd+a 其中b>a,且均为正数,为什么T输出竟然是负数,为什么啊, vb中的一个Rnd函数表达式的问题可以产生30~50(含30和50)之间的随机整数的表达式是A) Int(Rnd * 21+30) B) Int(Rnd * 20+30)C) Int(Rnd * 50 - Rnd * 30) D) Int(Rnd * 30 + 50)请问:我是新手请大侠解释的详细一点1 Excel 用 VBA 随机数如何保留一位小数c = Round(Rnd * 2000 + 8000,0) 产生的是整数,c = Round(Rnd * 2000 + 8000,0) / 10 为什么产生的小数位数特别多?c = Round(Rnd * 200 + 800,1) 小数位数也特别多?VB