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 = "客户ID Like " & txt & " Or 公司名称 Like " & txt & " Or 地址 Like " & txt & " Or 联系人 Like " & txt
End If
就是把客户id符合条件的放在第一位置
tbl.sort = "客户ID Like '" & drp.Text & "%'"
我加个排序，不行
[此贴子已经被作者于2024/12/11 14:50:09编辑过]
做不到
客户ID符合条件的排第一位
[此贴子已经被作者于2024/12/11 15:12:05编辑过]
这个方法不行，做不到优先搜，如果能做到用表达式排序，就好了
[此贴子已经被作者于2024/12/11 15:51:28编辑过]
搜索条件没有先后的说法。要么先搜索客户ID，搜索后没有数据再搜索其它列