| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2170 人关注过本帖
标题:VB如何对ACCESS一个字段重新排序,其它内容保持不变
只看楼主 加入收藏
natesc
Rank: 1
等 级:新手上路
帖 子:42
专家分:0
注 册:2013-9-15
结帖率:37.5%
收藏
 问题点数:0 回复次数:1 
VB如何对ACCESS一个字段重新排序,其它内容保持不变
现有表格如下,其中的TMNUM想每次按一个按钮,实现随机排列一次,要求不重复。
思路:按按钮时清除TMNUM内容,然后重新赋值给他,不知道代码如何写

每个ZJID 下面的TMNUM都是从1开始排列到最大值的

图片附件: 游客没有浏览图片的权限,请 登录注册


AAAAAAAAAA.rar (133.26 KB)


[此贴子已经被作者于2019-12-24 22:53编辑过]

搜索更多相关主题的帖子: VB 内容 重新 字段 排序 
2019-12-24 22:51
厨师王德榜
Rank: 18Rank: 18Rank: 18Rank: 18Rank: 18
等 级:贵宾
威 望:199
帖 子:987
专家分:4946
注 册:2013-2-16
收藏
得分:0 
说一下算法,具体代码没有时间写,可以提供思路。
1、SELECT  zjid ,count(*) as 条数 FROM TMInfo group by  zjid   ;
先生成一个查询(暂时命名为查询1),从而获得所有的zjid 和他们各自的条数。
2、在这个查询1中循环,每循环一条,就取出 查询1.sjid (例如首次是1),拼凑成一个新的查询语句:
select  tmid ,TMInfo.ZJID,TMNUM  from TMInfo  where  TMInfo.zjid = 1
执行这个语句,得到临时表1
3、在临时表1 中打乱TmNum的排序(方法很多,这里不详细写了,有随机函数,也有总条数,应该对你不难)
4、打乱后,update临时表中的TmNum 到 TMInfo中去 (可以用临时表1的tmid为关联字段)
5、删除临时表,从查询1中取第二条记录,拼凑新的查询语句,
select  tmid ,TMInfo.ZJID,TMNUM  from TMInfo  where  TMInfo.zjid = 2  ’以后还有3、4、5.……
执行这个语句,并重新生成临时表1……重复第3、4、5步,继续循环,直到查询1被全部循环。
2019-12-28 13:08
快速回复:VB如何对ACCESS一个字段重新排序,其它内容保持不变
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.015490 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved