تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] كيف اجعل الـ Do تبدا القراءة للتالي
#1
مثلا لدي صفحات عديدة محفوظة اريد ان اجعل البرنامج يتحقق منها ان وجدها يتخطاها
اعرف التحقق من وجود صفحة لكن كيف اجعل جملة do تنتقل للرابط التالي
هل الكود التالي صحيح؟
كود :
re:

            dettxt()
            Dim url As String = forum_furl & forum_threadurl & forum_last_thread_number
            turl.Text = url

  If IO.File.Exists(forum_lbldir & forum_last_thread_number.ToString("00000") & "_.htm") Then
                forum_last_thread_number -= 1
                progpage.Value += 1
                GoTo re
            End If

طبعا كل هذا ضمن do

كود :
Do Until bgw1.CancellationPending = True Or forum_last_thread_number < forum_oldest_thread_number
re:

            dettxt()
            Dim url As String = forum_furl & forum_threadurl & forum_last_thread_number
            turl.Text = url

  If IO.File.Exists(forum_lbldir & forum_last_thread_number.ToString("00000") & "_.htm") Then
                forum_last_thread_number -= 1
                progpage.Value += 1
                GoTo re
            End If

loop
الرد }}}
تم الشكر بواسطة:
#2
السلام عليكم ورحمة الله وبركاته

استعمل الأمر Continue

على النحو التالي

كود :
Do
            If Not True Then
                Continue Do
            End If
        Loop
الرد }}}
تم الشكر بواسطة: سعود , kslawy , 3booody


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيف اجعل قيمة dateTimePicker2 تساوي dateTimePicker1 Adel27213 2 280 09-11-23, 09:07 PM
آخر رد: Adel27213
  كيف اجعل البرنامج في بداية الشهر ينفذ حدث معين بالاصح اريد البرنامج في تاريخ واحد من Adel27213 3 484 05-11-23, 01:45 AM
آخر رد: justforit
  [VB.NET] كيف اجعل البرنامج يحدد اخر يوم من كل شهر Adel27213 2 361 03-11-23, 06:50 AM
آخر رد: Adel27213
  هل ممكن اجعل عناصر ال LISTBOX بشكل افقي ismaeel 0 380 01-05-23, 11:26 PM
آخر رد: ismaeel
  كيف اجعل Autoscroll هي التي تزيد عدد الصفوف في عرض البيانات عبدالكريم برشدان 1 625 07-08-22, 02:55 PM
آخر رد: asmarsou
  كيف اجعل اداة panel شفافة عمار عمار 3 1,243 10-02-22, 11:53 AM
آخر رد: عمار عمار
  كيف اجعل خلفية اداة Label1 شفافة aftfm 8 4,510 29-01-22, 01:42 AM
آخر رد: محمود الصياد
  [VB.NET] كيف اجعل داتا جريد فيو ينتقل مع تاكست بوكس bilgacim 1 1,008 28-01-22, 04:30 AM
آخر رد: سعود
Sad [VB.NET] كيف اجعل برنامجي يفتح المتصفح الافتراضي ؟؟ ana ali 4 1,296 24-07-21, 04:00 PM
آخر رد: trakktour
  [VB.NET] كيف اجعل PictureBox شفافة 3asfa~mdmra 12 5,567 11-11-20, 04:51 AM
آخر رد: salahalmasry

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


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