vfp6.0 do while 循环 loop 怎么一下退出了就 ?

[chinawcs]

sele bm_data  
  go top
  DO WHIL NOT EOF()
     m_dlh=allt(dlh)
     m_dlh_len=len(allt(dlh))
     
    if   m_dlh_len==0 
     ....
       skip 
       loop  
     endi
  enddo 

........
  

bm_data 表 有多个记录 我的本意是 判断 一个字段 符合条件就 结束当前 进行下一个 循环 可以 执行后 遇到loop 一下就完全退出循环了 奇怪了

[wwwwb]

loop->exit，退出循环

[十豆三]

改为：

Select bm_data
Scan
If Len(Allt(dlh))=0
Exit
Endif
Endscan

[十豆三]

或改为：

Select bm_data
Scan
If Empty(dlh)
Exit
Endif
Endscan

[chinawcs]

我不是要 exit 退出 do while

而是 继续 循环 只是 不要运行 loop 下面的代码了 ?

加入有6条记录 bm_data go top 后 判断条件

符合条件 后 转去 判断下一条记录 而不是 exit 整个循环

不知道我说清楚没有

[wwwwb]

不用加LOOP，自动LOOP，直到EOF

[chinawcs]

sele bm_data  
  go top
  DO WHIL NOT EOF()
     m_dlh=allt(dlh)
     m_dlh_len=len(allt(dlh))
     
    if   m_dlh_len==0 
     ....
*下一个循环 判断下一个记录 这里改怎么写 我目前的 loop 一下就退出了 整个循环 有问题!
      .....
     endi
  enddo 

........

[chinawcs]

类似于 delphi 里的 continue ;

结束本次循环 进行下一个循环

是应该是loop 嘛 ? loop 后面的代码 应该不执行才对 可现在 执行呀 不对着呢 我调试了

[wwwwb]

sele bm_data
go top
DO WHIL NOT EOF()
m_dlh=allt(dlh)
m_dlh_len=len(allt(dlh))

if m_dlh_len==0 如果没有满足条件的记录，是否移动到下一记录
....
skip

endi
enddo

[chinawcs]

搞 好了 是我 马虎的原因

中间有代码 sele 其它表了

晕呀

[十豆三]

[Quote=引用 9 楼 chinawcs 的回复:]
搞 好了  是我 马虎的原因 

中间有代码 sele 其它表了

晕呀
[/Quote]

主要没有描述清楚