主题：DropDownForm如何实现自定义查找

Dim txt As String = e.Form.DropDownBox.Text
Dim tbl As Table = Tables("窗口1_Table1")
If txt = "" Then
    tbl.Filter = ""
Else
    txt = "'%" & txt & "%'"
    tbl.Filter = "首拼 Like " & txt 
End If
e.Form.DropDownBox.Select() '将输入焦点返回下拉列表框

想通过例子实现 【表格内】输入  【 101%mkq 】 查找到对应的结果的目的 请教该如何实现呢

此主题相关图片如下：屏幕截图 2022-11-19 090146.png