| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1035 人关注过本帖
标题:谁帮忙看看,这个代码怎么写
只看楼主 加入收藏
星光悠蓝
Rank: 9Rank: 9Rank: 9
来 自:山水甲天下
等 级:贵宾
威 望:52
帖 子:523
专家分:1278
注 册:2010-1-11
收藏
得分:0 
先统计出现的次数,再排列。
2014-10-17 11:20
期待ing11
Rank: 1
等 级:新手上路
帖 子:19
专家分:0
注 册:2014-10-14
收藏
得分:0 
回复 10 楼 taifu945
我已经这样处理了。
就是显示方面有什么办法比较好显示出来呢
2014-10-17 11:32
kiff
Rank: 11Rank: 11Rank: 11Rank: 11
来 自:广州
等 级:贵宾
威 望:46
帖 子:756
专家分:2531
注 册:2013-1-30
收藏
得分:0 
SELECT 分数,COUNT(*) 次数 FROM 原表 INTO CURSOR t2 GROUP BY 分数 ORDER BY 次数 DESC,分数 desc
CREATE CURSOR t3 (次数 int,分数 c(254))
GO TOP IN t2
SELECT t2
str1=''
i=次数
SCAN
    IF 次数=i
        str1=str1+TRANSFORM(分数)+','
    ELSE
        str1=LEFT(str1,LEN(str1)-1)
        INSERT INTO T3(次数,分数) VALUES (I,str1)
        I=次数
        str1=TRANSFORM(分数)+','
    ENDIF
ENDSCAN
str1=LEFT(str1,LEN(str1)-1)
INSERT INTO T3(次数,分数) VALUES (I,str1)
SELECT T3
BROWSE
2014-10-17 11:56
期待ing11
Rank: 1
等 级:新手上路
帖 子:19
专家分:0
注 册:2014-10-14
收藏
得分:0 
回复 13 楼 kiff
万分感谢啊,太厉害了,完美解决!!
还想请教一下,我设置了个按钮,怎么一点,显示的表把整个表单遮挡掉,能在表单中插一个表来显示吗?
整个表单显示表内容,其他的都看不到了

[ 本帖最后由 期待ing11 于 2014-10-17 13:23 编辑 ]
2014-10-17 12:55
kiff
Rank: 11Rank: 11Rank: 11Rank: 11
来 自:广州
等 级:贵宾
威 望:46
帖 子:756
专家分:2531
注 册:2013-1-30
收藏
得分:0 
以下是引用期待ing11在2014-10-17 12:55:26的发言:

万分感谢啊,太厉害了,完美解决!!
还想请教一下,我设置了个按钮,怎么一点,显示的表把整个表单遮挡掉,能在表单中插一个表来显示吗?
整个表单显示表内容,其他的都看不到了
用GRID控件绑定这个表显示,具体参照帮助资料
2014-10-17 13:38
liuxingang28
Rank: 11Rank: 11Rank: 11Rank: 11
来 自:山东济南
等 级:贵宾
威 望:47
帖 子:653
专家分:2160
注 册:2014-2-7
收藏
得分:0 
俺也来凑个热闹:
程序代码:
CLEAR
SELECT 分数,COUNT(*) as 次数 ;
    FROM 表 ;
    GROUP BY 分数 ;
    INTO CURSOR curTmp ;
    ORDER BY 次数 desc,分数 desc
DO WHILE NOT EOF()
    nTimes = 次数
    ? '出现次数'+TRANSFORM(次数)+'次的数字:'
    SCAN REST WHILE 次数 = nTimes
        ?? 分数
    ENDSCAN
ENDDO
USE IN curTmp

泉城飞狐
2014-10-17 14:04
期待ing11
Rank: 1
等 级:新手上路
帖 子:19
专家分:0
注 册:2014-10-14
收藏
得分:0 
回复 15 楼 kiff
控件recordsource="T3"
用这个吗?可以显示出来了,就是点击按钮执行你写的那代码,还是会整个表单显示表,关掉表才可以看到表单。被遮挡了
还有就是表次数的列单宽度能设置吗?太宽了
帮帮忙,谢谢了,就差这一步了
2014-10-17 16:20
期待ing11
Rank: 1
等 级:新手上路
帖 子:19
专家分:0
注 册:2014-10-14
收藏
得分:0 
回复 16 楼 liuxingang28
大哥,看不懂。。。新手啊。刚才那哥们写的,我直接套进去的,还是看不懂意思
2014-10-17 16:21
快速回复:谁帮忙看看,这个代码怎么写
数据加载中...
 
   



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

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