vb.net如何终止结束循环For Each s As String In strArr

在vb.net如何在For Each...... Next循环中终止或者跳出这个循环？

比如在一个循环中检测到错误，或者我行停止这个循环运行。我作为新手来讲，肯定是网上搜，但是搜到的答案，基本上也是学徒答的，有点不科学。更别说能解决了、其实vb.net里面有自己的循环终止代码的。原理就是如果一个变量改变了，就立即退出结束循环，请看下面代码，

比如，

Dim esc As Boolean = True
For Each subStr As String In subArr
If esc = True Then
程序代码，............
如果我设置 esc 不等于 True，这个里面的代码就不会运行。但是循环还是在的，循环的次数少的画是没啥影响，但是多了就会，vb.net本身里面就有这样的结构。接着往下看
End If
Next
复制

下面的代码差不多和上面一样，唯一的不一样就是，这个是直接结束循环。例子如下

For Each s As String In strArr

If esc = True Then Exit For 'esc强制退出循环
程序代码..........
如果循环里面出现esc变量不等于 True ，的设置，循环强制结束，这样是需要你自己是写，比如提示错误后，在里面加入 esc = False，错误的同时也把这个变量给改了，在返回循环的时候，上面的if就不成立，就自动结束了。
Next
复制