مرحبا شباب كيف حالكم ؟ انشاء الله كلكم بخير …….
إلى خبراء visiual basic اريد خبير عشان يخبرني كيف اسوي LOOP في visiual basic
يعني شو code حقه……..؟؟؟
انتظر الرد السريع من الناس الطيبين …………… وشكرا……
مرحبا شباب كيف حالكم ؟ انشاء الله كلكم بخير …….
إلى خبراء visiual basic اريد خبير عشان يخبرني كيف اسوي LOOP في visiual basic
يعني شو code حقه……..؟؟؟
انتظر الرد السريع من الناس الطيبين …………… وشكرا……
Loop هي احدى الدوال اللي تفيد التكرار
تستخدم هذة الأداة مع Do ... ويفيدون التكرار اللامنتهي أو المشروط
وأوردت مثالا يوضح المشروط ...
أو نضع في الفورم زر Command ونكتب داخلة هذا الكود
<BLOCKQUOTE><font size="1" face=" Arial">code:</font><HR><pre>
Do While inpName <> "ok"
inpName = InputBox("Enter your name or ok to quit")
If inpName <> "ok" Then Print inpName
Loop
[/code]
وضعنا متغيرا اسمة inpName واسترطنا مساواتة نصيا بالحرف ok
عند ضغط زر Command يطلب منك ادخال أي شي ....
تستمر هذة العملية في التكرار حتى تدخل الحرف ok وبعدها يتوقف البرنامج
أرجو ان أكون قد وضحت لك الصورة المطلوبة
------------------
ســـامر الليـــــــل
ويوجد حلقة غير Do While
وهي For Next
ومثالها
<BLOCKQUOTE><font size="1" face=" Arial">code:</font><HR><pre>
For i = 1 to 7
print "Hello world"
Next i
[/code]
وهنا سوف تطبع Hello world 7 مرات
------------------
المعرفة قوة