How can I make this filter work

[DAHMB]

I have a command buttton on a form that calls a report and filters the report as follows:

Private Sub btnLetter_Click()
Dim strSQL As String
Dim stLetter As String
Dim stFilter As String
 
    DoCmd.Close
 
    stLetter = "rptParkingLetter"
    DoCmd.OpenReport stLetter, acViewPreview
    stFilter = ("Letter2Sent Is Null And InDispute = No And Closed = No")
 
'Build SQL String
    strSQL = strSQL & stFilter & " And "
 
    If strSQL <> "" Then
    'Strip Last " And "
        strSQL = Left(strSQL, (Len(strSQL) - 5))
        'Set the Filter property
        Reports!rptParkingLetter.Filter = strSQL
        Reports!rptParkingLetter.FilterOn = True
    End If
End Sub
 

My problem is line 10 I don't know how to show No as "No" so the report will see it as a value.

[NeoPa]

What type of fields are [InDispute] and [Closed] Dan?

[DAHMB]

they are text fields.

[NeoPa]

In that case you simply want (For further info see Quotes (') and Double-Quotes (") - Where and When to use them) :

stFilter = ("Letter2Sent Is Null And InDispute = 'No' And Closed = 'No'")

[DAHMB]

Thank you! and thanks for the explanation link.
Dan

[NeoPa]

No worries Dan. You can guess we've had similar questions before ;)