主题：[求助]筛选检查框选中的行，并输出

With e.Form.Controls("WX_Maintenance")
    If .checked Then
        If Filter > "" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "保养 = true"
    End If
End With
With e.Form.Controls("Finished")
    If .checked Then
        If Filter > "" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "已完成 = true"
    End If
End With

msgbox(filter)