Назначение. Проверяет, является ли данное выражение корректной датой/временем

Проверяет, является ли данное выражение корректной датой/временем.

Возвращает логическое значение (Boolean). Если выражение является корректной да­той/временем, возвращается True, в противном случае - False..

Применение

Обычно IsDate используется для проверки корректности ввода даты пользователем или при дру­гих вариантах передачи данных программе извне.

Синтаксис

IsDate (expression)

Expression- выражение, которое требуется проверить на "календарность".

• IsDate обрабатывает данные любого типа без генерации ошибки.

• IsDate использует национальные системные установки даты/времени машины, на которой запущена программа, поэтому "правильная" дата, полученная на другой ма­шине, может оказаться некорректной на той машине, где она обрабатывается.

Пример

В текстовое поле с именем Поле1 введёно некоторое значение.

Проведём проверку: дата это или нет?

Dim x

Dim test As Boolean

x = Поле1.Value ‘ В переменную х записываем значение Поля1

test = IsDate(x) ‘ Проверка на “календарность”

MsgBox test ‘ Ответ –True, если введена дата

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.