__首先,不知你的题在什么地方,是在数据库里吗?不管在哪里,题总有先后顺序吧。有顺序就可以为每一道编号,如:1,2,3.......。
有了顺序号就可以用随机数来选题了。假如总的题有200个。用变量T来表示选择的题号,
随机函数的代码是这样的:
T=Int(Rnd() *200)+1
为什么要加1呢?我们知道VB的RND函数产生0-1之间的随机数,不能产生1,当然也不能产生0,但如果产生0.0012的话,乘以200得0.24,INT取整数部分,值为0,总不能产生第0题吧。
这样做,保证了随机数最小为1,最大为200。
然后你根据产生的随机数分别去调用相应的题就可以了。