以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]用洗牌法抽取记录出现问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=102605)

--  作者:找到没重的名
--  发布时间:2017/6/22 20:23:00
--  [求助]用洗牌法抽取记录出现问题

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

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

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

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

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


请老师答疑解惑。




--  作者:有点色
--  发布时间:2017/6/23 0:19:00
--  

 帮助文档的洗牌有问题的,换一种思路

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=86672&skin=0