estoy usando un datagrid y un adodc y otros controles anexo el codigo que tengo
Código vb:
Ver original
lblumes.Caption = txtumes.Text Dim Fecha3 As Date, Fecha4 As Date Fecha3 = lblumes.Caption Fecha4 = lblfecha.Caption lblmeses.Caption = DateDiff("m", Fecha3, Fecha4) & "" Adodc1.Recordset.Filter = Combo1.Text & " LIKE '*" & txtcalle & "*' And " & Combo2.Text & " < '" & txtumes & "' And " & Combo3.Text & " LIKE '" & txtestado & "' And " & lblmeses.Caption & " >= '" & txtnummes & "'"
DESDE YA GRACIAS