Visual Basic.NET - Ayuda con flitro de datos por favor.

''Funciones Buscar 

Private Sub BuscarKardex()

   Dim datos As New SqlDataAdapter("SELECT dbo.LetrasClientes.IdLetra, dbo.LetrasClientes.IdCliente,

   dbo.Clientes.IdPrograma,dbo.Clientes.Kardex, dbo.Clientes.Nombre1, dbo.Clientes.Apellidos1, dbo.Programas.Programa, 

   dbo.LetrasClientes.NLetra, dbo.LetrasClientes.Importe, dbo.LetrasClientes.FechaVencimiento,dbo.LetrasClientes.SieteDias, 

   dbo.LetrasClientes.FechaCancelacion, dbo.LetrasClientes.MododePago, 

   dbo.LetrasClientes.NRecibo,dbo.LetrasClientes.Comprobante,dbo.LetrasClientes.Detalle " & _

  "FROM dbo.LetrasClientes INNER JOIN dbo.Clientes ON dbo.LetrasClientes.IdCliente = dbo.Clientes.IdCliente INNER JOIN

   dbo.Programas ON dbo.Clientes.IdPrograma = dbo.Programas.IdPrograma  WHERE Kardex like '%" & Me.txtkardex.Text & "%'" & _

  "order by dbo.LetrasClientes.NLetra desc ", cone)

    Dim ds As New DataSet()

    datos.Fill(ds, "kardex")

    GrillaLetrasClientes.DataSource = ds.Tables(0)

End Sub