代码还是放到
textchanged的事件
把*号改为%号
Dim drp As WinForm.DropDownBox = e.sender
If drp.DroppedDown Then '如果下拉窗口已经打开
Dim lsx As WinForm.ListBox = Forms(e.sender.DropFormName).Controls("ListBox1")
lsx.ComboList = DataTables("白塔销售档案").SQLGetComboListString("销售档案_客户名称","销售档案_客户名称 like '%" & e.sender.Text & "%'")
End If