VFP 程序设计_嵌套循环_错在哪儿了_只有第一行的dpth计算正确,第二行的计算结果就不对了
程序代码:
GOTO TOP DO WHILE .NOT. EOF() S=0 FOR k=1 TO ALEN(B)+1 IF k=ALEN(B)+1 REPLACE dpth WITH k ELSE Y=B(k) S=S+&Y ?"S=",S IF S<(yxkc_All+ykzt_all) LOOP ELSE REPLACE dpth WITH IIF(ISNULL(k-1+1-(S-yxkc_all-ykzt_all)/&Y)=.T.,0,(k-1+1-(S-yxkc_all-ykzt_all)/&Y)) FOR &Y>0 EXIT &&这里使用exit到底是只跳出for..endfor循环,还是跳出了do while... enddo 的循环 ENDIF ENDIF ENDFOR SKIP +1 ENDDO