estasi.Open "Select * from Rentas where Nombre='" & Trim(Me.Combo2.Text) & " '" And "Cliente='" & Trim(Me.Combo2.Text), base, adOpenStatic, adLockOptimistic
cual es el error? me dice que no coinciden los tipos, ya intente quitando las comillas simplesy todo:'v aunque lo guardado en acess es tipo texto