VB如何跳到下个循环

[lp0814]

我想实现这个功能：我写了一个循环，每次循环给都会产生一个数值A，然后用数值A产生数值B，但是在A得到B的过程中有个验证，如果A满足，继续下一步，如果不满足，直接跳到下一个循环。
我开始在if判断里面加了个 next 但是这个样运行的时候总提示 缺少 FOR，应该怎么实现这个跳到下一个循环？

[skylinecn]

给你个大概思路，自己修改

Private Sub Command1_Click()
    a% = 3
    For i = 1 To 10
        For j = 1 To 10
            If j = a Then Exit For
        Next j
    Next i
End Sub

[skylinecn]

再一个思路，不过尽量少用。

Private Sub Command1_Click()
    a% = 3
    For j = 1 To 10
        If j = a Then GoTo B1
    Next j
    Exit Sub
B1:
    For i = 1 To 10
        '另一个循环
    Next i
End Sub

[world_broken]

跳到下一个循环？ 还是直接跳到NEXT ,goto 应该可以的 嵌套循环？

[lp0814]

[Quote=引用 11 楼 dingyanwei 的回复:]
我估计lz要的是这个



VB code

for i=1 to 100
if 符合条件 then
'继续
else
i=i+1'跳过一个
end if
next i
[/Quote]
11楼我感觉错了 ，这样多跳了个i

[dingyanwei]

如果A满足，继续下一步<----请明确继续下一步的意思，是继续循环还是退出循环

如果不满足，直接跳到下一个循环。<----请明确下一个循环的意思，是跳出本次循环后进入另外一个循环，还是跳过此次i后进行i++循环

lz表达十分不明确，大家回复都是各自想法，还请lz明示

[lp0814]

对不住啊4楼大哥，我是LZ，结贴的那个页面我把答案看成5楼了。。给成5楼了

[chinaboyzyq]

for i=0 to 100
a=i
if a<20 then
b=a*100
endif
next

[贝隆]

要从这个循环跳到另一个循环，只有用GoTO语句。

[兔子-顾问]

[Quote=引用 5 楼 veron_04 的回复:]
要从这个循环跳到另一个循环，只有用GoTO语句。
[/Quote]
vb的硬伤
直到vb2008才支持continue关键字。

[嗷嗷叫的老马]

保存相关信息，以便下次恢复循环。

对于FOR来说，保存一下循环变量即可，下次跳入时会继续。

但进入与退出都需要是正常进入与退出，不能直接跳。

[yachong]

VB6没有continue，这种问题就用4楼的办法搞定吧

[熊孩子开学喽]

VB没有continue, 用判断语句就可以了, 两者等效.

[dingyanwei]

我估计lz要的是这个

for i=1 to 100
    if 符合条件 then
        '继续
    else
        i=i+1'跳过一个
    end if
next i

[无·法]

一楼二楼理解错误，四楼正解。

continue就是不继续执行循环体下面一片代码，跳到下次循环。那么将上面那片代码放到if判断中是一样的效果。用goto也可以

for i=0 to 100
a=i
if a>=20 then goto l_next
b=a*100
l_next:
next

[yachong]

[Quote=引用 15 楼 lp0814 的回复:]
对不住啊4楼大哥，我是LZ，结贴的那个页面我把答案看成5楼了。。给成5楼了
[/Quote]
哈哈

[嗷嗷叫的老马]

杯具....

[vnking]

5楼捡到了，VB没有continue真是杯具！