如何从表中随机提取一个数据？？？？？？？？？？？？？？？？？？？？？？？？？

Question

可以用Randomize函数，但是要有限制条件！

Answer 1

rs.open "select id from 表"Randomize   MyValue = Int((Rnd * rs.recordcount) + 1)   rs.move MyValue

Answer 2

'同意楼上的
Randomize  Timer
MyValue = Int((Rnd * rs.recordcount) + 1)   

Answer 3

rs.open "select id from data"
总是说要求对象，是什么原因呢！请说详细点，谢谢

Answer 4

我这样写
Dim a
Data1.RecordSource = "SELECT id FROM data"
Randomize
a = Int((RecordSource * Rnd) + 1)
Text1.Text = a
出来的数据为什么重是1，而我的表中没有1这个数据呀？？