向老师求助，做了一个人员信息（年龄、职业资格证、等级）多项复合查询控件，但没成功，请老师帮助，代码如下：
Dim cmb As WinForm.ComboBox = e.form.Controls("nl")Dim tbx As WinForm.TextBox = e.Form.Controls("zjmc")
Dim cmb1 As WinForm.ComboBox = e.form.Controls("jb")
Dim filter As String = "1=1"
If cmb.Text > "" Then
filter &= " and 年龄='"& cmb.text &"'"
End If
If tbx.Text > "" Then
filter &= " and 证件名称='"& tbx.text &"'"
End If
If cmb.Text > "" Then
filter &= " and 等级='"& cmb1.text &"'"
End If
Tables("证件管理").filter = filter
加好友 
发短信
Post By：2017/7/24 16:19:00 [只看该作者]
