.net - 如何根据 FieldName 显示数据 - Access

Question

我有它，所以有一个组合框，其选择称为我的数据库的字段名。我希望这样，当您选择“SalesCustomers”并按搜索按钮时，它将显示所有勾选了“Salescustomer”字段名称的客户(也称为 true 状态)，否则会抛出错误，指出没有 salescustomer 成员。我有它，所以它根据 id 显示所有客户端，但我现在想要这样。下面是我的数据库和代码的屏幕截图。

代码:

Private Sub Interest(ByVal ans As String)
    If con.State = ConnectionState.Closed Then con.Open()
    cmd = New OleDbCommand
    cmd.Connection = con
    cmd.CommandText = "Select * FROM tbl WHERE ID = ?"
    cmd.Parameters.Add("?", OleDbType.VarChar).Value = ans
    Dim reader As OleDbDataReader = cmd.ExecuteReader()
    If reader.Read() Then
        TxtCI.Text = reader(0).ToString()
    Else
        MsgBox("No interest", MsgBoxStyle.Critical, "Please reselect")
    End If
    con.Close()
End Sub

Answer 1

根据之前的问题，我知道您在某处有一个 DataTable 和一个 BindingSource。如果目的是让用户能够仅查看“SalesCustomer”类型，请使用过滤器:

bsCust.Filter = "SalesCustomer = True"

在其他情况下，当过滤目标是文本时:

Dim FishFilter = ""
If cboFishFilter.SelectedIndex > 0 Then
    FishFilter = String.Format("Fish = '{0}'", cboFishFilter.Text)
    ' e.g.: "Fish = 'Perch'"
End If

' or via a BindingSource:
bsHdr.Filter = FishFilter
' can also use DataView.RowFilter:
dvHdr.RowFilter = FishFilter

如何应用它取决于您使用的对象。这允许/假设列表中的第一项是“(无)”或类似的内容，以便有一种方法可以删除任何过滤器。在这种情况下，FishFilter 保留为空字符串并清除过滤器。

我喜欢将其放在“应用”按钮上，以便用户可以打开列表并查看它，而不会意外应用过滤器。