|
42 Кб. |
|
| Подскажите,пож-ста,как на примере вложенного файла(форма Главная) сделать фильтрацию 3 полей со списками, по первым буквам ввода в текстовые поля -фильтры для каждого поля со списком.Т.е. у меня 3 поля со списком Сотрудник,Поставщик,Продукт, в текстовые поля над каждым полем начинают вводится буквы и должна начинаться фильтрация, например я ввел в текстовое поле над комбобоксом Сотрудники букву М, остались записи с сотрудниками на букву М, ввел букву В в текстовое поле над комбобоксом Поставщики, остались в итоге записи с сотрудниками на Букву М и поставщиками на букву В. Это реалиизовано в форме Глав во вложенном файле с помощью процедур
Private Sub сотр_Change()
Me.[Сотрудник].Requery
Me.Refresh
Me.Filter = "[Поставщик] like '" & Trim([пост]) & "*'and [Сотрудник] like '" & Trim([сотр]) & "*'and [Товар] like '" & Trim([тов]) & "*'"
Me.FilterOn = True
Me.сотр.SelStart = Len(Me!сотр.Text)
End Sub
но здесь поля Сотрудники,Поставщики и Товар не комбобоксы,а простые текстовые поля.
Буду очень признателен за совет,что-то совсем запутался | |
|
|