Dim filter As String = "[鉴定等级] = '中级工' Or [鉴定等级] = '高级工' "
http://www.foxtable.com/help/topics/1647.htm