[求助]高难度的随机出题。

静儿

一个“题库”表，表结构为：  题目    题型    所在章节   分值

设随机取题的条件：题型为单选10题  多选10题........    同时： 所在章节：   第一节 5分，第二章  7分......

要随机出四份卷子满足以上条件，该如何实现？

一点通

可以用RND函数

Rnd 函数示例

本示例使用 Rnd 函数随机生成一个 1 到 6 的随机整数。

1. Dim MyValue
   
   
2. MyValue = Int((6 * Rnd) + 1)    '

复制代码

生成

1. 1

复制代码

到

1. 6

复制代码

之间的随机数值。然后根据随机值,用dlookup查找表中的ID对应值

海狸先生

补充一下，还要建立一个数组，判断随机生成的数是否重复