[求助]查询命令按钮单击过程代码错误

sdgts

请指教如下代码错在那里，通过cboname下拉列表选择“区划”

Private Sub Command4_Click()

On Error GoTo Err_Command4_Click

   Me.协管员参数查询子窗体.Form.FilterOn = True

   Me.协管员参数查询子窗体.Form.Filter = " 区划='" & cboname & ""

Exit_Command4_Click:

  Exit Sub

Err_Command4_Click:

  MsgBox Err.Description‘

  Resume Exit_Command4_Click

End Sub

sgrshh29

可能少了一个单引号,不过字太小看不清楚.  Me.协管员参数查询子窗体.Form.Filter = " 区划='" & cboname & "'"

sdgts

谢谢指教。