select a,sum(b) as b from 表1

那是字符型的好吗朋友！没有高手进来指点下吗

SET ENGINEBEHAVIOR 70

USE 表1

SELECT 表1.a,b FROM 表1 group BY 1 INTO CURSOR temp readw

ALTER TABLE temp alter COLUMN b C(27)

REPLACE ALL b WITH ""

FOR i=1 to recc()
    GO i
    FOR j=1 TO RECCOUNT("表1")
        GO j IN 表1
        IF a=表1.a
            REPLACE b WITH ALLTRIM(b)+IIF(EMPTY(b),"",",")+;
TRANSFORM(表1.b)
        ENDIF 
    NEXT  
NEXT 
BROWSE

谢谢qjbzjp老师！运行起来很正确