Я знаю, что прошло некоторое время с тех пор, как это было опубликовано, но я хотел бы добавить свою ценность, поскольку я всегда ищу эту проблему:
Сохраненный запрос может быть разрешен:
Set db = CurrentDb
Set qdf = db.QueryDefs(sQueryName)
For Each prm In qdf.Parameters
prm.Value = Eval(prm.Name)
Next prm
Set rst = qdf.OpenRecordset
Для SQL:
Set db = CurrentDb
Set qdf = db.CreateQueryDef("", "SELECT * FROM MyTable " & _
"WHERE ID = " & Me.lstID & _
" AND dWeekCommencing = " & CDbl(Me.frm_SomeForm.Controls("txtWkCommencing")) & _
" AND DB_Status = 'Used'")
For Each prm In qdf.Parameters
prm.Value = Eval(prm.Name)
Next prm
Set rst = qdf.OpenRecordset
Это предполагает, что доступны все значения параметров, т.е. формы открыты, а элементы управления имеют значения.
Я получил ответ от помощника библиотеки IQKeyboardManager ( answer ). Фон клавиатуры полностью прозрачен, если вы отключите autoToolbar
:
IQKeyboardManager.shared.enableAutoToolbar = false