一个老项目中来了个需求,改点东西,VB6的代码,要在循环中根据条件跳过某次循环,也就是实现类似其他语言中的从continue功能。

网上查了一圈,VB6的语法原因,没有提供continue关键字。

根据一些建议,用了goto,实际不行,goto的话整个循环都结束了,并非只是跳过其中某一次。

解决的方案是用常规的if判断,不符合条件的不执行即可。

For hCol = 0 To Cols - 1
    If hCol = 11 Then 
        //跳过    

    Else
        //...处理
       
    End If 
Next hCol

问题解决。