Visual Basic.NET - Hacer un filtro de un DataGridView de un TextBox

   
Vista:

Hacer un filtro de un DataGridView de un TextBox

Publicado por Eduardo (2 intervenciones) el 06/06/2016 20:52:19
Necesito ayuda para que al momento de teclear valores alfanumericos dentro de un textbox se vaya filtrando en la tabla de mi base de datos

este es el codigo que tengo, ya me cargan los datos dentro de mi tabla pero no logro hacer el filtro:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Public Class Almacen
 
    Public consulta
 
    Private Sub Almacen_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
        Me.Almacen2TableAdapter.Fill(Me.Database4DataSet.Almacen2)
 
 
        Dim adap As New Database4DataSetTableAdapters.Almacen2TableAdapter()
        Dim tabla As New DataTable
 
        tabla = Me.Database4DataSet.Almacen2
        adap.Fill(tabla)
 
        Me.DataGridView1.AutoGenerateColumns = True
        Me.DataGridView1.Columns("Id").Visible = False
        Me.DataGridView1.DataSource = tabla
 
    End Sub
 
    Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
 
        consulta = ("SELECT * FROM Almacen2 WHERE SKU LIKE '%" & TextBox1.Text & "%'")
 
    End Sub
End Class
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
información
Otras secciones de LWP con contenido de Visual Basic.NET
- Código fuente de Visual Basic.NET
- Cursos de Visual Basic.NET
- Temas de Visual Basic.NET
- Chat de Visual Basic.NET
información
Códigos de Visual Basic.NET
- Ortografía
- HotKeys
- Usuarios y Permisos
Imágen de perfil de Hugo

Hacer un filtro de un DataGridView de un TextBox

Publicado por Hugo (72 intervenciones) el 08/06/2016 22:53:25
El ejemplo lo hice con una tabla de Access:

visita: http://vbpuntonet.blogspot.mx/


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
Imports System.Data
Imports System.Data.OleDb
Imports System.Data.SqlClient
Public Class conectaaaccess
    Dim cnn As New OleDbConnection(cconexion)
    Dim filtro As String
    Private Sub conectaaaccess_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        filtro = "where nombre LIKE '%" & Me.TextBox1.Text.Trim & "%' "
        ver_registros()
    End Sub
 
'LLENA EL DATAGRIDVIEW
    Private Sub ver_registros()
        Dim Da As New OleDbDataAdapter
        Dim Ds As New DataSet
        Dim consulta As String
        consulta = "select id, nombre, descripcion " & _
        " from TABLA " + filtro + " order by nombre ASC "
        Da = New OleDbDataAdapter(consulta, cnn)
        Ds.Tables.Add("TABLA")
        Da.Fill(Ds.Tables("TABLA"))
        Dim myDataView As DataView = New DataView(Ds.Tables("TABLA"))
        DataGridView1.DataSource = myDataView
        For Each columna As DataGridViewColumn In Me.DataGridView1.Columns
            columna.SortMode = DataGridViewColumnSortMode.NotSortable
        Next
        cnn.Close()
    End Sub
 
'HACE EL FILTRO CADA VEZ QUE SE TECLEA UN CARACTER
    Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
        filtro = "where nombre LIKE '%" & Me.TextBox1.Text.Trim & "%' "
        ver_registros()
    End Sub
End Class
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Hacer un filtro de un DataGridView de un TextBox

Publicado por Eduardo (2 intervenciones) el 10/06/2016 20:24:58
No me a funcionado.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar