Книга: Excel. Трюки и эффекты
Объявление API-функций
Объявление API-функций
Чтобы API-функцию можно было вызывать из программы на VBA, ее нужно объявить с использованием инструкции Declare:
[Public | Private] Declare Function Имя Lib «Библиотека» _
[Alias «Псевдоним»] [([Аргументы])] [As Имя_типа]
или, если API-функция не возвращает значения:
[Public | Private] Declare Sub Имя Lib «Библиотека» [Alias «Псевдоним»] _
[([Аргументы])]
Данная инструкция помещается в блоке объявлений модуля. Ключевые слова Public и Private задают область видимости объявляемой API-функции аналогично обычной процедуре или функции. Единственной особенностью является то, что при объявлении API-функции в модуле класса нужно использовать Private. Назначение остальных элементов инструкции Declare поясняется в табл. 1.14.
Таблица 1.14. Элементы инструкции Declare
Ниже приведен пример объявления API-функции получения имени текущего пользователя без использования псевдонима:
Declare Function GetUserNameA Lib «advapi32.dll» _
(ByVal lpBuffer As String, nSize As Long) As Long
а также с использованием псевдонима:
Declare Function GetUserName Lib «advapi32.dll» Alias
«GetUserNameA» _
(ByVal lpBuffer As String, nSize As Long) As Long
При использовании первой из приведенных инструкций для вызова функции нужно использовать имя GetUserNameA. При использовании второй – имя GetUserName.
Оглавление книги
- Вызов API-функций
- Новые функции API для работы с Blob и массивами
- Типизация и повторное объявление
- Пересмотр функций клиента
- Вызовы функций
- 9.1.6.1. Использование функций POSIX: wait() и waitpid()
- Урок 6.4. Расчеты с использованием функций и имен ячеек
- Мастер функций
- Практическая работа 46. Выполнение расчетов с использованием Мастера функций
- Практическая работа 47. Расчеты с использованием логических функций
- 12.5.4. Ruby и Windows API
- Windows API Tutorials