بيان GoTo

تحتوي فروع شروط إلى سطر محدد في إجراء.

GoTo line

جزء

  • line
    مطلوبة. التسمية أي سطر.

ملاحظات

العبارة GoTo يمكن تتفرع فقط على الخطوط في إجراء الذي يظهر فيها. يجب أن يكون السطر لخط التسمية GoTo يمكن أن تشير إليه. لمزيد من المعلومات، راجع كيفية القيام بما يلي: تسمية البيانات.

ملاحظة

العبارات GoTo يمكن أن يجعل التعليمات البرمجية صعبة في القراءة والاحتفاظ. عند الإمكان، استخدم بنية تحكم بدلاً من ذلك. لمزيد من المعلومات، راجع عنصر تحكم التدفق في Visual Basic.

لا يمكنك استخدام عبارة GoTo إلى فرع من خارج بناء For... Next, For Each... Next, SyncLock... End SyncLock, Try... Catch... Finally, With... End With، أو Using... End Using على عنوان في الداخل.

التفريع ثم حاول الإنشاءات

داخل الإنشاء Try... Catch... Finally , يطبق القواعد التالية التفريعي مع عبارة GoTo .

كتلة أو منطقة

التفريعي في خارج

التفريعي الخروج من داخل

كتلة Try

فقط من كتلة Catch من نفس الإنشاء 1

فقط إلى خارج بناء كاملة

كتلة Catch

غير مسموح

فقط إلى خارج بناء كاملة أو كتلة Try من نفس الإنشاء 1

كتلة Finally

غير مسموح

غير مسموح

1 إذا كان واحد الإنشاء Try... Catch... Finally تتداخل آخر، Catch يمكن التفرع كتلة في كتلة Try مستوى التداخل الخاص به ولكن لا في أي البعض كتلة Try . الإنشاء متداخل Try... Catch... Finally يجب أن يتم احتواء بشكل كامل في Try أو كتلة Catch من الإنشاء فإنه يتم تداخل خلالها.

يبين الرسم التوضيحي التالي بناء واحد Try تتداخل خلال آخر. تتم الإشارة إلى فروع متعددة بين كتل الإنشاء الصالح أو غير الصالح.

تحتوي الفروع الصالحة في الإنشاء الحلول

الرسم التخطيطي لرسم تفريغ إنشاءات Try

مثال

يستخدم المثال التالي عبارة GoTo إلى فرع تسميات سطر في إجراء.

    Sub gotoStatementDemo()
        Dim number As Integer = 1
        Dim sampleString As String
        ' Evaluate number and branch to appropriate label.
        If number = 1 Then GoTo Line1 Else GoTo Line2
Line1:
        sampleString = "Number equals 1"
        GoTo LastLine
Line2:
        ' The following statement never gets executed because number = 1.
        sampleString = "Number equals 2"
LastLine:
        ' Write "Number equals 1" in the Debug window.
        Debug.WriteLine(sampleString)
    End Sub

راجع أيضًا:

المرجع

كشف Do...التكرار الحلقي (Visual Basic)

عبارة Visual Basic) For...Next)

عبارة Visual Basic) For Each...Next)

كشف If...Then...Else (Visual Basic)

عبارة Visual Basic) Select...Case)

عبارة Visual Basic) Try...Catch...Finally)

كشف While...End While (Visual Basic)

كشف مع... إنهاء مع (Visual Basic)