如果没有输入值，会提示错误，所以要判断一下：
Dim cbo_Dailimingcheng As winform.ComboBox= e.Form.Controls("cboDailimingcheng")
if cbo_Dailimingcheng IsNot Nothing Then Tables("代理_Table1").filter ="[guanlian_daili] =" & cbo_Dailimingcheng.Value
End If
加好友 
发短信
Post By：2013/7/15 9:00:00 [显示全部帖子]
