Пишу класс для универсальной фильтрации Combobox'а и столкнулся с такой проблемой:
Как получить вводимое пользователем значение? Анализировать "Нажатие клавиши" и стройть стринг? Но ведь даже если заложиться на всякие там Backspace'ы и проч., пользователь всегда сможет выделить курсором (мышкой) ту/иную часть введенного слова и заменить... Как мне передать в функцию именно то, что введено сейчас в поле на экране? Ведь "автоподстановка" Access'овская работает же как-то...

Вот пример, где возникла загвоздка (интересует выделенный фрагмент):
'-------------
Public Function DinamicSpisok()
Dim spisok As Control: Set spisok = Screen.ActiveControl
Dim ОтображаемыйСтолбец As Byte: ОтображаемыйСтолбец = 0

If InStr(1, spisok.ColumnWidths, ";") > 0 Then
ОтображаемыйСтолбец = IIf(Left(spisok.ColumnWidths, InStr(1, spisok.ColumnWidths, ";") - 1) = "0", 1, 0)
End If

Dim znach As String: znach = Nz(Forms(Screen.ActiveForm.NAME)(Screen.ActiveControl.NAME).Value, "")

End Function
'-------------

Т.е. проблема в том, что .Value-то еще нет - значение из списка не выбрано ...

Далее предполагалось использовать spisok.RecordSource на основе введенного для самой фильтрации...

Может кто сталкивался уже или видел примеры реализаций?

Помогите, пожалуйста!
Борис