for i=1 to n
for j=i+1 to n
if a(i)==a(j) and b(i)==b(j) and c(i)==c(j)
d(i)='1' d(j)='2'
endif
endfor
endfor
这样写可以吗，不能运行，请高手指点

d(i)='1' d(j)='2'
改
d(i)='1'
d(j)='2'
程序没细看。

怎么还是不行，运行完for 循环就结束了，不执行if语句，怎么回事啊？

N=10 &&假设N=10
for i=1 to n
for j=i+1 to n
if a(i)==a(j) and b(i)==b(j) and c(i)==c(j)
d(i)='1'
d(j)='2'
else
?"..." &&加进这条语句，就是想判断if...else...endif到底有没有执行
endif
endfor
endfor

我用调试器 调试，还是没有执行就endfor了。
是不是软件本身的问题，重装一下？

我的VFP6.0能执行

clear
N=10 &&假设N=10
for i=1 to n
for j=i+1 to n
if I+J>=N&&a(i)==a(j) and b(i)==b(j) and c(i)==c(j)
* d(i)='1'
* d(j)='2'
??"XXX"
else
??"..." &&加进这条语句，就是想判断if...else...endif到底有没有执行
endif
endfor
?
endfor

结果
.....................XXXXXX
...............XXXXXXXXX
.........XXXXXXXXXXXX
...XXXXXXXXXXXXXXX
XXXXXXXXXXXXXXX
XXXXXXXXXXXX
XXXXXXXXX
XXXXXX
XXX

可见IF和ELSE都能运行

检查：你的程序中有没有表打开?打开的表中有没有i和j这样的字段?n的值是多少?a,b,c,d等数组有没有定义并赋字符型值?