每次执行前要用Randomize初始化Randomize
AccID = Int((5 - 1 + 1) * Rnd + 1)
AccID = Int((5 - 1 + 1) * Rnd + 1)
解决方案 »
- 至少一个参数没有指定值?为什么?
- :CreateObject("Scripting.FileSystemObject")错误,急死我了,大家帮我看看,先谢了!!!
- 请问VB怎么得到Access文件里的所有的报表的名字?
- 各位大侠帮个忙阿
- ** 如何实现把“姓名”字段按拼音排序。只输入汉字首个拼音字母,就能找到第一个相匹配的记录。
- DataGrid控件只能绑定到数据库上才能显示数据吗?????在线等!!
- 请问哪里有下载比较全的API函数啊,再多也无所谓
- 如何实现如下排列
- 为什么我动态添加控件时最多只可以添加17个呀
- 如何抓取IE上按钮的图标
- 如何使ListView的子项可编辑
- [求助]谢谢大家!!!
而randomize能每次根据时间重新初始化这个随机子,这样才能用rnd实现真正的
随机,比如你想产生一个从1到MAX的随机数i,可以:
randomize
i=rnd(1)*10000000 mod MAX
Randomize 用 number 将 Rnd 函数的随机数生成器初始化,该随机数生成器给 number 一个新的种子值。如果省略 number,则用系统计时器返回的值作为新的种子值。如果没有使用 Randomize,则(无参数的)Rnd 函数使用第一次调用 Rnd 函数的种子值。
x = Int(rnd*..........)
和TIME函数一起用就行了