تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
سؤال فى اللوب
#1
النسبة للوب Do While كيف يكون الأمر بتكرار اللوب لحين الضغط على زر معين(الزرCommand2 مثلآ)
[HTML]

Do While.........


Loop
[/HTML]
ولكم ألف شكر
الرد }}}}
تم الشكر بواسطة:
#2
اخي الكريم انظر للموضوع هذا الذي شرحه ولد رائع وان شاء الله راح تستفيد

http://vb4arb.com/vb/showthread.php?3582...-%E6-while
الرد }}}}
تم الشكر بواسطة:
#3
السلام عليكم...

1. قم بتعريف متغير في قسم التصريحات العام. مثلاً:
كود :
Private Continue As Boolean

2. كود الحلقة يكون كالتالي:
كود :
Continue = True
Do While Continue
    ' جملة برمجية
    ' جملة برمجية
    ' ... إلخ
    DoEvents
Loop

* جملة DoEvents مهمة جداً.

3. في زر الإيقاف، مثلاً Command2:
كود :
Continue = False

4. نرجو الاستفادة و السلام.
بِسْمِ اللهِ الرَّحْمَنِ الرَّحِيمِ ( وَ مَا تُقَدِّمُوا لِأَنفُسِكُم مِّنْ خَيْرٍ تَجِدُوهُ عِندَ اللهِ هُوَ خَيْراً وَ أَعْظَمَ أَجْراً ) صَدَقَ اللهُ الْعَظِيمُ
الرد }}}}
تم الشكر بواسطة:
#4
عاد الأستاذ الكبير/[SIZE=5]ناجى ابراهيم والحمد لله
بارك الله فيه
[/SIZE]
الرد }}}}
تم الشكر بواسطة:
#5
هذا مثال كامل ان شاء الله تستفيد منه

PHP كود :
Option Explicit

Dim lCounter 
As Boolean
Dim Stopped 
As Boolean


Private Sub Command1_Click()
Text1.Text 0
Stopped 
False


For lCounter Val(Text1To 32767
    Text1
.Refresh

     Text1 
lCounter
    
  
    DoEvents
   
If Stopped True Then Exit For
   
Next
End Sub

Private Sub Command2_Click()
 
Stopped True
Text1 
0

End Sub

Private Sub Command3_Click()
Stopped True 
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال حول اظهار النمادج او الفريم في شجرة التفرع عمور2016 2 240 19-02-17, 03:44 AM
آخر رد: sendbad100
  سؤال في الكتابة على التكست عمور2016 3 148 18-02-17, 12:21 PM
آخر رد: عمور2016
  سؤال هام فى الفيجوال بيسك فيجوال 6 الحلوانى 3 224 17-01-17, 04:14 PM
آخر رد: Ashraf Elafify
Wink [vb6.0] سؤال في الفيجوال بيسك6 amer2000 7 322 23-12-16, 03:27 AM
آخر رد: amer2000
  سؤال حول Listview superwoofer 0 140 18-12-16, 10:15 AM
آخر رد: superwoofer
Smile سؤال بخصوص تقسيم ساعات اليوم ارجوا المشاركه استايل 10 543 03-11-16, 11:54 PM
آخر رد: الاصيله
Smile سؤال بخصوص قراءة العدد العشري ارجوا الدخول استايل 6 413 28-07-16, 11:51 PM
آخر رد: استايل
  [vb6.0] سؤال عن طريق ربط الفيجوال بقاعدة عمور2016 2 263 02-07-16, 07:24 PM
آخر رد: عمور2016
  [vb6.0] سؤال حول اتجاه الارقام التصاعدية chaabane 4 301 07-06-16, 06:32 PM
آخر رد: chaabane
  سؤال : زر الطباعة في التقرير لا يعمل mh66 4 843 03-03-16, 10:59 AM
آخر رد: محمود العجيري

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


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