VB.net DataGridview 过滤 2013

Question

我创建了一个显示所有数据的Datagridview。我现在希望能够过滤我的数据。我正在使用DataSet、BindingSource 和TableAdapter。我尝试了一些东西，但似乎没有任何效果。目前我有一个TextBox，在编写时应该过滤。当我执行并在框中输入时，它不会过滤或出错。下面是我拥有的代码。我错过了什么吗？

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    DataGridView1.AllowUserToAddRows = True
    DataGridView1.AllowUserToDeleteRows = True

    Dim cn As SqlConnection = New SqlConnection("")
    adap = New SqlDataAdapter("SELECT res_snbr, First_Name, Last_Name, Item FROM Inventory_Details", cn)

    Dim builder As New SqlCommandBuilder(adap)
    adap.InsertCommand = builder.GetInsertCommand()
    'adap.UpdateCommand = builder.GetUpdateCommand()
    'adap.DeleteCommand = builder.GetDeleteCommand()

    dt = New DataTable()
    adap.Fill(dt)

    DataGridView1.DataSource = dt

End Sub

Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
    If TextBox1.TextLength > 0 Then
        InventoryDetailsBindingSource.Filter = _
                String.Format("res_snbr Like '%" & TextBox1.Text) & "%'"
    Else
        InventoryDetailsBindingSource.Filter = String.Empty
    End If
End Sub

Answer 1

如果你的数据源是一个数据表，你可以试试这个。

TryCast(InventoryDetailsBindingSource, DataTable).DefaultView.RowFilter = String.Format("Field = '{0}'", textBoxFilter.Text)

您可以在数据表上使用行过滤器属性，如此处所示。 http://www.csharp-examples.net/dataview-rowfilter/

Answer 2

Imports System.Data.SqlClient
Public Class Form1
Dim cn As New SqlConnection("Data Source=;Initial Catalog=;Persist Security Info=True;User ID=;Password=")
Dim adap As New SqlDataAdapter("SELECT res_snbr, First_Name, Last_Name, Item FROM Inventory_Details", cn)
Dim builder As New SqlCommandBuilder(adap)
Dim dt As New DataTable
Dim InventoryDetailsBindingSource As New BindingSource
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load
    adap.InsertCommand = builder.GetInsertCommand()
    adap.Fill(dt)
    InventoryDetailsBindingSource.DataSource = dt
    DataGridView1.DataSource = InventoryDetailsBindingSource
End Sub
Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
    If TextBox1.TextLength > 0 Then
        InventoryDetailsBindingSource.Filter = String.Format("res_snbr Like '%{0}%'", TextBox1.Text)
    Else
        InventoryDetailsBindingSource.Filter = String.Empty
    End If
End Sub
End Class

这里有很多方法可以完成你想做的事情，上面的代码就是我会做的事情。除其他差异外，请注意BindingSource 被用作DataGridView 的DataSource，并且在设置BindingSource 的Filter 属性时正确使用String.Format。

干杯！