программная работа с параметром

[Sack]

Помнится, в Delphi можно сделать параметр в запросе и затем задавать в программе его значение.

Хочется сделать тоже самое стандартными средствами Access, чтобы при открытии формы параметру запроса присваивалось определенное значение в зависимости от условия.

Может кто знает как, а то лень пользоваться объектом Command.

[Abrakadabra]

Сообщение от Sack

а то лень .

а не лень спрашивать?
когда Вам не лень будет, нам будет не лень помочь..

[Sack]

Да ладно, не в лени дело. Не хочется стрелять из пушки по воробьям.
С использованием параметра моя задача решается гораздо проще, чем с помощью command. А найти как это сделать никак не могу.

[Abrakadabra]

Сообщение от Sack

. Не хочется стрелять из пушки по воробьям.
С использованием параметра моя задача решается гораздо проще, чем с помощью command. А найти как это сделать никак не могу.

ну если не из пушки, и если я Вас правильно понял, то можно использовать QueryDef

Dim qs As QueryDef: Set qs = db.QueryDefs("ВашЗапрос")
qs.Parameters(0) = Me.Параметр 'задать параметр
..............
..............

[Sack]

Спасибо за помощь Abrakadabra.

Но я в конечном итоге решил, что использовать функции удобнее.
Для этого в Модуле создаем функцию

Function parametr_()
parametr_ = ваше_значение
End Function

И в запросе вместо параметра пишем parametr_().

Напр. ...where поле=parametr_();