عبارة الخروج Vsual Basic) )
الـخروج من إجراء أو كتله و نقل التحكم مباشرةً للكشف الذي يتبع استدعاء الإجراء أو تعريف الكتله.
Exit { Do | For | Function | Property | Select | Sub | Try | While }
الأجزاء
Do
ينهي مباشرة التكرار الحلقي Do في المكان الذي يظهر فيه. يستمر التنفيذ مع كشف الذي يلي كشف Loop . Exit Do يمكن استخدامها فقط داخل تكرار حلقي Do . عند استخدامها داخل الحلقات المتداخلة Do , Exit Do يقوم بإنهاء التكرار الحلقي الأعمق ثم ينقل عنصر التحكم إلى المستوى الأعلى للتداخل.For
ينهي مباشرة التكرار الحلقي For في المكان الذي يظهر فيه. يستمر التنفيذ مع كشف الذي يلي كشف Next . Exit For يمكن استخدامها فقط داخل For Next أو تكرار حلقي For EachNext . عند استخدامها داخل الحلقات المتداخلة For , Exit For يقوم بإنهاء التكرار الحلقي الأعمق ثم ينقل عنصر التحكم إلى المستوى الأعلى للتداخل.Function
قم بإنهاء فورا الإجراء Function في المكان الذي يظهر فيه. يستمر تنفيذ مع الكشف الذي يلي العبارة التي استدعت إجراء Function . Exit Function يمكن استخدامها فقط داخل إجراء Function.Property
قم بإنهاء فورا الإجراء Property في المكان الذي يظهر فيه. يستمر التنفيذ مع كشف الذي استدعى إجراء Property أي، مع كشف الذي يطلب أو يعين قيمة الخاصية. Exit Property يمكن استخدامها فقط داخل إحدى خصائص الخصائص Get أو إجراء Set .Select
قم بإنهاء فوراً كتلة Select Case في المكان الذي تظهر فيه. يستمر التنفيذ مع كشف الذي يلي كشف End Select . Exit Select يمكن استخدامها فقط داخل كشف Select Case .Sub
قم بإنهاء فورا الإجراء Sub في المكان الذي يظهر فيه. يستمر تنفيذ مع الكشف الذي يلي العبارة التي استدعت إجراء Sub . Exit Sub يمكن استخدامها فقط داخل إجراء Sub.Try
قم بإنهاء فوراً كتلة Try أو Catch في المكان الذي تظهر فيه. يستمر التنفيذ مع كتلة Finally إذا كان هناك سمة أو مع العبارة التي تلي كشف End Try خلاف ذلك. Exit Try يمكن استخدامها فقط داخل Try أو Catch الكتله, و ليس داخل Finally الكتله.While
ينهي مباشرة التكرار الحلقي While في المكان الذي يظهر فيه. يستمر التنفيذ مع كشف الذي يلي كشف End While . Exit While يمكن استخدامها فقط داخل تكرار حلقي While . عند استخدامها داخل الحلقات المتداخلة While , Exit While ينقل عنصر التحكم إلى الحلقة التي في مستوى حلقة متداخلة واحده أعلى التكرار الحلقي نفس حيث يحدث Exit While.
ملاحظات
لا تخلط بين عبارات Exit مع عبارات End. Exit لا تحدد نهاية الكشف.
مثال
يستخدم المثال التالي كشف Exit لإنهاء For... Next التكرار الحلقي, Do التكرار الحلقي, و Sub الإجراء.
Sub exitStatementDemo()
Dim demoNum As Single
' Set up an infinite loop.
Do
For i As Integer = 1 To 10000000
demoNum = Int(Rnd() * 100)
Select Case demoNum
Case 7 : Exit For
Case 29 : Exit Do
Case 54 : Exit Sub
End Select
Next i
Loop
End Sub
راجع أيضًا:
المرجع
كشف Do...التكرار الحلقي (Visual Basic)
عبارة Visual Basic) For Each...Next)
عبارة Visual Basic) For...Next)