vfp6.0教程！！！！！！！会的请进！！！！！！！！！！

vfp6.0教程！！！！！！！会的请进！！！！！！！！！！

clear &清屏

for i=-5000 to 5000 step 2 &从-5000到5000开始循环，步长为2。

if mod(i,7)=0 &如果I与7的余数为零。

??i &同行输出I。

endif &结束条件语句。

endfor &结束循环。