Как можно выйти из цикла по условию? - VB

Формулировка задачи:

Здравствуйте ребята!, сравнительное время назад вами был предствавлен код по моей просьбе вот:
Private Sub Command1_Click()
'======================
'проверка строк на заполнение данными
Dim i As Integer
For i = 0 To 4
If Text1(i).Text = "" Then
Text1(i).BackColor = &HFF&
MsgBox "Не заполненно поле " & Label2(i), vbCritical, "информация!"
Exit For
End If
Text1(i).BackColor = &H80000005
Next i
    Form1.Show 1
End Sub
я хотел бы, спросить как можно выйти из цикла по условию, т.е если цикл True тогда продолжить загрузку формы, правда думал продолжить оператором Else, но "чайник" так и не догадался, как это делается

Код к задаче: «Как можно выйти из цикла по условию? - VB»

textual
Dim i As Integer
Dim z As Integer
For i = 0 To 4
If Text1(i).Text = "" Then
Text1(i).BackColor = &HFF&
MsgBox "Не заполненно поле " & Label2(i), vbCritical, "информация!"
Exit For
End If
Text1(i).BackColor = &H80000005
z=z+1
Next i
If z=4 Then
    Form1.Show 1
End If
End Sub

6   голосов, оценка 3.333 из 5


СОХРАНИТЬ ССЫЛКУ