POrfavor ayudenme que es urgente amigos

gracias
saludos
Cita:
Iniciado por franko1809
Especifica si es vb6 o .net
En visualbasic6.0 lo hice de esta manera
Private Sub cmdBusqueda_Click()
Select Case List1.ListIndex
Case 0
rsLectores.Filter = "" & List1 & " = '" & Text1 & "'"
Case 1 To 2
rsLectores.Filter = "" & List1 & " LIKE '" & Text1 + "%" & "'"
Case 3
rsLectores.Filter = "" & List1 & " >= '" & dtpDesde & "' and " & List1 & " <= '" & dtpHasta & "'"
End Select
If rsLectores.RecordCount <= 0 Then
MsgBox "No se encontro ningun registro"
Text1 = ""
Text1.SetFocus
End If
End Sub
Cambia los controles dtpicker por los text y el list1 por el campo de busqueda
saludos