Приведенные ниже функции 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.
Спасибо за внимание. Автор блога Владимир Баталий