Программирование алгоритмов линейной структуры

Основные сведения о программировании алгоритмов линейной структуры

 

Под алгоритмом линейной структуры понимается последовательность действий, которые выполняются в порядке их записи

Реализация алгоритмов линейной структуры

 

Инструкции присваивания

Формат записи:

[Let]< Имя переменной> (или < Имя константы> = < Выражение> , где:

< Имя переменной>, < Имя константы> - конструкции, построенные по правилам VBA.

Выражение - выражение того же типа, что и составляющие его операнды.

Инструкция вычисляет значение выражения и присваивает это значение переменной или константе.

В частных случаях выражение может принимать значение константы, переменной или функции. Например:

Y=Sqr(X)

A=22.5

D=Exp(A)

S=S+R

F=X^2

В результате выполнения двух следующих операторов присваивания x=5: x=x+2 переменной x будет присвоено значение 7.

Ввод и вывод информации

Для ввода и вывода информации в VBA используются две разновидности диалоговых окон (ДО):

§ окна ввода (InputBox);

§ окна сообщений (MsgBox);

Ввод информации осуществляется с помощью функции Inputbox. Функция InputBox осуществляет следующие действия:

выводит на экран диалоговое окно, рис.10.1.а), б), содержащее заголовок, зону сообщения, поле ввода, значение по умолчанию;

устанавливает режим ожидания ввода текста пользователем или нажатия кнопки;

возвращает значение типа String, содержащее текст, введенный в поле.

Формат записи функции:

Inputbox(сообщение[, заголовок окна][, поле ввода][, значение по умолчанию][, …]), где

Сообщение – строковое выражение, отображаемое как текст сообщения в ДО. Сообщение может состоять из нескольких строк. Для их разделения допускается использование символа возврата каретки(Chr(13)), символа перевода строки(Chr(10)) или комбинации этих символов (Chr(13)) & (Chr(10)).

Заголовок окна – строковое выражение, отображаемое в строке заголовка диалогового окна. Если этот аргумент опущен, в строку заголовка помещается имя приложения.

Поле ввода – вводимое строковое выражение (строка знаков).

Помимо указанных аргументов в формате функции InputBox могут использоваться параметры[, …], регулирующие положение диалогового окна на экране, и имя файла справки о данном окне.

Пример записи операторов присваивания и задания переменным A и B значений, возвращаемых функцией InputBox, открывающей диалоговые окна для ввода, рис.5 а) – б).

A=InputBox(“Вычисление остатка”, “Bвод A”)

B= InputBox (“Вычисление остатка ”, ” Bвод B”)

 

Поле ввода

а) б)

 

Рис. 5 а), б) Диалоговые окна ввода

 

В приведенных окнах «Ввод А» и «Ввод В» расположены в строке заголовка окна, в зоне сообщения – «Вычисление остатка», а в поле ввода – 22 и 7.

Инструкция и функция MsgBox выводит простейшие сообщения пользователю в диалоговом окне.

Формат инструкции MsgBox:

MsgBox (Строковое выражение_1 [, числовое выражение или имена констант][, строковое выражение_2][, …]), где:

Строковое выражение_1 – сообщение, отображаемое в диалоговом окне;

числовое выражение – представляет число и тип отображаемых кнопок или тип используемого значка, табл.1.1.

строковое выражение_2 – строковое выражение, отображаемое в строке заголовка диалогового окна.

Таблица 1.1. Значения аргументов процедуры MsgBox, определяющих информационные значки в диалоговом окне.

 

Константа Значение Значок сообщения

 

VbCritical 16

VbQuestion 32

VbExclamation 48

VbInformation 64

 

Помимо указанных аргументов в формате MsgBox могут использоваться параметры, регулирующие положение диалогового кна на экране, и имя файла справки о данном окне[, …]

Следующая инструкция вывода демонстрирует расположение параметров MsgBox в диалоговом окне вывода, рис.6.

MsgBox ”C=A MOD B” & (Chr(13)) & (C(10)) & _

“При: ” & ” A= ” & A & ” B= ” & B & (Chr(13) & Chr(10)) & “Остаток: ” & “ C= ” & C,

_ Vbinformation, ”Сегодня: ” & Date & “ Выполнила Ким.”

Где:

Знак операции & используется для слияния строк;

комбинация функций (Chr(13) & Chr(10)) - для перевода строки и возврата каретки, чтобы результаты вычислений были напечатаны в три строки

 

Рис. 6. Диалоговое окно вывода.

 

Примеры программы алгоритма линейной структуры

Выполнить вычисления по формулам:

T=(1-x)/(3*x-2*y)

P=x*(X-y/(1+x))/2

Z=T-P

Sub primLin()

Dim X, Y, T, P, Z As Single

X = InputBox(" Окно ввода", " Ввести значение Х" )

Y = InputBox(" Окно ввода", " Ввести значение Х" )

T = (1 + X) / (3 * X - 2 * Y)

T = Format(T, " ###0.0" )

P = X * ((X - Y) / (1 + X)) / 2

P = Format(P, " ###0.0" )

Z = T - P

Z = Format(Z, " ###0.0" )

MsgBox " x= " & X & " y= " & Y & (Chr(10) & Chr(13)) & _

" T= " & T & " P= " & P & " Z= " & Z, _

vbInformation, " Расчет по формулам: " & Date

End Sub

 

 

 

⇐ Предыдущая1234567Следующая ⇒

Поделиться:

Популярное:

1. IХ. Органы управления, контрольно-ревизионный орган и консультативно-совещательные структуры РСМ
2. XXIX. МЫ И ЭТОТ МИР – ПОЛЕВЫЕ СТРУКТУРЫ.
3. А. Программирование работы гирлянды, работающей в режиме бегущей волны
4. Адаптивные структуры управления
5. Административно-правовые нормы: понятие, структура, виды. Дискуссионность по понятию структуры правовой нормы.
6. Активизация и гармонизация энергоструктуры головного мозга
7. АКТУАЛИЗАЦИОННЫЕ СТРУКТУРЫ ПРЕДЛОЖЕНИЯ
8. АЛГОРИТМИЧЕСКОЕ и ОБЪЕКТНО-ОРИЕНТИРОВАННОЕ ПРОГРАММИРОВАНИЕ НА ЯЗЫКЕ PASCAL
9. Алгоритмы линейной структуры
10. Анализ ассортимента и структуры продукции
11. Анализ динамики и структуры дебиторской и кредиторской задолженности
12. Анализ динамики и структуры источников финансирования деятельности муниципальной организации