Greater and Lower Question!!

[Tequila_worm]

Ok i really dont know what is wrong with me tonight. but this doesnt see to work. take a look at this

Private Function Search(iMin As Integer, iMax As Integer)
    
    
    Do Until Adodc1.Recordset.EOF
        If txtPrice.Text >= iMin & txtPrice.Text <= iMax Then
            lstDisplay.AddItem txtHomeMLS.Text
        End If
        Adodc1.Recordset.MoveNext
    Loop
    If lstDisplay.ListCount = 0 Then
        MsgBox "No records found"
        Adodc1.Recordset.MoveFirst
        Exit Function
    End If
    
End Function

Ok now i have a few numbers is lookin at they are 198, 345, 230 now i put in so that the iMin = 10 and iMax = 10

but it displays all of them. Dam can somone plz tell me if i am doin something wrong, because i just blacked out and cant see any errors lol. Thx