VisualFreeBasic:VisualBasic6望尘莫及之循环内控制
VisualBasic6：微软出品、简单易用，虽然几十年前的，依旧生命顽强，以下简称：VB6VisualFreeBasic：集合VB6的易用和采用c语言的优点及编程底层操作，VB6高手的进阶语言，以下简称：VFB
循环内控制语句，就是循环内使用的语句，例： Exit For
VB6：Exit For | Do | While 就是退出循环
VFB：Exit For | Do | While | Select 退出循环
Continue For | Do | While 下一个循环
表面上看去，只是多了 Continue ，但实际上还有更强大的功能：
Exit For,For 可以退出多级循环
例题：
Dim As Integer i, j
For i = 1 To 10
For j = 1 To 10
Exit For, For'直接退出2个循环，当然支持N级循环。
Next j
Print "我永远不会被显示出来"
Next i
'直接退到这里
Continue {Do | For | While}是 控制流程语句继续循环的下一个迭代
Dim As Integer n
Print "这是0到10之间的奇数！"
For n = 0 To 10
If ( n Mod 2 ) = 0 Then
Continue For'就是直接返回到 For n = 0 To 10这行执行，效果同 Next n
End If
Print n
Next n
当然还支持 N级跳转
''简单素数查找器
Print "这是1到20之间的素数！"
Dim n As Integer, d As Integer
For n = 2 To 20
For d = 2 To Int(Sqr(n))
If ( n Mod d ) = 0 Then 'd划分n
Continue For, For 'n不是素数，所以请尝试下一个n
End If
Next d
Print n
Next n
是不是看到这里，VFB写代码比VB6简单方便多了，这只是部分，更多请亲自尝试下VFB，会给你新的编程世界。
啥也不说了，感谢楼主分享哇！
页:
[1]