تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
Continue Statement (Visual Basic)
#1
كاتب الموضوع : جهاد العريقي



هذة الجملة تفيد في الانتقال بين التكرارات او Loops
الشكل العام


كود :
[COLOR=#000000][COLOR=#007700]Continue { Do | For | While }  
[/COLOR][/COLOR]


يمكن الانتقال كن Loop الى اخر عن طريق هذة الجملة Continue ويتم ذلك با ختبار شرط الحلقة او التكرار .
ويمكن استخدام هذة الجملة في أي مكان من التكرار الذي نريد الانتقال منة وهذة الجملة تسمح بنقل التحكم تماما مثل الجملة
GO TO Statement

مثال على هذة الجملة :



كود :
[COLOR=#000000][COLOR=#0000bb]
Dim row[/COLOR][color=#007700], [/color][color=#0000bb]col [/color][color=#007700]As [/color][COLOR=#0000bb]Integer  
Dim lastrow [/COLOR][color=#007700]As [/color][color=#0000bb]Integer [/color][color=#007700]= [/color][COLOR=#0000bb]6
Dim lastcol [/COLOR][color=#007700]As [/color][color=#0000bb]Integer [/color][color=#007700]= [/color][COLOR=#0000bb]10  
Dim a[/COLOR][color=#007700](,) As [/color][color=#0000bb]Double [/color][color=#007700]= New [/color][color=#0000bb]Double[/color][color=#007700]([/color][color=#0000bb]lastrow[/color][color=#007700], [/color][color=#0000bb]lastcol[/color][COLOR=#007700]) {}  
[/COLOR][color=#0000bb]Dim b[/color][color=#007700]([/color][color=#0000bb]7[/color][color=#007700]) As [/color][color=#0000bb]Double row [/color][color=#007700]= -[/color][COLOR=#0000bb]1

[/COLOR][color=#007700]While [/color][color=#0000bb]row [/color][color=#007700]< [/color][color=#0000bb]lastrow row [/color][color=#007700]+= [/color][color=#0000bb]1 col [/color][color=#007700]= -[/color][COLOR=#0000bb]1  
  
[/COLOR][color=#007700]While [/color][color=#0000bb]col [/color][color=#007700]< [/color][COLOR=#0000bb]lastcol  
      col [/COLOR][color=#007700]+= [/color][COLOR=#0000bb]1  
      a[/COLOR][color=#007700]([/color][color=#0000bb]row[/color][color=#007700], [/color][color=#0000bb]col[/color][color=#007700]) = [/color][COLOR=#0000bb]0

[/COLOR][color=#007700]For [/color][color=#0000bb]i [/color][color=#007700]As [/color][color=#0000bb]Integer [/color][color=#007700]= [/color][color=#0000bb]0 To b[/color][color=#007700].[/color][color=#0000bb]GetUpperBound[/color][color=#007700]([/color][color=#0000bb]0[/color][COLOR=#007700])

  If [/COLOR][color=#0000bb]b[/color][color=#007700]([/color][color=#0000bb]i[/color][color=#007700]) = [/color][COLOR=#0000bb]col Then  
      
     [/COLOR][COLOR=#007700]Continue While  

  Else  
     [/COLOR][color=#0000bb]a[/color][color=#007700]([/color][color=#0000bb]row[/color][color=#007700], [/color][color=#0000bb]col[/color][color=#007700]) += ([/color][color=#0000bb]row [/color][color=#007700]+ [/color][color=#0000bb]b[/color][color=#007700]([/color][color=#0000bb]i[/color][color=#007700])) / ([/color][color=#0000bb]col [/color][color=#007700]- [/color][color=#0000bb]b[/color][color=#007700]([/color][color=#0000bb]i[/color][COLOR=#007700]))

  [/COLOR][color=#0000bb]End [/color][COLOR=#007700]If  

[/COLOR][COLOR=#0000bb]Next i

End [/COLOR][COLOR=#007700]While
[/COLOR][color=#0000bb]End [/color][COLOR=#007700]While  
[/COLOR][/COLOR]

في المثال السابق استخدمنا While Continue لتجاوز العمود في المصفوفة وذلك حسب الشرط If b(i)=col يعني اذا تم القسمة على صفر .

ومن الملاحظ ان Continue داحل الحلقة For وتقوم با التحويل الى الجملة


كود :
[color=#000000][COLOR=#007700]While [/color][color=#0000bb]col [/color][color=#007700]< [/color][COLOR=#0000bb]lastcol  
[/COLOR][/COLOR]

اي الى عمق التكرار التالي يعني While الحلقة التي تحتوي التكرارFor .
}}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Information تحميل برنامج الفيجوال بيسك 2010 download visual basic 2010 mohamed atef2018 0 257 09-07-16, 08:30 PM
آخر رد: mohamed atef2018
  كيفية تغيير خلفية محرر الكود في Visual Studio 2010 إلى صورة أبو عمر 0 566 06-09-15, 06:44 PM
آخر رد: أبو عمر
  من اين تبداء مع Visual Studio واى اصدار تختار ali.alfoly 4 1,644 30-12-13, 11:10 PM
آخر رد: essabar
  معلومة ::: Call Into The .NET Framework From Existing Visual Basic 6.0 Apps RaggiTech 1 418 06-10-12, 10:40 PM
آخر رد: RaggiTech
  معلومة ::: Visual Studio 2005 Automation Samples RaggiTech 1 363 06-10-12, 08:00 PM
آخر رد: RaggiTech
  خصائص جميع أنواع البيانات في Visual Basic RaggiTech 0 1,076 03-10-12, 01:48 PM
آخر رد: RaggiTech
  جميع إختصارات ال Visual studio .net RaggiTech 0 528 03-10-12, 12:29 PM
آخر رد: RaggiTech
  Auto-Implemented Properties In Visual Basic 2010 RaggiTech 1 342 01-10-12, 04:36 PM
آخر رد: RaggiTech
  خصائص جميع أنواع البيانات في Visual Basic Aly El-Haddad 0 662 25-09-12, 07:35 PM
آخر رد: Aly El-Haddad
  Auto-Implemented Properties In Visual Basic 2010 Islam Ibrahim 0 431 17-09-12, 01:09 PM
آخر رد: Islam Ibrahim

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم