主题：[求助]用洗牌法抽取记录出现问题

我在测试帮助中的“高效随机抽取记录-用洗牌法抽取记录”代码时，发现一个问题。按帮助上说下面这行代码

For i As Integer = 0 To 100 - 1 '100为要抽取的行数 

100为要抽取的行数，但实际在命令窗口中运行时，筛选出的记录到不了100行。我反复看了代码，for ...next 设置循环也的确是100次，但为什么就不对呢。我以分别试了多个数值如50、120，都不行。

我用的表名为“订单”，表结构共两列：“选择”，“项目”。

项目列值每行依次为：1a,2a...，399a,400a。共400行。完全复制帮助代码。

请老师答疑解惑。