身为一个菜鸟悲哀啊！

[baikun2011]

求哪位高手大侠给我讲一下循环就是 DO WHILE 语句究竟是怎么用的啊？以前老师也泛泛的讲过，感觉自己也学懂了，但是在实际操作中，始终用起来不太顺手啊，能给我举个例详解一下吗？

[ACMAIN_CHM]

建议楼主随便找个例子，然后尽最大努力把这个例子解释一下，不确定或者不理解的地方哪怕猜一下也行。
这样别人可以基于你的理解或猜想的基础之上有目的的给你讲解。

[十豆三]

vfp9 汉化版帮助文件自带的例子：

在下例中，用 DO WHILE 循环统计仓库中价格高于 20 美元的产品数量，遇到文件结束符(EOF)时，退出 DO WHILE 循环并显示总数。

  复制代码 
CLOSE DATABASES
OPEN DATABASE (HOME(2) + 'Data\testdata')
USE products  && 打开 Products 表
SET TALK OFF
gnStockTot = 0

DO WHILE .T.  && 开始循环
   IF EOF( )
      EXIT
   ENDIF
   IF unit_price < 20
      SKIP
      LOOP
   ENDIF
   gnStockTot = gnStockTot + in_stock
   SKIP
ENDDO     && 结束循环

CLEAR
? '库存中的总项价值超过 20 美元的:'
?? gnStockTot
 

[十豆三]

[Quote=引用 3 楼 jxjdzwang5555 的回复:]
gnStockTot = gnStockTot + in_stock

首先，我是菜鸟，但不悲哀。尺有所短寸有所长，学就是了，没有什么大不了的。
为什么不是gnStockTot = gnStockTot + 1？in_stock是什么东东，菜鸟不懂啊，不过不悲哀。
[/Quote]in_stock 是 'Data\testdata' 表中的字段名

[dfwxj]

gnStockTot = gnStockTot + 1是计数，循环的目的不仅仅是计数

[jxjdzwang5555]

gnStockTot = gnStockTot + in_stock

首先，我是菜鸟，但不悲哀。尺有所短寸有所长，学就是了，没有什么大不了的。
为什么不是gnStockTot = gnStockTot + 1？in_stock是什么东东，菜鸟不懂啊，不过不悲哀。

[jxjdzwang5555]

谢谢老师们指点。
CLOSE DATABASES
OPEN DATABASE (HOME(2) + 'Data\testdata')
USE products && 打开 Products 表
SET TALK OFF
gnStockTot = 0
scan for unit_price > 20 && 开始循环
gnStockTot = gnStockTot + in_stock
endscan && 结束循环

CLEAR
? '库存中的总项价值超过 20 美元的:'
?? gnStockTot

[皮卡]

do while .t.
IF 退出条件成立则
BREAK
ELSE
继续

ENDDO