مثال تتبع تنفيذ اكواد على Do while .. Loop

[س ا يوسف]

تتبع تنفيذ الاكواد


Dim x, total, limit As Integer

(limit = Integer.Parse(Me.txtLimit.Text

x = 1

Do While x <= limit

total = total + x

x = x + 2

Loop

( "##",Me.Label2.Text = Format(total

You can see links before reply

[س ا يوسف]

عمليات التتبع
هي ايجاد القيم في كل خطوة من خطوات البرنامج
الخطوة 1 سيكون عندنا 3 متغيراتx و total و Limt
الخطوة 2 قيمة limt حسب الشكل 8
الخطوة 3 قيمة x هي 1
الخطوة 4 نري 1 اقل من 8 اذن الشرط صحيح ننفذ ما بعد do
الخطوة 5 نضيف قيمة x اخر قيمه لها 1 الي total اخر قيمة صفر وتضعها في total ليتكون 1
الخطوة 6 نزيد x ب 2 فتكون 3
الخطوة 7 نعود الي الخطوة 4 لاختبار الشرط مرة اخري
الخطوة 4 نري 3 اخر قيمة لـ x اقل من 8 اذن الشرط صحيح ننفذ ما بعد do
الخطوة 5 نضيف قيمة x اخر قيمه لها3 الي total اخر قيمة 1 وتضعها في total ليتكون 4
الخطوة 6 نزيد x ب 2 فتكون 5
الخطوة 7 نعود الي الخطوة 4 لاختبار الشرط مرة اخري
الخطوة 4 نري 5 اخر قيمة لـ x اقل من 8 اذن الشرط صحيح ننفذ ما بعد do
الخطوة 5 نضيف قيمة x اخر قيمه لها5 الي total اخر قيمة 4 وتضعها في total ليتكون 9
الخطوة 6 نزيد x ب 2 فتكون 7
الخطوة 7 نعود الي الخطوة 4 لاختبار الشرط مرة اخري
الخطوة 4 نري 7 اخر قيمة لـ x اقل من 8 اذن الشرط صحيح ننفذ ما بعد do
الخطوة 5 نضيف قيمة x اخر قيمه لها7 الي total اخر قيمة 9 وتضعها في total ليتكون 16
الخطوة 6 نزيد x ب 2 فتكون 9
الخطوة 7 نعود الي الخطوة 4 لاختبار الشرط مرة اخري
الخطوة 4 نري 59 اخر قيمة لـ x ليست اقل من او تساوي 8 اذن الشرط خطأننفذ ما بعد Loop
الخطوة 8 نظهر قيمة total مكان label2 اي تظهر 16 كما بالشكل

[س ا يوسف]

الحل سيكون بجدول

You can see links before reply

[elsanea]

مجهود رائع ونرجو المزيد

[احبائى في الله]

شكراااااااااااااااااا

[anamisry]

السلام عليكم
اعجبنى جدا هذا المنتدى
بارك اللهم فيكم على هذا المجهود

[shrefmax2010]

الف شكر على هذا المثال هذا ما كنت احتاجه

[Wtukur]

tricor price fenofibrate 160mg without prescription (You can see links before reply) fenofibrate for sale online

[Zgrqkl]

purchase ketotifen ziprasidone 80mg pills (You can see links before reply) buy imipramine generic

[Entifx]

mintop generic buy flomax generic (You can see links before reply) cheap erectile dysfunction pills online

[Yasilz]

purchase aspirin without prescription order aspirin 75 mg without prescription (You can see links before reply) buy imiquad generic

[Lvtixd]

how to get dipyridamole without a prescription gemfibrozil tablet (You can see links before reply) order pravastatin 20mg

[Rmwjdg]

purchase florinef generic dulcolax online buy (You can see links before reply) imodium uk

[Hbklrj]

buy generic prasugrel online buy tolterodine 1mg pills (You can see links before reply) tolterodine canada

[Eoytgc]

buy prilosec tablets prilosec online order (You can see links before reply) order generic metoprolol

[Oxbzxd]

buy cenforce 50mg online cheap cost naprosyn (You can see links before reply) buy chloroquine 250mg sale

[Ugcjoj]

omnicef pills purchase cefdinir (You can see links before reply) purchase prevacid for sale

[Rpvpvc]

accutane 40mg tablet buy amoxil 500mg pill (You can see links before reply) zithromax for sale online

[Qzjhjc]

online casinos for real money slots games free (You can see links before reply) buy generic furosemide

[Bgjzsr]

free online blackjack no download levothyroxine tablet (You can see links before reply) levothyroxine oral

[Eqjtbj]

clomiphene 100mg over the counter buy clomid 50mg without prescription (You can see links before reply) imuran price

[Rnhqgy]

buy alendronate 35mg pills order colchicine 0.5mg for sale (You can see links before reply) brand nitrofurantoin 100 mg

[Apgjoh]

oral inderal plavix 150mg over the counter (You can see links before reply) buy plavix without prescription

[Adgahw]

buy coumadin 5mg generic buy warfarin no prescription (You can see links before reply) reglan drug

[Gqphty]

buy pepcid 40mg without prescription pepcid 40mg cheap (You can see links before reply) tacrolimus online buy

[Obwwqi]

nexium 40mg generic generic remeron (You can see links before reply) buy topamax pill

[Pwqjwn]

buspirone price amiodarone 100mg tablet (You can see links before reply) amiodarone 100mg usa

[Fmcuuj]

domperidone generic tetracycline canada (You can see links before reply) tetracycline 500mg pill

[Nugzyp]

flomax 0.2mg oral buy zofran 4mg without prescription (You can see links before reply) buy generic simvastatin 20mg

[Jipjpi]

pay for dissertation buy an essay online cheap (You can see links before reply) write essay service

[Ghdhwy]

order spironolactone online cheap spironolactone 100mg cheap (You can see links before reply) order finasteride sale

[Knvuwo]

sildenafil usa oral sildenafil (You can see links before reply) buy estrace 1mg online cheap

[Oeuhmh]

order diflucan pill buy generic baycip online (You can see links before reply) baycip medication

[Kkkehs]

buy lamotrigine 50mg order lamotrigine 200mg online (You can see links before reply) brand vermox

[Qsjyhc]

flagyl where to buy order bactrim pill (You can see links before reply) order cephalexin 250mg generic

[Bptgon]

order retin generic buy retin generic (You can see links before reply) buy stendra cheap

[Lctlbq]

cleocin 150mg pills purchase fildena online cheap (You can see links before reply) cheap ed pills

[Wrhejd]

buy tamoxifen 10mg for sale order nolvadex pills (You can see links before reply) budesonide online

[Vuscqq]

order tadalafil 20mg sale tadalafil over the counter (You can see links before reply) brand indomethacin 50mg

[Wprdsc]

buy ceftin 250mg without prescription cost ceftin 500mg (You can see links before reply) robaxin 500mg price

[Ybkevh]

terbinafine over the counter online casino real money us (You can see links before reply) doubleu casino online casino

[Bdkvsy]

buy generic desyrel brand sildenafil 100mg (You can see links before reply) purchase clindac a gel

[Rygtfw]

essays online to buy published research papers (You can see links before reply) buy cefixime for sale

[Ikpvre]

edit my paper casino game (You can see links before reply) best online casinos real money

[Fwndte]

buy amoxicillin macrobid us (You can see links before reply) buy clarithromycin online

[Mckbgj]

catapres brand order clonidine online cheap (You can see links before reply) order spiriva 9mcg online

[Vkragz]

acne treatment for teens dermatology buy trileptal online cheap (You can see links before reply) buy oxcarbazepine without prescription

[Qkygva]

buy minocin 100mg generic order ropinirole 1mg online (You can see links before reply) requip cost

[Ocmakq]

uroxatral ca prescription meds for heartburn (You can see links before reply) types of acid medication

[Vybshb]

buy letrozole 2.5mg without prescription buy albendazole 400 mg without prescription (You can see links before reply) buy cheap generic aripiprazole

[Zalpaj]

sleeping prescription sleeping pills online strongest natural sleeping pills (You can see links before reply) approved weight loss injections

[Fnufqh]

provera 5mg uk purchase microzide pill (You can see links before reply) buy hydrochlorothiazide 25mg

[Tnoasw]

new drug to quit smoking dmard for ra drug list (You can see links before reply) best painkillers on preescription

[Wyiave]

order cymbalta sale cymbalta 40mg brand (You can see links before reply) order provigil

[Lmaign]

how to get rid of toenail fungus most common antifungal drugs (You can see links before reply) alpha 1 adrenergic agonists

[Qriwji]

order phenergan pills promethazine 25mg usa (You can see links before reply) ivermectin 200

[Zvzzhi]

duodenitis treatment guidelines tricks to lower blood pressure instantly home remedies (You can see links before reply) types of urinary bacterial infections

[Qphtwd]

order prednisone 10mg pill buy isotretinoin 40mg pills (You can see links before reply) order amoxicillin 250mg pill

[Pwhhht]

best over the counter ppi best nausea medicine in hospitals (You can see links before reply) prescription for gas and bloating

[Dmyfxj]

zithromax 250mg brand omnacortil price (You can see links before reply) gabapentin 800mg pills

[Axwmxo]

ursodiol price order generic cetirizine (You can see links before reply) cetirizine 10mg cheap

[Ekairo]

buy strattera no prescription purchase quetiapine for sale (You can see links before reply) order zoloft generic

[Llcnzq]

buy lasix generic diuretic monodox drug (You can see links before reply) ventolin inhalator online order

[Gthtxb]

escitalopram 20mg canada buy escitalopram for sale (You can see links before reply) order revia 50mg generic

[Tyktxv]

order generic augmentin 625mg order clomid 50mg generic (You can see links before reply) clomid 100mg sale

[Yzlkxn]

ipratropium 100mcg tablet linezolid 600 mg uk (You can see links before reply) linezolid oral

[Bqnppg]

buy starlix 120 mg sale nateglinide 120mg uk (You can see links before reply) buy atacand 8mg online cheap

[Vxbwhd]

buy tegretol 200mg pill carbamazepine 400mg sale (You can see links before reply) order lincomycin

[Upsufw]

buy cenforce 100mg generic chloroquine us (You can see links before reply) buy glucophage for sale

[Kbuzjm]

order atorvastatin pill lisinopril 10mg us (You can see links before reply) lisinopril 2.5mg cost

[Pxlwad]

cheap cefadroxil duricef pills (You can see links before reply) buy combivir without a prescription