Цикл с использованием конструкции For...Next
For...Keyingi konstruksiyasi buyruqlar ketma-ketligini ma’lum bir necha marta bajaradi. Bunday konstruktsiya sikl deb ataladi va u bajaradigan dastur kodlari tsiklning tanasi deb ataladi.
For.. .Keyingi konstruksiyaning sintaksisi quyidagicha:
For счетчик = начЗначение То конЗначение [Step шаг]
конструкции
Next[счетчик]
Qurilishning birinchi argumenti - hisoblagich - tsiklning necha marta bajarilishini "hisoblaydigan" o'zgaruvchining nomini belgilaydi. StartValue parametri siklning birinchi o'tishidan oldin hisoblagich o'zgaruvchisiga tayinlangan raqamli qiymatni belgilaydi. Hisoblagich qiymati then kalit so'zidan keyin ko'rsatilgan yakuniy qiymatdan oshib ketguncha sikl bajariladi. Loopning har bir iteratsiyasidan so'ng, hisoblagich qiymati step kalit so'zidan keyin belgilangan qadam qiymatiga o'zgartiriladi. Keyingi kalit so'z halqa tanasining oxirini belgilaydi va talab qilinadi.
Loopning har bir iteratsiyasidan oldin Visual Basic hisoblagich va conValue argumentining qiymatlarini taqqoslaydi. Hisoblagich qiymati belgilangan qiymatdan oshmasa, konValue, tsikl tanasi konstruktsiyalari bajariladi. Aks holda, boshqaruv Next dan keyin keyingi konstruktsiyaga o'tadi. Masalan:
For nCountVar = 1 То 10 Step 2
nNextWeek(nCountVar) = nCountVar * 2
Next
Bu yerda sikl besh marta nCountVar 1, 3, 5, 7 va 9 hisoblagich qiymatlari bilan bajariladi. E'tibor bering, hisoblagich o'zgaruvchisi sikl tanasida muntazam o'zgaruvchi sifatida ishlatiladi.
Hisoblagich o'sishi salbiy bo'lishi mumkin. Masalan:
For nCounter = 100 То 1 Step -10
nDecades(nCounter) = nCounter *2
Next
Bunday holda, tsikl nCountVar 1 dan katta bo'lsa, bajariladi. Agar sikl qadamining qiymati manfiy bo'lsa, u holda hisoblagichning boshlang'ich qiymati oxirgi qiymatdan katta bo'lishi kerak.
Qadam kalit so'zini o'tkazib yuborish mumkin. Bunday holda, standart qadam qiymati 1 ga teng.
Loopning bajarilishi mumkin bo'lmagan yoki aksincha, uning bajarilishi cheksiz bo'lib qoladigan vaziyatlar mavjud. Masalan:
* Bajarilmagan tsikl: boshlang'ich hisoblagich qiymati
* ijobiy tsikl qadami bilan oxiridan kattaroq
For nCounter=100 To 1
nDecades (nCounter) = nCounter
Next
* Cheksiz tsikl: hisoblagich qiymati
* tsiklning tanasida o'zgarishlar va hech qachon 10 dan oshmaydi For nCounter = 1 Keyin 10nCounter = 1
Next
Do'stlaringiz bilan baham: |