стання циклів в
VISUAL BASIC е дає можливість повторного виконання набору інструкцій -операторів. Деякі цикли повторюють інструкції, поки умова має значення
False , інші - поки значення умови рівно
True. Є також цикли, які повторюють набір інструкцій певне число разів. Такі цикли називаються циклами з параметром For ... Next .
Цикли For ... Next використовують в якості лічильника параметр - змінну, значення якої збільшується (зменшується) при кожному виконанні циклу. Синтаксис запису оператора циклу з параметром наступний:
For «параметр циклу»=«початкове значення» to «кінцеве значення» [step «крок»]
«Тіло циклу»
Next «параметр циклу»
Параметр циклу - ідентифікатор, параметр змінюється в циклі від початкового значення до кінцевого на кожному кроці на величину кроку. Якщо крок не вказаний, то за замовчуванням він дорівнює 1. Тіло циклу - це оператори - інструкції, які необхідно повторювати.
Приклад:
Dim At1 As Integer, j As Integer=0j=2 to 20 step 2=At1 + jj «Сума дорівнює» amp; At1
Невизначені цикли. Невизначені цикли виконуються в залежності від умови. Якщо умова виходу з циклу знаходиться в кінці циклу, то такий цикл називається циклом з постусловіем . Синтаксис запису оператора циклу з постусловіем наступний:
Do
«Тіло циклу»
Loop Until «Умова»
Умова перевіряється після того, як оператори, що входять в цикл, будуть виконані хоча б один раз. Цикл працює до тих пір, поки «Умова» є хибним.
Аналогічним такого циклу є цикл виду:
Do
«Тіло циклу»
Loop While «Умова»
Умова перевіряється після того, як оператори, складові тіло циклу, будуть виконані хоча б один раз. Цикл працює до тих пір, поки «Умова» залишається істинним.
Приклад:
Do
Pr=Input Box («Введіть пароль»)
Loop Until Pr=«QWERTY»
Якщо умова виходу з циклу знаходиться на початку циклу, то такий цикл називається циклом з передумовою . Синтаксис запису оператора циклу з передумовою наступний:
Do Until «Умова»
«Тіло циклу»
Loop
Цикл виконується до тих пір, поки «Умова» є хибним. Якщо умова істинно, то цикл виконуватися не буде.
Або цикл виду:
Do While «Умова»
«Тіло циклу»
Loop
Цикл називається «петля». Умова перевіряється, до того як виконується тіло циклу, будуть виконані хоча б один раз. Цикл продовжує свою роботу, поки «Умова» залишається істинним.
Приклад:
Const n As Integer=8
Dim S As Integer, j As Integer=0: j=2Until S gt; n=S + j ^ 2=j + 1. Caption=S
Різновидом циклів з передумовою є цикл типу Wend. Якщо умова істинно, то виконується тіло циклу. Якщо умова помилкова, то цикл жодного разу не виконається.
While «Умова»
«Тіло циклу»
Wend
У програмі можна використовувати оператори Exit Do або Exit For , за допомогою яких відбувається перехід виконання програми до оператора, наступного за невизначеним циклом.
Приклад 4 . Визначити
,
де.
Рішення. Робота виконується в наступній послідовності:
. Запустити VISUAL BASIC. У вікні New Project вибрати Стандартний.EXE вкладки New (новий) і клікнути на кнопку « Відкрити ».
. На екрані з'явиться новий проект і форма Project1 - Form1 (Form) , зміст якої потрібно заповнити необхідними компонентами, за допомогою яких можна буде виконати необхідні обчислення.
. По-пер...
