do while .....
 ......
 If InStr("abc", "b") > 0 Then continue Loop
 ......
loop

Select all