루프

Question

위해 나는

For x = LBound(arr) To UBound(arr) 

    sname = arr(x) 
    If instr(sname, "Configuration item") Then 
     '**(here i want to go to next x in loop and not complete the code below)** 

    '// other code to copy past and do various stuff 

Next x 

그래서 나는 단순히 문 Then Next x있을 수 있다고 생각 다음 코드를 가지고 있지만, 이것은 "아니오 문에 대해 선언 '오류가 계속.

If instr(sname, "Configuration item") Then 다음에 x의 다음 값으로 진행하려면 무엇을 넣을 수 있습니까?

Answer 1

이렇게 Next을 사용할 수 없습니다. 대신 GoTo 문을 사용하여 수행하려고하는 것과 같은 것을 얻을 수 있지만 대체로 인위적이고 비실용적 인 경우에는 GoTo을 예약해야합니다.

Do 

    '... do stuff your loop will be doing 

    ' skip to the end of the loop if necessary: 
    If <condition-to-go-to-next-iteration> Then GoTo ContinueLoop 

    '... do other stuff if the condition is not met 

ContinueLoop: 
Loop 

Answer 2

당신은 GoTo가 사용할 수 있습니다 : 귀하의 경우

는 정말 간단하고 깨끗하고 읽을 수있는 대안이있다.

For x = LBound(arr) To UBound(arr) 
    sname = arr(x) 
    If InStr(sname, "Configuration item") Then 
     'Do nothing here, which automatically go to the next iteration 
    Else 
     'Code to perform the required action 
    End If 
Next x 

Answer 3

몇 년 늦게, 그러나 여기하는 또 다른 대안입니다 :

If Not InStr(sname, "Configuration item") Then 
     '// other code to copy past and do various stuff 
    End If 

Answer 4

For i=1 To 10 
    Do 
     'Do everything in here and 

     If I_Dont_Want_Finish_This_Loop Then 
      Exit Do 
     End If 

     'Of course, if I do want to finish it, 
     'I put more stuff here, and then... 

    Loop While False 'quit after one loop 
Next i 

Answer 5

가끔 두 번 할 루프 수행

Do 

    Do 

     If I_Don't_Want_to_Finish_This_Loop Then Exit Do 

     Exit Do 

    Loop 

Loop Until Done 

을이 "고토 스파게티"

Answer 6

후 년의 많은 데 ... 나는 일이에게 좋아하는 것을 피한다 :

For x = LBound(arr) To UBound(arr): Do 

    sname = arr(x) 
    If instr(sname, "Configuration item") Then Exit Do 

    '// other code to copy past and do various stuff 

Loop While False: Next x