从数据网格视图而不是从数据库筛选数据网格视图

Question

我想在我的表单上过滤数据网格视图。

在表格上：

1 数据网格视图

1 个标签

1 个定时器

我已将数据库加载到DataGridView中（所有数据都加载到DataGridView）

在我的数据网格视图上，我有 7 列最后一列是日期，格式为 dd/MM/yyyy，现在如何使用标签过滤数据网格视图，我像这样将此标签设置为日期

Private Sub TimerDate_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TimerDate.Tick
    Dim FDate As String = Format(Today, "dd/MM/yyyy")
    LblDate.Text = FDate
End Sub

我想消除其他数据..所以最后在我的DatagridView中，我有最后一列与LblDate.text相同的数据

我不想从数据库中过滤数据网格视图。

有人可以帮助我..？ 谢谢。

对不起，我的英语不好。

这就是我将数据填充到数据网格的方式

Public Class FrmJadwalSidang
Dim ConnString As String = ("Dsn=SqlConn;Server=192.168.100.1;uid=XXX;pwd=XXX;database=DBXXX;port=3306")
Public Function FillData(ByVal Sqlstring As String)
    Dim OdbcConn As OdbcConnection = New OdbcConnection(ConnString)
    OdbcConn.Open()
    Dim MyDataSet As DataSet = New DataSet()
    Dim MyOdbcdAdapter As OdbcDataAdapter = New OdbcDataAdapter()
    MyOdbcdAdapter.SelectCommand = New OdbcCommand(Sqlstring, OdbcConn)
    MyOdbcdAdapter.Fill(MyDataSet)
    Me.DATAGRIDVIEW.DataSource = MyDataSet.Tables(0)
    MyOdbcdAdapter.Dispose()
    MyDataSet.Dispose()
    OdbcConn.Close()
    OdbcConn.Dispose()
End Function
Private Sub FrmMain_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    FillData("Select nomor_perkara, jam_sidang, para_pihak, majelis_hakim_text, panitera_pengganti_text, agenda, tanggal_sidang  from v_jadwal_sidang")
End Sub
End Class

解决

    Private Sub FrmMain_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        FillData("Select nomor_perkara, jam_sidang, para_pihak, majelis_hakim_text, panitera_pengganti_text, agenda, tanggal_sidang  from v_jadwal_sidang WHERE jadwal_sidang='" & LblDate.text.tostring & "'")
end sub

它有效。最后，我必须通过SQL查询进行过滤。

感谢有人给了我答案。

Answer 1

如果您使用的是 SqlDataSource，请设置控件的 FilterExpression。

请参见此内容：如何：为 SqlDataSource 控件启用筛选

以及：如何：使用 SqlDataSource 控件连接到 ODBC 数据库

编辑：我提供了Web应用程序的信息，而不是wform应用程序。 有关如何为 BindingSource 设置筛选的信息，请阅读此内容：BindingSource.Filter 属性