Dim d As WinForm.ComboBox = e.Form.Controls("大区")
Dim f As WinForm.TextBox = e.Form.Controls("法定代表人")
Dim k As WinForm.TextBox = e.Form.Controls("客户")
Dim l As WinForm.TextBox = e.Form.Controls("联系人")
Tables("客户档案").Filter = "注册区域 = '" & d.Text & "' and 法定代表人 like '*" & f.Text & "*' and 客户 like '*" & k.Text & " *' and 联系人 like '*" & l.Text & "*'"
小狐求救哈!
![dvubb 图片点击可在新窗口打开查看](skins/default/filetype/png.gif)
此主题相关图片如下:查询.png
![dvubb 图片点击可在新窗口打开查看](UploadFile/2013-10/201310114334681695.png)
![dvubb 图片点击可在新窗口打开查看](skins/default/filetype/png.gif)
此主题相关图片如下:2.png