Crearemos un DATAGRIDVIEW1, un TEXTBOX1 y un BUTTON, copiamos el siguiente còdigo en el button:
Dim Ds As New DataSet
Dim Da As New SqlClient.SqlDataAdapter("select * from TABLA Where CAMPO_DE_LA_TABLA Like '%" & TEXTBOX1.TEXT & "%'", Conexion)
Da.Fill(Ds, "TABLA")
Dim myDataView As DataView = New DataView(Ds.Tables("TABLA"))
myDataView.Sort = " CAMPO2_DE_LA_TABLA DESC"
Me.DataGridView1.DataSource = myDataView
Se filtrara en el DataGridView1 lo que tecleemos en el TextBox1 y seràn ordenados de forma descendente tomando el CAMPO2_DE_LA_TABLA
0 Comentarios