平台生成的查询功能，怎么选取不了？

生成的一个窗体，查询功能怎么选择不了条件，下拉能显示，就是选取不了，不知道哪里设置错了。

Private Sub Form_Load()
    Set mclsQuery = New GeneralQuery
    With mclsQuery
        .QueryForm = Me.sfrQuickQuery
        .DataForm = Me.sfrList   这个是对的
        .AddAllFields
    End With
    Me.Recalc
    Me.btnUndoAudit_Label.Caption = "快递单撤销"
    Me.btnAudit_Label.Caption = "快递单输入"
End Sub