Структура программы

Sub Progr_Name()

Dim

{Тело}

End Sub`Progr_Name

Ввод данных

X = InputBox ("введите данные (числовые)")

D = CSng (х) - преобразование символьного представления числа, возвращаемого функцией InputBox, в тип Single.

Вывод данных

i = MsgBox (S, 1, "Площадь треугольника"), где S -имя переменной, 1 - индикатор вида окна вывода.

Индикатор = 0 ОК

1 ОК Отмена

2 Стоп Повтор Пропустить

3 Да Нет Отмена

4 Да Нет

5 Повтор Отмена

6 ОК

(переменная) i = MsgBox

Значение i указывает кнопку, которая была нажата:

I = 1 ОК

2 Отмена

3 Стоп

4 Повторить

5 Пропускать

6 Да

7 Нет

Полная форма (синтаксис) функций InputBox() и MsgBox()

InputBox (prompt [,title][,default][,xpos] - [,ypos][,helpfile,contex])

1. prompt - строка-сообщение в диалоговом окне. Если строк много, то для разделения строк можно использовать ВК - Chr (13), ПС - Chr (10) или ВК&ПС (Chr(13)&Chr(10))

2. title - строка-отображение в строке заголовка диалогового окна. Если title отсутствует, то в строку заголовка помещается имя приложения.

3. Default - строка-отображение в поле ввода как используемое по умолчанию. Если его нет, то поле пустое.

4. Xpos - числовое выражение, задающее расстояние по горизонтали между левой границей диалогового окна и левым краем экрана. Если xpos нет, то диалоговое окно выравнивается по центру по горизонтали

5. Ypos - числовое выражение, задающее расстояние между верхней границей диалогового окна и верхним краем экрана. Если ypos нет, то диалоговое окно помещается по вертикали примерно на 1/3 экрана.

6. Helpfile - строка, определяющая имя файла справки, содержащего справочные сведения о данном диалоговом окне. Если аргумент указан, необходимо наличие аргумента context.

7. Context - числовое выражение, определяющее номер соотвествующего раздела справочной системы. Если этот аргумент указан, то необходимо наличие аргумента helpfile.

MsgBox (prompt [,buttons][,title][,helpfile,context])

1. prompt - строка, отображаемая как сообщение в диалоговом окне.

2. Buttons - числовое выражение (опция), представляющее сумму значений, которое указывает число и тип отображаемых кнопок, тип используемого значка, основную кнопку и модальность окна сообщения. Значение по умолчанию равно 0.

Значение констант и тип кнопок:

Константа Значение

VbOKOnly 0

VbOKCancel 1

VbAbortRetrylgnore 2

VbYesNoCancel 3

VbYesNo 4

VbRetryCancel 5

3. title - строка, отображаемая в строке заголовка. Если его нет, то в строку заголовка помещается имя приложения.

4. Helpfile - строковое выражение, определяющее имя файла справки о данном диалоговом окне.

5. Context - комментарий.

Buttons

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

VbCritical 16 крест в красном круге

VbQuestion 32 вопросительный знак в круге

VbExclamation 48 восклицательный знак в треугольнике

Vblnformation 64 буква "i" в круге

Значение аргумента buttons, определяющее основную кнопку в

диалоговом окне.

Константа Значение Номер основной кнопки

VbDefaultButtonl 0 1

VbDefaultButton2 256 2

VbDefaultButton3 512 3

VbDefaultButton4 768 4

Вместо возвращаемого значения - «какая кнопка нажата», лучше

использовать константы VBA:

Константа Значение Нажатая кнопка

VbOK 1 OK

VbCancel 2 Отмена (Cancel)

VbAbort 3 Прервать (Abort)

VbRetry 4 Повторить (Retry)

VbIgnore 5 Пропустить (Ignore)

VbYes 6 Да (Yes)

VbNo 7 Нет (No)