这个只输出 cnt 列到数组
SELECT CNT FROM (Select code, Sum(cnt) as cnt from (cTemp) group by code ORDER BY CODE) A into array a双飞统计

晕死，输不输出 code 到数组有什么关系？都输出时你只用第二列不就行了
for ii = 1 to alen(a双飞统计,1)
    ...
    ....Caption = trans(a双飞统计[ii,2])
endfor

[此贴子已经被作者于2023-4-22 22:54编辑过]

thank you

这个我知道，就是刚才那个，到数组是错误的，数据有错，现在对了

都输出才是正确的做法，这样在发现数据对不上时，可以把 code 和 cnt 同时显示出来方便查找原因

Select code, Sum(cnt) as cnt from (cTemp) group by code ORDER BY CODE into array a双飞统计
for ii = 1 to alen(a双飞统计,1)
    ...
    ....Caption = a双飞统计[ii,1] + ' : ' + trans(a双飞统计[ii,2])
endfor

你这界面设计能力跟写代码能力极度不匹配，看你布局和配色还蛮有美工功底的，代码就写得实在太烂了

[此贴子已经被作者于2023-4-22 23:33编辑过]

ps我的强项，vfp,弱爆了

数据还是有错，你看一下程序哪里有错，现在是统计不完全
图1中有14个双飞，程序统计出来才11个，另外统计还有错，没得24双飞，程序也统计出来了，麻烦看一下

cTemp = Sys(2015)
Create Cursor (cTemp) (code V(4), cnt I)
cFlds = '00,01,02,03,04,05,06,07,08,09' ;
    + ',11,12,13,14,15,16,17,18,19' ;
    + ',22,23,24,25,26,27,28,29' ;
    + ',33,34,35,36,37,38,39' ;
    + ',44,45,46,47,48,49' ;
    + ',55,56,57,58,59' ;
    + ',66,67,68,69' ;
    + ',77,78,79' ;
    + ',88,89 ';
    + ',99'
    
For ii = 1 to ALines(aFlds, cFlds, 1+4, ',')
    Insert into (cTemp) (code) Values (aFlds[ii])
EndFor
Select 历史同期查询
Scan all
    Scatter name oRec Fields 期号,组选号
    c双飞号 = Chrtran('XY,XZ,YZ', 'XYZ', m.oRec.组选号)
    For jj = ALines(a双飞号, c双飞号, 1+4, ',') to 2 step -1
        If a双飞号[jj] == a双飞号[jj-1]        && 去重
            a双飞号[jj] = ''
        EndIf
    EndFor
    For jj = 1 to Alen(a双飞号)
        If !Empty(a双飞号[jj])
                Insert into (cTemp) (code, cnt) Values (a双飞号[jj], 1)        
        EndIf
    EndFor
EndScan
SELECT CNT FROM (Select code, Sum(cnt) as cnt from (cTemp) group by code ORDER BY CODE) A into array a双飞统计

我删除了一些数据库字段，但是应该和字段没关系吧！组选号字段还是在的，这是必须要的字段

[此贴子已经被作者于2023-4-23 17:15编辑过]

把 历史同期查询 这个表传上来，我要用这个表来跟踪

Select code, Sum(cnt) as cnt from (cTemp) group by code into array a双飞统计
for ii = 1 to alen(a双飞统计,1)
    g= trans(a双飞统计[ii,1])
    t= trans(a双飞统计[ii,2])
    ?g,t
endfor
我刚才又这样验证了一次数据又是正确的，还是你说得对，必须要完全输出到数组，这样才能更好验证数据，我在多验证几次，如果在有问题，在来请教你

我觉得问题是出在
SELECT CNT FROM (Select code, Sum(cnt) as cnt from (cTemp) group by code ORDER BY CODE) A into array a双飞统计
这句上面

[此贴子已经被作者于2023-4-23 17:49编辑过]

Select code, Sum(cnt) as cnt from (cTemp) group by code into array a双飞统计
这句你最好加上 order by
Select code, Sum(cnt) as cnt from (cTemp) group by code order by code into array a双飞统计