Visual FoxPro 9.0中如何用do while编程出1到1000中所有能被3和5同时整除的数？谢谢了

答案：CLOSE DATABASES
i=1
DO WHILE i<=1000 do
  IF MOD(i,3)=0 AND MOD(i,5)=0 then
   ??i
  endi
i=i+1
endd

其他：clear
i=1
do while .t.
     do case
          case  i%3=0 and i%5=0
              ?i
          case i>1000
          exit
     endcase
i=i+1
enddo 

上一个：foxpro 怎样截取 字段中‘-’左面的数据
下一个：求Visual FoxPro高手给个操作过程