Filtrar DataGrid

[GilbertoB]

Tenho que fazer uma pesquisa pelo nome e mostrar os dados da coluna Cliente e Data no DataGrid mas não tenho muita esperiencia com o DataGrid ^_^

Esse codigo que eu fiz faz a pesquisa mas ele mostra todas colunas no DataGrid, precisaria de um filtro que mostrasse só as colunas que eu quisesse.

Dim FT As String
    Dim SQL As String
    If txtNome.Text = "" Then
        MsgBox "Digite um Codigo para efetuar a pesquisa!"
    Else
        FT = txtNome.Text
        FT = FT & "%"
        SQL = "SELECT * FROM OS WHERE Codigo LIKE '" & FT & "'"
        AFB
        Set Rs = New ADODB.Recordset
        Rs.CursorLocation = adUseClient
        Rs.Open SQL, Con, adOpenKeyset, adLockReadOnly
        With DataGrid1
        .MarqueeStyle = dbgSolidCellBorder
        .AllowRowSizing = True
        .Columns.Item(O).Alignment = dbgCenter
        Set .DataSource = Rs
        .Refresh
        End With
    End If

Espero que possam me ajudar ^_^

[Danleonhart]

Gilberto...

No código:

SQL = "SELECT * FROM OS WHERE Codigo LIKE '" & FT & "'"

Estais selecionando tudo ("SELECT * ") da Tabela...ao invés disso, informe quais os "Campos" que deseja carregar no DataGrid...no seu caso fica assim:

SQL = "SELECT Cliente,Data FROM OS WHERE Codigo LIKE '" & FT & "'"

OK ?!

Qualquer coisa estamos aê :D

[GilbertoB]

Era isso mesmo vlw Danleonhart dinovo :D

depois que o programa fica pronto mostro pra você e o Matheus pra ve como fico ^_^