Foxtable(狐表) → 用户栏目 → 专家坐堂 → 数据重新洗牌不成功


  共有2101人关注过本帖树形打印复制链接

主题：数据重新洗牌不成功
帅哥哟，离线，有人找我吗？
jwt
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：204 积分：2037 威望：0 精华：0 注册：2015/3/6 17:12:00 		数据重新洗牌不成功  发帖心情 Post By：2015/12/15 15:43:00 [只看该作者]

还是那个测评程序，今天使用时发现，洗牌不成功，代码附图

想要的功能：从题库里抽取40道题，重新排序并显示，或对题库重新排序再抽题，都一样，代码如图，我今天测试了下，抽完的题目顺序还是按照以前的顺序排下来的，打个比方，有10个题，抽五个，执行代码，抽出来后的题顺序还是之前的顺序（比如1.3.5.6.8.9），并没有实现打乱原有顺序的目的（比如5.9.8.3.6.1）。我使用的是内部数据表。

图片点击可在新窗口打开查看此主题相关图片如下：1.png
图片点击可在新窗口打开查看

[此贴子已经被作者于2015/12/15 15:44:55编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/12/15 15:55:00 [只看该作者]

看了一下，代码没问题。

 

你可以弹出str(i)的值看一下，每次肯定不同。

 

不会做就上传具体例子。
 回到顶部
帅哥哟，离线，有人找我吗？
jwt
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：204 积分：2037 威望：0 精华：0 注册：2015/3/6 17:12:00 		  发帖心情 Post By：2015/12/15 16:32:00 [只看该作者]

项目管理---窗口设计----抽取窗口----点击按钮即可，窗口是独立的，能看到表内数据并没有进行排序
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/12/15 16:44:00 [只看该作者]

汗，40题，抽40题，勾选的肯定是全部。

 

要想排序变化，参考

 

For i As Integer = 0 To 40- 1 '40为要抽取的行数
    DataTables("题库").DataRows(str(i))("抽取") = True
    DataTables("题库").DataRows(str(i))("_Sortkey") = i
Next
 回到顶部
帅哥哟，离线，有人找我吗？
jwt
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：204 积分：2037 威望：0 精华：0 注册：2015/3/6 17:12:00 		  发帖心情 Post By：2015/12/15 16:50:00 [只看该作者]

谢谢袍哥

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.08496 秒, 5 次数据查询