dcount - type mismatch

Help with syntax - getting type mismatch on last half of string

Need record count of ReqNo where checkbox (Reviewed...) is true per ReqNo.

Private Sub Reviewed_With_Question_AfterUpdate()
   Dim x As Integer
   Dim nReqNo As String
   
   nReqNo = Me.ReqNo
   x = DCount("ReqNo", "UseCases", "ReqNo =" & nReqNo And [Reviewed With Question] = True)
    If Me.Reviewed = True Then
        Me.Reviewed = False
    End If
    If x > 0 Then
         [Forms]![RequirementsReview]![Reviewed With Question] = True
    Else
         [Forms]![RequirementsReview]![Reviewed With Question] = False
    
    End If
   [Forms]![RequirementsReview]![DateModified] = Date
    Me.DateModified = Date
    Me.Repaint

End Sub

Select allOpen in new window

Thanks,  What am I missing.