一组5000个学生考试等级，总共10个科目，查找出考试等级满足3A5B1C的学生名单，请问怎么查找？
如题，查找出只有一科C，三科以上A，其他为B的学生，请问VFP如何实现？
2016-02-29 23:41
2016-02-29 23:42
2016-03-01 00:08
2016-03-01 00:23
2016-03-01 00:24
程序代码：CREATE CURSOR TT (CJ C(9),结果 C(10))
INSERT INTO TT(CJ) VALUES ("CDDAABAAA")
INSERT INTO TT(CJ) VALUES ("CDDACDBBC")
INSERT INTO TT(CJ) VALUES ("DDDBDDDDC")
INSERT INTO TT(CJ) VALUES ("BBDABBBBB")
INSERT INTO TT(CJ) VALUES ("CDDADDCDD")
INSERT INTO TT(CJ) VALUES ("CDDACDABA")
INSERT INTO TT(CJ) VALUES ("CDDBDDBDB")
INSERT INTO TT(CJ) VALUES ("CDDADCCCB")
INSERT INTO TT(CJ) VALUES ("BCDAAABBB")
INSERT INTO TT(CJ) VALUES ("DDDBDDDBC")
INSERT INTO TT(CJ) VALUES ("ABABBCBBA")
LOCAL TJ[4]
SCAN
TJ=0
FOR I=1 TO 9
CC=SUBSTR(CJ,I,1)
DO CASE
CASE CC="A"
TJ[1]=TJ[1]+1
CASE CC="B"
TJ[2]=TJ[2]+1
CASE CC="C"
TJ[3]=TJ[3]+1
CASE CC="D"
TJ[4]=TJ[4]+1
ENDCASE
ENDFOR
REPLACE 结果 WITH IIF(TJ[1]>0,STR(TJ[1],1)+"A","");
+IIF(TJ[2]>0,STR(TJ[2],1)+"B","");
+IIF(TJ[3]>0,STR(TJ[3],1)+"C","");
+IIF(TJ[4]>0,STR(TJ[4],1)+"D","")
ENDSCAN
*BROWSE
*查询结果
SELECT * FROM TT WHERE ALLTRIM(结果)=="3A5B1C" INTO CURSOR JG
BROWSE
2016-03-01 01:04
2016-03-01 02:54
2016-03-01 03:12
2016-03-01 08:08
2016-03-01 10:33