Добрый день,
У меня одна форма вызова Проверьте маршрутизатор . В этой подчиненной форме у меня есть одно текстовое поле (TxtPartNo) , одно поле списка (LstPartNo) и одна подчиненная форма (CheckRouteSubform) .
Это роли этих функций
- TxtPartNo -> Пользователь введет описание элемента, которое он хотел проверить в своем маршруте. После этого он нажмет кнопку добавления.
- LstPartNo -> его тип источника строки список значений . После того, как пользователь нажмет кнопку «Добавить», в этот список будет вставлено описание элемента, которое он вводит. Затем они выберут весь список данных и нажмут на кнопку проверки .
CheckRouteSubform -> Эта подчиненная форма основана на CheckRouteQuery. После того, как кнопка проверки нажата, я хотел, чтобы это был фильтр, основанный на этом описании элемента. Если оно содержит , но не точно равно , что part_No, оно будет показано в этой подчиненной форме.
example : user key in = FCLF-8531
subform will show data that contain FCLF-8531-RX, FLCF-8531-AX.
здесь я прикрепил картинку вида
Ниже изображение запроса:
Как вы видите, я создаю критерии описания элемента на основе списка.
и в кнопке проверки я использовал этот код:
Private Sub CmdCheckRoute_Click()
Dim i As Integer
For i = 0 To Forms!CheckRoute!LstPartNo.ListCount - 1
Forms!CheckRoute!LstPartNo.Selected(i) = True
Next i
DoCmd.RunSQL "CheckRouteQuery"
End Sub
Однако не хочет показывать, что мне нужно. :( Помогите мне, пожалуйста.