Функции MsgBox()
MsgBox – это функция вывода сообщения в стандартное диалоговое окно (сообщение, атрибуты, заголовок).
Сообщение – это текст отображаемый в диалоговом окне;
Атрибуты – определяют особенности окна, а именно различные значки и кнопки, отображаемые в окне;
Заголовок – строка в заголовке окна.
Структурное программирование
СТРУКТУРНОЕ ПРОГРАММИРОВАНИЕ – это метод надежный, ясный, легкий для понимания программы путем составления ее из стандартных элементов (основных структур) в соответствии с набором правил облегчающих восприятие и сопровождение программы.
Логическая структура любого алгоритма может быть представлена в виде комбинации трёх основных структур:
Следование;
Развилка;
Цикл.
Каждая из этих структур является простым алгоритмом и обладает следующими свойствами:
содержит только один вход, один выход, не содержит бесполезных недостижимых в процессе вычисления или выполнения программы элементов, не содержит бесконечных циклов.
Программа, составленная из основных структур, также будет только простым алгоритмом.
Поток управления в такой программе направлен сверху вниз.
Структура «следрвание»
СЛЕДОВАНИЕ – это основная алгоритимическая структура.
Схема алгоритма представляет собой два или несколько блоков последовательно соединенных линиями потока. Каждый из блоков структуры «Следование» может обозначать действие или группу действий, в т.ч. и обращение к стандартной программе.
Алгоритм структуры «Следование»:
Пример:
Постановка задачи.
Составить схему алгоритма и программу на языке программирования VB определения угла наклона B плоскости свободной поверхности бензина в железнодорожной цистерне движущейся равноускоренно с ускорением a.
Входные данные: a.
Выходные данные: B.
Математическая модель задачи:
,
где g – ускорение свободного
падения.
Алгоритм задачи:
Код приложения:
Private Sub Command1_Click()
Dim a As Single, b As Single
Const g As Double = 9.81
a = InputBox("Введите значение a")
b = Atn(-a / g)
TextB = Str(b)
MsgBox "B=" & b
End Sub
Отладка.
Примеры записи арифметических выражений:
Формула |
Запись на языке VB |
D = -29,8 · 108 |
Const D As Double = -29.8*10^8 |
|
Q = sin(m + PI*R/2) |
|
S = (a*b + a^2)^(1/2)/(a – cos(PI*x)) |
Структура «развилка»
РАЗВИЛКА – это основная структура, предназначенная для выбора одного из двух путей вычислительного процесса в зависимости от некоторого условия.
Классическая «развилка»
Алгоритм выглядит следующим образом:
В блоке n вычисляется некоторое логическое выражение, принимающее одно из значений «Да» – «Нет» (True – False). Если выражение Истинно, то выполняется действия блока (N +1), если выражение Ложно, то выполняется действия блока (N +2).
Обе линии потока выходящие из блоков (N + 1) и (N + 2) встречаются в узле «Слияние».
Таким образом, структура «Развилка» имеет единственный выход, но в зависимости от значения логического выражения (условия) будет выбрана одна из двух альтернатив (S1 и S2).
На языке VB структура описывается условным оператором (блочная форма):
IfV<условие>VThen
<оператор S1>
Else
<оператор S2>
EndVIf
Если в блоках n1 и n2 вычисляются значения одной функции, то может быть использована функция IIF.
<идентификатор> = Iif (<условие>, <выражение1>, <выражение2>)
Выражение 1 – true;
Выражение 2 – false.
Пример: