数据库开发027使用BindingSource筛选和排序

最新推荐文章于 2022-12-07 15:11:22 发布

ngbshzhn

最新推荐文章于 2022-12-07 15:11:22 发布

阅读量1.1k

点赞数

分类专栏： # VB2010数据库开发入门

本文链接：https://blog.csdn.net/ngbshzhn/article/details/106026944

版权

这篇博客介绍了如何利用BindingSource控件进行数据处理，包括通过Filter属性实现数据筛选和Sort属性进行简单的排序。Filter属性允许在基础列表上设置筛选条件，而Sort属性则支持多列排序，通过'ASC'或'DESC'指定排序方向。

摘要由CSDN通过智能技术生成

BindingSource控件可以对数据做简单的处理，比如使用Filter属性实现数据筛选，使用Sort属性实现简单的排序。Filter属性通常用在复杂的数据绑定方案中，当Filter不为空时，BindingSource控件将此属性传递给基础列表日如果在对象初始化过程中设置此属性，该调用将会推迟到初始化完成后。F ilter需要指定列的名称，后跟一个运算符和一个要筛选的值，筛选值必须位于引号内。
Sort属性后面要跟有列的名称，用ASC或DESC标识，以指示是按升序还是降序排序，如果有多个列，并用逗号分隔。
BindingSourcel.Sort="Country DESC, Address ASC"

Imports System.Data.SqlClient

Public Class Form1
    Dim conn As SqlConnection
    Dim da As SqlDataAdapter
    Dim ds As DataSet           '必须加“NEW”关键字
    Dim dt As DataTable

    Private Function GetConnection() As SqlConnection
        Return New SqlConnection(My.Settings.SalesConnectionString)
    End Function

    Private Sub DisplayData1(ByVal str As String, ByVal datagridview1 As DataGridView) '用DataReader对象

        datagridView1.DataSource = Nothing

        conn = GetConnection()
        conn.Open()
        Dim comm As New SqlCommand(str, conn)
        Dim dr As SqlDataReader = comm.ExecuteReader
        Dim dt As New DataTable
        dt.Load(dr)
        conn.Close()

        DataGridView1.DataSource = dt
    End Sub

    Private Sub DisplayData2(ByVal str As String, ByVal datagridview1 As DataGridView) '用DataSet对象和Adapter的Fill方法
        DataGridView1.DataSource = Nothing

        conn = GetConnection()
        conn.Open()
        da = New SqlDataAdapter(str, conn)
        da.Fill(ds, "dt")

        conn.Close()

        DataGridView1.DataSource = ds.Tables("dt")
    End Sub

    Private Sub DisplayData3(ByVal str As String, ByVal datagridview1 As DataGridView) '用DataSet对象和Adapter的Fill方法
        DataGr