数据库记录的序号问题? 抽题的时候你并不一定要按序号抽呀.你可以在程序中用一个记录集打开这个题库表.按记录集中的每条记录的序号来抽题.这样你只要保证抽题的随机数不大于记录总数,就不会抽到空题了. 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 可不可以考虑换个方法不理会序号连不连续,出题时先把整个记录集读出来,根据记录数产生一个随机数,然后MOVE到此条记录.dim i as longdim k as longi = rst.RecordCount 'rst代表记录集randomizefor k = 1 to X 'X为准备出的题目的数量 i = int(rnd*i) + 1 rst.Move i '读出你需要的数据Next 下面这个想法你考虑一下:管理员删除的时间是少数,那么题的序号,你不要做成自增。在管理员删除的时候就将序号进行修改,这样就可以保证不会有不连续了啦! VB6怎么调用带指针的函数? 数据库调用一次后是否会驻留内存? 使用ADO连接mysql,select得到的记录集合为什么RecordCount=-1? 请问一下!! 怎样打印vb 的窗体的所有内容。。 编写普通的网络应用程序(TCP/IP),VB和Delphi哪个语言效率高? 为什么这代码有问题啊,烦,烦,烦啊!!!! MDI窗体控制,如何判断当前有子窗体打开?急! 请问如何设置初始值 选取记录的问题 关于 form 最大化的问题? QuicBasic的一个问题。老鸟来看看。
不理会序号连不连续,出题时先把整个记录集读出来,根据记录数产生一个随机数,然后MOVE到此条记录.dim i as long
dim k as longi = rst.RecordCount 'rst代表记录集
randomize
for k = 1 to X 'X为准备出的题目的数量
i = int(rnd*i) + 1
rst.Move i
'读出你需要的数据
Next
管理员删除的时间是少数,那么题的序号,你不要做成自增。
在管理员删除的时候就将序号进行修改,这样就可以保证不会有不连续了啦!