سؤال رهيب علي جملة For..Next

هل هذا الكود يفيد

Dim A as integer

A=10

For X= 0 To A

If X=5 Then A=A+x

Next

معليش نسيت اصفر X

الكود مره تانية

Dim a As Integer

a = 10

For x = 0 To a

If x = 5 Then x = 0 And a = a + x

Next

لا ادري اذا كان موجود في اللغة continue ام لا

for(i=0;i<j;i++)
{
if (j==5)
continue;

//else do you code..
}

إفهموني رجاءً إخواني ...

أنا أريد إذا تحقق الشرط يعود وكانة بدأ تشغيل الـ For من جديد

أي زي كإنة يخرج من الـ loop ثم يعود ينشأ جملة الـ For من جديد

أريد البرنامج الذي يحاكي هذا الكود ولكن بدون إستخدام Goto

L:

For i as int = 0 To n

      if i=4 Then Goto L

Next i

Goto هي الحل الوحيد

For i as int = 0 To n

     if i=4 Then Goto L

Next i

بإمكانك عمل التالي

For i as int = 0 To n

     if i=4 Then i=0

Next i

بكل بساطة بتعيد تصفير العداد

goto لسه موجوده في ال vb.net ??? ده أنا نسيتها يمكن من أيام Qbasic , vb6 مع الأعتزاز الكبير للجميع الأصدارات البيسيكية الحبيبة

يـــــــــــــــــــــــــــــــــــــــــــــــــــا شباب

أنا عمري ما إستخدمت Goto ولا أريد إستخدامها مطلقاً

هل هناك طريقة أخرى ...

اقتباس

يـــــــــــــــــــــــــــــــــــــــــــــــــــا شباب

أنا عمري ما إستخدمت Goto ولا أريد إستخدامها مطلقاً

هل هناك طريقة أخرى ...

لقد أعطاك Only The Lonely الحل، وهو أبسط وأفضل حل يمكن الوصول إليه برأيي، أما إذا أردت حلولاً أخرى فأظنك تستطيع الوصول إلى العشرات ولكن بالطبع يبقى حل Only The Lonely هو الأفضل:

حلاً آخر:

Dim x As Integer
        Do
            If x <> 50 Then
                x += 1
            Else
                x = 0
            End If

        Loop

وحلاً آخر:

Dim x As Integer
        Do
            For x = 0 To 100
     If x = 50 Then
                    Exit For
                End If
            Next

        Loop While x = 50

اقتباس

لا ادري اذا كان موجود في اللغة continue ام لا

نعم يوجد جملة resume ولكنها لن تنفع في حلّ السؤال المطروح