vb6.0 Do While Loop读取文件，本行不符合条件，跳出本次循环，进来下一行循环

vb6.0 Do While Loop读取文件，本行不符合条件，跳出本次循环，进入下一行循环
   While Not File.AtEndOfStream
                       
                        DoEvents
                   
                        '读该行文件
                        strReadLine = fOldFile.ReadLine
                      if（不符合条件）'进去下一个循环

Loop



想实现跳出本次循环，进入下一个循环，
在网上找一只找不到方法

vb6.0
------解决思路----------------------
改变一下思维：
While Not File.AtEndOfStream
                       
                        DoEvents
                   
                        '读该行文件
                        strReadLine = fOldFile.ReadLine
                      if（符合条件）'进去下一个循环

                      endif                    
Loop
------解决思路----------------------

'结构化的语句是这样的'

While Not File.AtEndOfStream

    DoEvents

    strReadLine = fOldFile.ReadLine

                      

    If 符合条件 Then

        做处理

    End If

Loop