如何for循环延长迭代

Question

我正在寻找一个像下面

dim i as integer 
dim j as integer = 5 

For i = 0 To j 
    If i = 5 Then 
     i = 10 
     j = 20 
    End If 

Next 

“”如果我= 5，然后我想我递增到10和j为20，使循环将循环扩展到10到20

任何人都可以告诉我如何做到这一点。

Answer 1

dim i as integer = 1 
dim j as integer = 5 
while i <= j 
    if i = 5 then 
     i = 10 
     j = 20 
    end if 
end while 

我认为，随着一段时间你会发现它更容易理解

Answer 2

不要试图改变你的循环变量。循环总是打到5，因此'延长'到10，首先将它循环到10。如果要在内部使用更改的值j，则请在适当的时间创建一个不同的变量k，您将其从5更改为10，并使用k代替。