Visual Basic - Búsqueda parcial de textbox y mostrar resultado en DataGridView

Life is soft - evento anual de software empresarial
 
Vista:

Búsqueda parcial de textbox y mostrar resultado en DataGridView

Publicado por Juan Lagravere (1 intervención) el 30/10/2017 16:30:28
Buen día.
Espero me puedan apoyar con este inconveniente. En una aplicación .net desarrollada con visual 2015, muestro todos los datos de una base de datos Access (*.mdb) y desea realizar un filtro para que me muestre todos los datos que contengan la palabra escrita en un textbox y mediante un botón ejecute el filtro.

La prueba en Access la realicé cp esta sentencia :

1
select * from tabla_busqueda where descripcion like '*dato*' order by codigo;

y con esto me muestra tal y como lo requiero.

En visual diseño coloco en un método de la siguiente manera, el cual es llamado desde el método click del boton respectivo:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Private Sub GetDataxDesc()
    Try
        Dim comandos As New OleDbCommand
        Dim adaptador As New OleDbDataAdapter
        Dim consulta As String
        Dim registro As New DataSet
        AbrirConexion()
        consulta = "Select * from tabla_busqueda where descripcion like '*" & txtBusqueda.Text & "*' order by codigo;"
        adaptador = New OleDb.OleDbDataAdapter(consulta, conexion)
        registro = New DataSet
        adaptador.Fill(registro, "tabla_busqueda ")
        listaMuestra.DataSource = registro.Tables(0)
        CerraConexion()
    Catch ex As Exception
        CerraConexion()
        MsgBox("ERROR:  " & ex.Message, vbInformation, "AVISO")
    End Try
End Sub

y el resultado es nada.

Pido puedan señalarme donde esta mi error o que otra solución puedo utilizar.
Gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder