MS Access Combobox не заполняется автоматически - PullRequest
0 голосов
/ 17 сентября 2018

MS Access 2010

У меня есть форма, предоставляющая текстовое значение для комбинированного списка другой формы, но автозаполнение комбинированного списка не отвечает на текстовые данные, предоставленные событием OnClick. Я получаю ошибку 2237, данных нет в списке. Мне нужно, чтобы это работало, поскольку в некоторых списках есть тысячи записей, и поэтому прокручивать этот список непрактично. Вот код, который вставляет текст в поле со списком:

Private Sub tOK_Click()
Dim p As String
Dim f As String
Dim c As String
Dim txtResult As String
Dim pFrmName As String
Dim frmName As String
Dim ctrl As String

On Error GoTo errHandler
pFrmName = Me.pFrmName
frmName = Me.frmName
ctrl = Me.ctrlName
p = pFrmName
f = frmName
c = ctrl

If p = c Then
    Forms(f).SetFocus
    Forms(f)(c).Text = Me.txtResult
Else
     Forms(f)(p)(c).SetFocus
     Forms(f)(p)(c).Text = Me.txtResult

End If 
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...