Goto имя метки или номер строки

Пример 3.

Разработать информационную технологию, позволяющую в зависимости от значения введенных переменных и знака арифметической операции напечатать поясняющий текст и результат вычисления.

Option Explicit

Private Sub Form_Activate()

Dim a As Integer, b As Integer, s As Single

Dim z As String * 1

Dim stro As String * 10

a = InputBox("Введите a ")

b = InputBox("Введите b ")

1: z = InputBox("Введите знак ")

Select Case z

Case "+"

s=a+b

stro="Складываю! "

Case "*"

s=a*b

stro="Умножаю! "

Case "–"

s=a–b

stro="Вычитаю! "

Case "/"

s=a/b

stro="Делю! "

Case Else

MsgBox " Введен неверный знак операции – " & z & "Повторите ввод"

GoTo 1

End Select

MsgBox stro & a & z & b & "=" & Format(s,"0.000")

End Sub

10.2.6. Оператор безусловного перехода

Оператор безусловного перехода используется в тех случаях, когда после некоторого оператора следует выполнить не следующий по порядку оператор, а какой-либо другой, расположенный в любом месте активной процедуры. Синтаксис этого оператора следующий:

Чтобы обеспечить переход к оператору, перед ним необходимо поставить метку, отделив ее от оператора двоеточием, а в операторе перехода указать имя этой метки. Метка может состоять из символов и цифр. Количество меток не ограничено, но имя должно быть уникальным.

В блоке объявлений метка описывается следующим образом:

Dim имя метки As Label

Например, имя метки – Skipit:

MsgBox "Данная инструкция выполняется"

Goto Skipit

MsgBox "Данная инструкция пропускается"

Skipit:

MsgBox "Действие продолжается"

10.3. Структура Цикл

Цикл – это основная алгоритмическая структура, которая исполь-зуется для организации циклических вычислительных процессов.Под циклическим вычислительным процессом понимается процесс, в котором производятся вычисления по одним и тем же формулам, но при различных значениях параметров. Число повторений определяется значением неко-торого логического выражения, зависящего от управляющей переменной (параметра цикла).

Организация циклического процесса требует введения следующих понятий:

– параметр цикла (обозначим его х);

– начальное значение параметра цикла (обозначим его х ₀);

– конечное значение параметра цикла (обозначим его х _к);

– шаг изменения параметра цикла (обозначим его D х).

– условие окончания цикла (зависит от вида циклического процесса).

Различают циклы с параметром и итерационные циклы. В циклах с параметром заранее известно конечное значение параметра цикла и число его повторений. Условие окончания цикла записывается в виде логического выражения x £ x _к. Если условие истинно, то циклический процесс продолжается, в противном случае заканчивается.

В итерационных циклах конечное значение параметра цикла заранее неизвестно. Цикл заканчивается в том случае, когда достигнута заданная точность вычислений.

Рассмотрим структуру Цикл с параметром. Для организации этого типа вычислительных процессов используют циклы с пред- и постусловием. При этом различают простые циклические процессы (структура Цикл) и вложенные (структура Цикл в Цикле).

10.3.1. Цикл с предусловием

Структура Цикл с предусловием организуется следующим образом.

1. Параметру цикла х присваивается начальное значение, равное х ₀.

2. Проверяется условие окончания цикла (значение параметра цикла меньше конечного значения или равно ему).

3. Если условие окончания цикла истинно, то выполняется тело цикла. Если условие ложно, осуществляется переход к оператору, следующему за структурой Цикл.

4. Значение параметра цикла увеличивается на величину шага и осуществляется переход к пункту 2, но при новом значении параметра цикла.

Схема алгоритма структуры Цикл с предусловием приведена на рис. 13.

Особенностью структуры Цикл с предусловием служит то, что тело цикла при начальном значении параметра x > x _к не выполняется ни разу.

Для реализации циклических вычислительных процессов с предусловием используются следующие операторы цикла.

Дата добавления: 2014-12-23