Ver Mensaje Individual
  #5 (permalink)  
Antiguo 06/03/2008, 16:52
Avatar de zurdoak
zurdoak
 
Fecha de Ingreso: abril-2007
Mensajes: 11
Antigüedad: 17 años
Puntos: 0
Re: Ayuda Con Proyecto Vb

Cita:
Iniciado por seba123neo Ver Mensaje
Hola,el control que necesitarias para hacer ese filtrado automatico seria el Datagrid ,lo enlazas al recordset de la base y con la consulta SQL como te puso ReVija lo filtras...mira aca te apso un codigo basico de ADO de como hacer eso,suponiendo que la base se llama clientes y el campo a filtrar se llama nombre,necesitas un datagrid y un textbox ,al escribir en el textbox se te va filtrando los datos.necesitas incluir la referencia a Microsoft Active Data objects ,en el menu Proyecto--> Referencias

Código:
Option Explicit
Dim rs As ADODB.Recordset

Private Sub Form_Load()
Set rs = New ADODB.Recordset
With rs
    .ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source =" & _
        App.Path & "\Base.mdb"
    .CursorType = adOpenStatic
    .CursorLocation = adUseClient
    .Open "Select * from clientes"
End With
Set DataGrid1.DataSource = rs
End Sub

Private Sub Text1_Change()
Set rs = New ADODB.Recordset
With rs
    .ActiveConnection = "Provider=Microsoft.jet.OLEDB.4.0;Data Source=" & _
            App.Path & "\Base.mdb"
    .CursorType = adOpenStatic
    .CursorLocation = adUseClient
    .Open "Select * from clientes WHERE nombre" & " LIKE'" & Text1 & "%'"
End With
Set DataGrid1.DataSource = rs
End Sub
si no entendiste mucho,tendrias que leer algun manual de ADO y bases de datos..

saludos.
MUCHAS GRACIAS AORA SI ENTENDI
SALUDOS