инвертирование текстового поиска при наборе букв в динамическом поиске - PullRequest
0 голосов
/ 26 октября 2019

У меня есть форма MS Access для расширенного поиска, когда я набираю «marie» для поиска в текстовом поле OnChange, мои письма инвертируются. Я уверен, что мой код правильный.

 Dim strSQL1, TestArray() As String
 Dim i As Integer

       Me.Text32 = Me.Tsearch.Text

            TestArray() = Split(Me.Text32, " ")
            For i = LBound(TestArray) To UBound(TestArray)                
                If TestArray(i) <> "" Then                    
                    arrayVal1 = arrayVal1 & "  telefone.job  like '%" & TestArray(i) & "%'" & " And"
     Me.TsearchX = Mid(arrayVal1, 1, Len(arrayVal1) - 3)             
    strSQL1 = "SELECT Top 10 * FROM telefone Where" & Me.TsearchX & " ORDER BY telefone.id desc
                 End If
              Next i
                  Set rst1 = New ADODB.Recordset
                      With rst1
                        .CursorLocation = adUseClient
                        .CursorType = adOpenKeyset
                        .LockType = adLockOptimistic
                        .Open strSQL1, cnAccess, adCmdText
                      End With
         Set Me.Query_subform.Form.Recordset = rst1

Я ожидаю, что когда я набираю букву, они отображаются справа, а не наоборот. Мой образец здесь. Пожалуйста, посмотрите и, если возможно, направьте меня ado расширенный поиск

...