Переход к следующему "значению" цикла

[ndemidov]

Код: Выделить всё

For i = 0 to MAXLEN Step n
    If <особое условие> Then
   
    End if
    .........
Next i

Если <особое условие> равно TRUE, то нужно, чтобы дальше тело цикло не выполнялось, i увеличилась/уменьшилась на n и выполнилось тело цикла для следующего i (равного i +n). Exit For - не то. Спомощью какого VB (2005) оператора это сделать?

[Хакер]

GoTo? Аналогов Continue здесь нет.

По идее, Вместо "Next i" должно быть "End For", а "Next i" должен делать как раз то, что тебе нужно.

[ndemidov]

Да, делаю сейчас посредством GoTo:

Код: Выделить всё


For i = 0 to MAXLEN Step n
    Label1:

    ..........
    ..........
    If <особое условие> Then
        ..........
        i += n
        GoTo Label1
    End if
    .........
    .........
Next i

Аналогов Continue здесь нет.

Понял, спасибо.

[Хакер]

Делаешь ерунду полную.

Код: Выделить всё

For i = 0 to MAXLEN Step n
    ..........
    ..........
    If <особое условие> Then GoTo Label1
    .........
    .........
    Label1:
Next i

[1Steps]

Код: Выделить всё

For i = 0 to MAXLEN Step n

    If <особое условие> Then Continue For
    .........
    .........
Next i

[VVitafresh]

Код: Выделить всё

For i = 0 to MAXLEN Step n
    If <особое условие> Then
   
    End if
    .........
Next i

Если <особое условие> равно TRUE, то нужно, чтобы дальше тело цикло не выполнялось, i увеличилась/уменьшилась на n и выполнилось тело цикла для следующего i (равного i +n). Exit For - не то. Спомощью какого VB (2005) оператора это сделать?

А может лучше написать:

Код: Выделить всё

For i = 0 to MAXLEN Step n
    .........
    If NOT(<особое условие>) Then
        'Выполняем все что нужно если <особое условие> НЕ равно TRUE
    End if
Next i

[brigval]

Код: Выделить всё

For i = 0 to MAXLEN Step n
    If <особое условие> Then
   
    End if
    .........
Next i

Если <особое условие> равно TRUE, то нужно, чтобы дальше тело цикло не выполнялось, i увеличилась/уменьшилась на n и выполнилось тело цикла для следующего i (равного i +n). Exit For - не то. Спомощью какого VB (2005) оператора это сделать?

Если цикл должен продолжаться, то можно сделать так

Код: Выделить всё

For i = 0 to MAXLEN Step n
    If <особое условие> Then i = i + n
    .........
Next i

если только

выполнилось тело цикла для следующего i (равного i +n)

то можно так

Код: Выделить всё

Dim bExitFor As Boolean
For i = 0 to MAXLEN Step n
    If <особое условие> Then
       i = i + n
       bExitFor = True
    End if
    .........
    If bExitFor Then Exit For
Next i


[Хакер]

brigval
Ты что-то путаешь.

[ndemidov]

Хакер, 1Steps, Спасибо.
VVitafresh, Возмржно, лучше, но это ещё больше ухудшит читаемость (там и так много условных операторов).

Если цикл должен продолжаться, то можно сделать так

Код: Выделить всё

For i = 0 to MAXLEN Step n
    If <особое условие> Then i = i + n
    .........
Next i

Не получиться: до (и после) "особого условия" полно кода. А особое условие уничтожает объект, на который больше нельзя ссылаться.

[Хакер]

ndemidov
Я склоняюсь к мнению, что brigval написал полную чушь.

[ndemidov]

В любом случае я [(плохо OR несовсем понятно) = TRUE] описал (как часто бывает ) описал задачу.

[Viper]

ndemidov, вот как раз в VB2005 появился оператор Continue, конкретно в приминении к For это выглядит так:

Код: Выделить всё

For i As Integer = 0 To 10
    If i = 5 Then Continue For
    Console.WriteLine(i)
Next

Данный код напечатает числа от 0 до 10, за исключением 5.
Хакер, гм... низачот!

[brigval]

С учетом последующих пояснений ndemidov мой пост, действительно, выглядит как чушь. Но, как ответ на первый вопрос темы, мой пост выглядит вполне прилично.
Удачи!