我制作的一个小查询程序,需要根据乡镇、村、姓名、身份证号这四个条件中任一个或几个在组合框中显示查询结果
主窗口是这样的:
此主题相关图片如下:01.jpg
![dvubb 图片点击可在新窗口打开查看](UploadFile/2016-10/2016102211115590810.jpg)
查询按钮的Click事件代码是这样的
Dim xz As WinForm.ComboBox = e.Form.Controls("乡镇")
Dim xzc As WinForm.ComboBox = e.Form.Controls("行政村")
Dim xm As WinForm.TextBox = e.Form.Controls("姓名")
Dim sfzh As WinForm.TextBox = e.Form.Controls("身份证号")
Tables("未脱贫人口信息表").filter="乡镇 = '" & xz.text & "' and 行政村 = '" & xzc.text & "' and 姓名 like '*" & xm.text & "*' And 身份证号 Like '*" & sfzh.text & "*'"
但现在选择查询条件后,点击查询按钮,组合框中内容完全没有变化