С помощью макрокоманды ЗадатьВремПеременную в классической базе данных Access можно создать временную переменную и присвоить ей значение. Затем переменную можно использовать в качестве условия или как аргумент последующих макрокоманд, а также в других макросах, процедурах обработки событий, формах или отчетах.
Настройка
Макрокоманда ЗадатьВремПеременную имеет следующие аргументы:
Аргумент макрокоманды |
Описание |
Имя |
Введите имя временной переменной. |
Выражение |
Введите выражение, используемое для задания значения этой временной переменной. Не начинайте выражение со знака равенства (=). Чтобы использовать построитель выражений для задания этого аргумента, нажмите кнопку Построить . |
Примечания
-
Одновременно можно определить до 255 временных переменных. Если временную переменную не удалить, она останется в памяти до закрытия базы данных. Желательно удалять временные переменные после завершения работы с ними. Для удаления одной переменной используйте макрокоманду УдалитьВремПеременную с именем удаляемой переменной в качестве аргумента. Если переменных несколько и нужно удалить их все сразу, используйте макрокоманду УдалитьВсеВремПеременные.
-
Временные переменные являются глобальными. После создания временной переменной к ней можно обращаться из процедуры обработки событий, из модуля Visual Basic для приложений (VBA), из запроса или из выражения. Например, если вы создали временную переменную с именем MyVar, можно применять ее в качестве данных для поля ввода с использованием следующего синтаксиса:
=[TempVars]![MyVar]
Примечание: В макросах, запросах и процедурах обработки событий не нужно ставить знак равенства перед выражением.
К временной переменной можно также обращаться из любых надстроек или связанных баз данных.
-
Для запуска макрокоманды ЗадатьВремПеременную в модуле VBA используйте метод Add объекта TempVars.
Пример
Следующий макрос демонстрирует создание временной переменной с помощью макрокоманды ЗадатьВремПеременную, использование временной переменной в условии и сообщении, а также удаление временной переменной.
Условие |
Макрокоманда |
Аргументы |
ЗадатьВремПеременную |
Имя: MyVar Выражение: InputBox("Введите число, отличное от нуля.") |
|
[TempVars]![MyVar]<>0 |
ОкноСообщения |
Сообщение: ="Вы ввели " & [TempVars]![MyVar] & "." Сигнал: Да Тип: Уведомление |
УдалитьВремПеременную |
Имя: MyVar |