Оператор безумовного переходу

Для нього характерний такий синтаксис:

Goto < мітка>.

Тут мітка являє собою сукупність букв і цифр кількістю не більшt 40. Крім оператора, мітка ставиться на початку рядка, до якого потрібно перейти, і закінчується вона двокрапкою.

Наприклад:

Gotо М1

оператори програми

М1: оператор

 

6.2. Оператор умовного переходу

 

Цей оператор має такий синтаксис для різних його типів:

● Простий оператор:

If умова Then оператор 1 [ Else оператор 2 ]

У даному випадку, якщо виконується зазначена умова, то керування процесом передається операторові 1, в інакших випадках – операторові 2.

 

Приклад:

If х> =0 Then y = a*x + b Else y = a*x-b,

де у, а, х, b – імена змінних.

Примітка. Якщо оператор не поміщається в рядку вікна, то його можна перенести на наступний рядок, використовуючи в місці розриву пропуск і знак підкреслення " _".

● Складний оператор:

If умова 1 Then

[оператори]

[ElseIf умова 2 Then

[оператори]

[Else [оператори]]

End If

Складний оператор може включати вкладені умови. Він завжди записується відповідно до встановленої синтаксисом структури і закінчується зарезервованим словом End If.

Примітка. Якщо кілька операторів в одному рядку відносяться до частин Then або Else, то вони відокремлюються один від одного двокрапкою.

Сам оператор If може вступати в дію у простій або складній формі.

Наприклад,

y=

 

Виконуючи обчислення за першою формулою, крім зазначених умов, необхідно передбачити, щоб а 0, b 0. Тоді запис складного оператора буде мати такий вигляд:

If Val(a.Text) < = 5 And Val(x.Text) =6 Then

у = (Val(a.Text) + Val(b.Text)) / Val(x.Text)

ElseIf Val(a.Text) < = 5 And Val(x.Text) > 6 And Val(a.Text) < > 0 And _

Val(b.Text) < > 0 Then

у = Val(x.Text) / Val(a.Text) - Val(x.Text) / Val(b.Text)

Else

у = Val(a.Text) ^{^}3 + Val(b.Text) * exp(2.5)

End If

У цьому записі передбачено, що у, а, х, b являють собою імена текстових елементів (Textbox), е² –експоненціальну функцію.