What about something like this. You can check the immediate window to check your SQL syntax and verify your double variant.
Code:
Dim strWhere As String
strWhere = "[fTxtTaxType] = '" & strTaxType & "'" & " And " _
& "[fDblLowAmt] > " & dblTotalPay & " And " _
& "[fDblHighAmt] <= " & dblTotalPay
Debug.Print strWhere & vbCrLf & "*****************************" & vbCrLf
Debug.Print "dblTotalPay = " & dblTotalPay
With TRrst
.FindFirst strWhere
If .NoMatch = False Then
MsgBox "Found a match"
dblAllowance = ![fDblAllowance]
dblMinTax = ![fDblMinTax]
dblAdditionalPercent = ![fDblAdditionalPercent]
dblLowAmt = ![fDblLowAmt]
MsgBox "dblAllowance " & dblAllowance
Else
MsgBox "Did not find a match"
End If
End With