Получить значение текстового поля в качестве имени поля в Access

Question

в основном, я хочу иметь значение моего поля со списком1 как имя поля моего запроса ниже.может кто-нибудь помочь мне здесь?

Dim db As Database
Dim rs As DAO.Recordset

Set db = OpenDatabase("\\location\file.mdb")
Set rs = db.OpenRecordset("select * from customerinfo " _
  & "where '"& (combobox1.text) &"' likE '*" & (txtsearch) & "*';")

If rs.RecordCount = 0 Then
    MsgBox "No Item Found"
Else
    Do While Not rs.EOF = True
        listbox.AddItem

        On Error Resume Next
        listbox.List(listbox.ListCount - 1, 0) = rs("Fieldname").Value

        rs.MoveNext
    Loop
end if

Answer 1

В вашем запросе есть ошибка:

where '"& (combobox1.text) &"' likE 

Это создает неправильное предложение where, where 'fieldname' likE, которое должно быть
where fieldname likeE.Измените запрос на:

where "& (combobox1.text) &" likE 

Примечание. Лучше всего создать строку запроса в переменной.Это облегчает обнаружение любых ошибок.