- •1. Операторы, процедуры, типы данных vba
- •Основные типы данных в vba
- •Преобразование типов данных
- •Is (оператор)
- •Функция IsArray
- •IsArray (Имя переменной)
- •IsDate (функция)
- •IsEmpty (функция)
- •IsError( функция)
- •IsMissing(функция)
- •IsNull (функция)
- •IsNumeric (функция)
- •IsNumeric(выражение)
- •IsObject(функция)
- •2. Работа с объектами
- •3. Применение процедур vba
- •Модель программирования в Access
- •Типы процедур
- •Поле со списком
- •Вызов процедур
- •Запуск процедур-функций
- •Запуск процедур-подпрограмм
- •4. Операторы vba
- •Логические операторы Логические операторы
- •Некоторые функции в vba
- •5. Объявление переменных, констант в vba
- •Создание пользовательских типов данных
- •Dim c As клиент
- •Cоздание массивов постоянной длины
- •Cоздание массива из списка значений
- •Создание динамических массивов
- •6.Организация ввода-вывода данных с помощью функций InputBox и MsgBox
- •7. Управляющие структуры
- •Структура If … Then
- •Структура If … Then … Else
- •Вторая группа операторов]
- •Второй блок операторов]
- •Алгоритм
- •Переход по метке
- •10: Программный код Cтруктура Select Case
- •8. Циклы в vba Cтруктура For ….Next
- •Операторы
- •Структура For Each … Next
- •Структура Do… Loop
- •Структура Do While … Loop
- •Структура Do ….While Loop
- •Cтруктуры Do Until … Loop и Do … Loop Until
- •9. Операторы Exit
- •Функции для работы со строковыми переменными
- •11. Классические задачи программирования: сортировка, поиск
- •If IsNull(массив(X)) Then Exit Function
- •12. Управление базами данных
- •Основные понятия базы данных
- •Установка значений свойств
- •Считывание свойств
- •Вызов методов
- •Объект.Метод
- •Присваивание значений возвращаемых из методов
- •13. Объект Database –база данных
- •Cвойства объекта Database
- •Методы объекта Database
- •14. Объект TableDef
- •Свойства объекта TableDef
- •Методы объекта TableDef
- •Использование свойства Fields объекта TableDef
- •Использование свойства TableDefs объекта Database
- •15. Объект Form –экранная форма Свойства объекта Form
- •Применение некоторых свойств oбъекта Form Свойство Me
- •Cвойство ActiveControl
- •Свойство CurrentRecord
- •Свойство Visible
- •Свойства OrderBy и OrderByOn
- •Методы объекта Form
- •Список и поле со списком
- •Глава 16. Объект DoCmd и его методы
- •Глава 17. Объект Recordset
- •Свойства объекта Recordset
- •Свойства bof и eof
- •Создание объекта Recordset
- •Глава 18. Применение объекта Debug
- •Глава 19. Применение свойства RecordCount
- •Применение свойства Fields
- •Применение метода GetRows объекта Recordset
- •Глава 21. Объекты QueryDef
- •Свойства объектов QueryDef
- •Использование метода Execute
- •Глава 22. Применение языка sql
- •Использование выражения select
- •Простые формы select
- •Фильтрация данных с помощью предложения where
- •Сортировка данных
- •Объединение таблиц
- •Глава 23. Объект Report События
- •Некоторые свойства объекта Report
- •Методы объекта Report
- •Применение свойств объекта Report
- •Глава 24. Настройка пользовательского интерфейса
- •Глава 25. Создание и изменение панелей команд
- •Глава 26. Создание и удаление контекстных меню
- •Приложение
- •Этапы реализации задачи:
- •If IsNull(.Fields!цена) Then Exit Do
IsEmpty (функция)
Назначение
Проверяет, инициализирована ли переменная, объявленная с типом данных Variant.
Возвращает логическое значение (Boolean). Если переменная с типом данных Variant не инициализирована, возвращается True, во всех остальных случаях - False.
Применение
Исключительно для проверки на инициализированность переменных с типом данных Variant.
Синтаксис
IsEmpty (varname)
Varname- идентификатор переменной с типом Variant
IsEmpty- обрабатывает данные любого типа без генерации ошибок. Однако возвращает значение только для одиночных неинициализированных переменных типа Variant. Даже неинициализированный динамический массив типа не имеет значения Empty.
Пример
Дана переменная х, которая не имеет начального значения.
Dim x
Dim test As Boolean
test = IsEmpty(x)
MsgBox test ‘ Ответ True
Если за х принять значение поля1 и в свойствах для этого поля задать значение по умолчанию равное какому-либо числу, то ответ будет равен False.
Dim x
Dim test As Boolean
x = val(Поле1.Value)
test = IsEmpty(x)
MsgBox test
IsError( функция)
Назначение
Проверяет, имеет ли данная переменная, объявленная с типом данных Variant, субтип Error.
Возвращает логическое значение (Boolean).
Если переменная с типом данных Variant имеет субтип ошибки (Error), возвращается True, во всех остальных случаях - False.
Применение
Позволяет организовать "мягкую" обработку ошибок при построчном контроле ошибок. В этом случае всякая предусматриваемая, но не устраняемая внутри процедуры ошибка получает свой код и функция возвращает либо требуемое значение, либо код который проверяется функцией IsError.
Синтаксис
IsError {varname}
|
Varname- идентификатор переменной с типом данных Variant. |
IsError переваривает данные и выражения любого типа без генерации ошибки.
IsMissing(функция)
Назначение
Проверяет, специфицирован ли при данном вызове процедуры ее необязательный аргумент, имеющий тип данных Variant.
Возвращает логическое значение (Boolean).
Если необязательный аргумент отсутствует, то True, во всех остальных случаях — False.
Применениe
Позволяет организовать различные варианты выполнения процедуры в зависимости от того, задан ли при вызове соответствующий необязательный аргумент или нет. Может применяться только с аргументами, тип данных которых при описании задан как Variant.
Синтаксис
IsMissing (argname)
Argname- идентификатор аргумента процедуры.
IsMissing имеет смысл только внутри процедуры, для которой при описании задан проверяемый аргумент. Хотя она переваривает данные и выражения любого типа без генерации ошибки, однако возвращает значение True только для пропущенных необязательных аргументов процедуры, в которой она вызывается, если последние имеют тип Variant.
Для необязательных аргументов типа, отличного от Variant, IsMissing всегда возвращает False.