7,763
社区成员
发帖
与我相关
我的任务
分享谢谢了 帮忙看看
Randomize
billno=Int(Rnd * 999999 + 1)
我这样得到的 billno 这个数 为什么又时不是 6 位
billno=Int(Rnd * 999999 + 1)
我这样得到的 billno 这个数 为什么又时不是 6 位
...全文
请发表友善的回复…
发表回复
blp 2001-12-24
- 打赏
- 举报
最笨的方法
dim nBit as Long
dim nStr as Strng
dim i as long
Randomize
for i=1 to 6
nBit=Rnd()*10
nStr=nStr+CStr(nBit)
next i
这样肯定是6位了
dim nBit as Long
dim nStr as Strng
dim i as long
Randomize
for i=1 to 6
nBit=Rnd()*10
nStr=nStr+CStr(nBit)
next i
这样肯定是6位了
ferrytang 2001-12-24
- 打赏
- 举报
??????????????
Ranma_True 2001-12-24
- 打赏
- 举报
rnd的返回值在0-1之间,如果rnd=0.001,你看会如何?
ferrytang 2001-12-24
- 打赏
- 举报
billno=format(int(rnd*999999+1),"000000")
如果要100000~999999之间的那么是
dim intNo as long
intno=100000+rnd*899999
billno=format(intno,"000000")
如果要100000~999999之间的那么是
dim intNo as long
intno=100000+rnd*899999
billno=format(intno,"000000")
loveyxy 2001-12-24
- 打赏
- 举报
to:dbcontrols(aa)
什么意思？
什么意思？
dbcontrols 2001-12-24
- 打赏
- 举报
0<Rnd <1
