Приведенные ниже функции VBA предназначены для организации взаимодействия с пользователем – обработка вводимых данных, загрузка изображений, загрузка различных типов данных из файлов-ресурсов и так далее.
MsgBox(Текст[,кнопки] [,заголовок окна]) – Данная vba функция отвечает за вывод данных. Обязательным является только первый параметр. Также есть последний параметр, который позволяет привязать файл-справку, но он практически не используется, поэтому я его не затрагивал.
Текст – Собственно, информация, которую нужно показать пользователю, может быть как строковым значением, так и переменной с данными.
Кнопки – Содержит число или именованную константу, которые определяют тип, стиль диалогового окна и количество кнопок, можно суммировать значения. При отсутствии параметра, значение по умолчанию 0.
Возможные значения:
- OKOnly — 0 — Кнопка OK.
- OKCancel — 1 — Кнопки OK и «Отмена».
- AbortRetryIgnore — 2 — Кнопки «Прервать», «Повторить» и «Пропустить».
- YesNoCancel — 3 — Кнопки «Да», «Нет» и «Отмена».
- YesNo — 4 — Кнопки «Да» и «Нет».
- RetryCancel — 5 — Кнопки «Повторить» и «Отмена».
- Critical — 16 – Пиктограмма критической ошибки.
- Question — 32 – Пиктограмма предупреждения с запросом.
- Exclamation — 48 — Пиктограмма предупреждения.
- Information — 64 — Пиктограмма информационного сообщения.
- DefaultButton1 — 0 – 1-я кнопка установлена по умолчанию.
- DefaultButton2 — 256 — 2-я кнопка установлена по умолчанию.
- DefaultButton3 — 512 — 3-я кнопка установлена по умолчанию.
- ApplicationModal — 0 — Приложение является модальным.
- SystemModal — 4096 — Система является модальной.
- MsgBoxSetForeground — 65536 – Отображать диалоговое окно поверх остальных.
- MsgBoxRight — 524288 – Произвести выравнивание текста по правому краю.
- MsgBoxRtlReading — 1048576 – Вывод текста справа на лево, как для арабского правописания.
Заголовок окна – Собственно, заголовок выводимого диалогового окна.
Сама функция vba будет возвращать числовое значение, которое зависит от того, какую кнопку нажал пользователь, или же он ничего не нажал.
Возвращаемые значения:
- -1 – Пользователь ничего не нажал, а просто закрыл окно, щелкнув по крестику.
- OK — 1
- Cancel — 2
- Abort — 3
- Retry — 4
- Ignore — 5
- Yes — 6
- No — 7
InputBox(Текст, [Заголовок], [Ответ по умолчанию], [XPos], [YPos]) – Данная функция предназначена для создания диалогового окна, в котором можно вводить данные. Первый два параметра работают так же, как и для функции MsgBox.
Ответ по умолчанию – Необязательный параметр, который позволяет задать текст, отображаемый в строке ввода.
XPos и YPos – Расстояние по горизонтали и вертикали диалогового окна, относительно краев экрана.
Сама функция вернет строковое значение, которое ввел пользователь, или пустую строку, если строка ввода ничего не содержит.
LoadPicture([Имя файла], [Размер], [Глубина цвета],[X,Y]) – Функция vba позволяет загрузить графическое изображение в форму или элемент управления PictureBox и Image. Все параметры являются дополнительными, и если запустить функцию без параметров, то произойдет очистка элементов управления Image или PictureBox.
Имя файла – Имя и путь к графическому файлу.
Размер – Позволяет задать параметры изображения. Является числовым значением или именованной константой:
- vbLPSmall — 0 — Системный значок – маленький размер
- vbLPLarge — 1 — Системный значок — большой размер, который определяется видеодрайвером.
- vbLPSmallShell — 2 – Маленький размер значка.
- vbLPLargeShell — 3 – Большой размер значка.
- vbLPCustom — 4 – Пользовательский размер, который определяется параметрами X и Y
- Глубина цвета – Параметр актуален, если мФ загружаем курсор или значок файла. Возможные значения:
- vbLPDefault — 0 – Значение по умолчанию
- vbLPMonochrome — 1 — 2 цвета
- vbLPVGAColor — 2 — 16 цветов
- vbLPColor — 3 — 256 цветов
X и Y – Ширина и высота изображения.
LoadResData(id, restype) – Функция позволяет загрузить несколько доступных типов из ресурсного файла (файл с расширением .res). Все передаваемые параметры являются обязательными.
id – содержит целое значение, определяющее идентификатор данных в указанном файле-ресурсе. Значение 1 определяет идентификатор значка приложения.
restype – Позволяет указать тип загружаемых данных. Возможные значения:
- 1 — курсор
- 2 — растр
- 3 — растр
- 4 — Меню
- 5 — Диалоговое окно
- 6 — Строка
- 7 — Каталог шрифта
- 8 — Шрифт
- 9 — Таблица Акселератора
- 10 — Тип ресурса, который определен пользователем
- 12 — Групповой курсор
- 14 — Групповой значок
LoadResPicture(id, restype) – Функция практически идентична предыдущей, но предназначена для загрузки из файла-ресурса значка, курсора или растра.
id – Идентификатор данных.
restype – Формат получаемых данных. Может быть именованной константой или целым значением:
- vbResBitmap – 0 — Растр
- vbResIcon – 1 — Значок
- vbResCursor – 2 — Курсор
LoadResString(id) – Функция позволяет загрузить строковое значение из файла-ресурса.
id – Идентификатор данных.
Choose(Index,item1 [, item2 [ ,…, [ itemN]] ) – Получение значения для заданного номера (index). Параметры item1…. itemN содержат значения типа Variant. Так, выражение Choose (3, «Первый», «Второй», «Третий») вернет » Третий «.
IIf(Expression, TruePart, FalsePart) – Данная функция vba предоставляет из себя упрощенный вариант условного оператора if.
Expression – Условие, которое надо проверить.
TruePart – Значение, которое будет возвращаться, если параметр Expression содержит логическое true.
FalsePart — Значение, которое будет возвращаться, если параметр Expression содержит логическое false.