如何做一下函数替换循环
想把yw,sx,yy,wl,hx,sw,zz,ls,dl,zf 变成变量把20—1追加到条件为 yw,sx,yy,wl,hx,sw,zz,ls,dl,zf=1—20名的类别为“加强”“奥赛”的数组里。
有解决办法吗?
程序代码:
REPLACE ALL ywkmjf WITH 20 FOR ywjfmc=1 AND 类别="加强" REPLACE ALL ywkmjf WITH 19 FOR ywjfmc=2 AND 类别="加强" REPLACE ALL ywkmjf WITH 18 FOR ywjfmc=3 AND 类别="加强" REPLACE ALL ywkmjf WITH 17 FOR ywjfmc=4 AND 类别="加强" REPLACE ALL ywkmjf WITH 16 FOR ywjfmc=5 AND 类别="加强" REPLACE ALL ywkmjf WITH 15 FOR ywjfmc=6 AND 类别="加强" REPLACE ALL ywkmjf WITH 14 FOR ywjfmc=7 AND 类别="加强" REPLACE ALL ywkmjf WITH 13 FOR ywjfmc=8 AND 类别="加强" REPLACE ALL ywkmjf WITH 12 FOR ywjfmc=9 AND 类别="加强" REPLACE ALL ywkmjf WITH 11 FOR ywjfmc=10 AND 类别="加强" REPLACE ALL ywkmjf WITH 10 FOR ywjfmc=11 AND 类别="加强" REPLACE ALL ywkmjf WITH 09 FOR ywjfmc=12 AND 类别="加强" REPLACE ALL ywkmjf WITH 08 FOR ywjfmc=13 AND 类别="加强" REPLACE ALL ywkmjf WITH 07 FOR ywjfmc=14 AND 类别="加强" REPLACE ALL ywkmjf WITH 06 FOR ywjfmc=15 AND 类别="加强" REPLACE ALL ywkmjf WITH 05 FOR ywjfmc=16 AND 类别="加强" REPLACE ALL ywkmjf WITH 04 FOR ywjfmc=17 AND 类别="加强" REPLACE ALL ywkmjf WITH 03 FOR ywjfmc=18 AND 类别="加强" REPLACE ALL ywkmjf WITH 02 FOR ywjfmc=19 AND 类别="加强" REPLACE ALL ywkmjf WITH 01 FOR ywjfmc=20 AND 类别="加强" REPLACE ALL ywkmjf WITH 18 FOR ywjfmc=1 AND 类别="奥赛" REPLACE ALL ywkmjf WITH 17 FOR ywjfmc=2 AND 类别="奥赛" REPLACE ALL ywkmjf WITH 16 FOR ywjfmc=3 AND 类别="奥赛" REPLACE ALL ywkmjf WITH 15 FOR ywjfmc=4 AND 类别="奥赛" REPLACE ALL ywkmjf WITH 14 FOR ywjfmc=5 AND 类别="奥赛" REPLACE ALL ywkmjf WITH 13 FOR ywjfmc=6 AND 类别="奥赛" REPLACE ALL ywkmjf WITH 12 FOR ywjfmc=7 AND 类别="奥赛" REPLACE ALL ywkmjf WITH 11 FOR ywjfmc=8 AND 类别="奥赛" REPLACE ALL ywkmjf WITH 10 FOR ywjfmc=9 AND 类别="奥赛" REPLACE ALL ywkmjf WITH 09 FOR ywjfmc=10 AND 类别="奥赛" REPLACE ALL ywkmjf WITH 08 FOR ywjfmc=11 AND 类别="奥赛" REPLACE ALL ywkmjf WITH 07 FOR ywjfmc=12 AND 类别="奥赛" REPLACE ALL ywkmjf WITH 06 FOR ywjfmc=13 AND 类别="奥赛" REPLACE ALL ywkmjf WITH 05 FOR ywjfmc=14 AND 类别="奥赛" REPLACE ALL ywkmjf WITH 04 FOR ywjfmc=15 AND 类别="奥赛" REPLACE ALL ywkmjf WITH 03 FOR ywjfmc=16 AND 类别="奥赛" REPLACE ALL ywkmjf WITH 02 FOR ywjfmc=17 AND 类别="奥赛" REPLACE ALL ywkmjf WITH 01 FOR ywjfmc=18 AND 类别="奥赛"