Prova questo codice
codice:Dim dt As New DataTable("Prova") Dim dw As New DataView(dt) Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click dw.RowFilter = "Colonna1='" & txt.Text & "'" DataGrid1.Refresh() End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load dt.Columns.Add("Colonna1") dt.Columns.Add("Colonna2") Dim i As Integer For i = 0 To 3 Dim dr As DataRow = dt.NewRow() dr("Colonna1") = "Tizio_" & i dr("Colonna2") = "Caio_" & i dt.Rows.Add(dr) Next DataGrid1.DataSource = dw End Sub![]()

Rispondi quotando