DataTable 过滤指定字段重复行

        #region   过滤DataTable中的指定字段重复的行
        ///   <summary>   
        ///   过滤DataTable中的指定字段重复的行   
        ///   </summary>   
        ///   <param   name="dt"></param>   
        ///   <param   name="FieldName"></param>   
        ///   <returns></returns>   
        public DataTable SelectDistinctByField(DataTable dt, string FieldName)
        {
            DataTable returnDt = new DataTable();
            returnDt = dt.Copy();//将原DataTable复制一个新的   
            DataRow[] drs = returnDt.Select("", FieldName);//将DataTable按指定的字段排序   
            object LastValue = null;
            for (int i = 0; i < drs.Length; i++)
            {
                if ((LastValue == null) || (!(ColumnEqual(LastValue, drs[i][FieldName]))))
                {
                    LastValue = drs[i][FieldName];
                    continue;
                }
                drs[i].Delete();
            }
            returnDt.AcceptChanges();
            return returnDt;
        }
        private bool ColumnEqual(object A, object B)
        {
            //   Compares   two   values   to   see   if   they   are   equal.   Also   compares   DBNULL.Value.   
            //   Note:   If   your   DataTable   contains   object   fields,   then   you   must   extend   this   
            //   function   to   handle   them   in   a   meaningful   way   if   you   intend   to   group   on   them.  
            if (A == DBNull.Value && B == DBNull.Value)   //     both   are   DBNull.Value   
                return true;
            if (A == DBNull.Value || B == DBNull.Value)   //     only   one   is   DBNull.Value   
                return false;
            return (A.Equals(B));     //   value   type   standard   comparison   
        }


### 回答1: 在 VB.NET 中,可以使用以下方法实现 DataTable 的去重: 1. 使用 DefaultView.ToTable() 方法 使用 DataTable 的 DefaultView.ToTable() 方法可以返回一个新的 DataTable,其中包含了原始 DataTable 中的不重复。 ```vb Dim dt As New DataTable() ' 假设表中有两列,列名为 Column1 和 Column2 ' 加载数据到 DataTable dt 中 ' ... Dim distinctValues As DataTable = dt.DefaultView.ToTable(True, "Column1", "Column2") ' 返回一个新的 DataTable,其中包含了 dt 中的不重复 ' True 表示只保留不重复,"Column1", "Column2" 表示按照这两列进去重 ``` 2. 使用 LINQ 查询 可以使用 LINQ 查询语句来筛选出不重复,然后将其转换为新的 DataTable。 ```vb Dim dt As New DataTable() ' 假设表中有两列,列名为 Column1 和 Column2 ' 加载数据到 DataTable dt 中 ' ... Dim distinctRows = From row In dt.AsEnumerable() Group row By key = New With {Key .Column1 = row.Field(Of String)("Column1"), Key .Column2 = row.Field(Of String)("Column2")} Into Group Select Group.First() Dim distinctValues As DataTable = distinctRows.CopyToDataTable() ' 返回一个新的 DataTable,其中包含了 dt 中的不重复 ``` 其中,Group By 子句将 DataTable 中的按照指定的列进分组,然后使用 Select 子句选择每个分组中的第一个元素,最后使用 CopyToDataTable() 方法将其转换为新的 DataTable。 ### 回答2: 在VB中,可以使用DataTable实现数据去重的操作。 首先,我们需要创建一个DataTable对象,并添加需要去重的数据。 然后,我们可以使用以下代码进去重操作: Dim dt As New DataTable() '添加数据到dt中 '创建一个新的DataTable用于存储去重后的数据 Dim newDt As DataTable = dt.DefaultView.ToTable(True) 上述代码中,我们通过dt.DefaultView.ToTable(True)将DataTable dt中的数据按照默认视图进去重,并将去重后的数据存储到新建的DataTable对象newDt中。 在去重时,默认视图会根据所有列的值进判断,只有在所有列的值都相同的情况下,才认为是重复数据。 除了使用默认视图进去重,我们还可以使用LINQ语句来去重。可以通过以下代码进操作: Dim distinctRows = (From row In dt.AsEnumerable() Select row).Distinct() 使用以上代码,我们可以获取到去重后的数据集合distinctRows,其中的每一数据都是不重复的。 总结来说,无论是使用默认视图还是LINQ语句,都可以实现在VB中使用DataTable数据去重的操作。具体选择哪种方式取决于实际需求和个人喜好。 ### 回答3: 在VB中,要对DataTable去重操作,可以使用Distinct()方法。Distinct()方法用于从DataTable中选择不同的,并创建一个新的DataTable。 下面是一个简单的示例代码,展示了如何使用Distinct()方法来去除DataTable重复: ``` ' 创建一个示意的DataTable Dim dt As New DataTable() dt.Columns.Add("ID", GetType(Integer)) dt.Columns.Add("Name", GetType(String)) dt.Rows.Add(1, "John") dt.Rows.Add(2, "Jane") dt.Rows.Add(1, "John") dt.Rows.Add(3, "Mike") dt.Rows.Add(2, "Jane") ' 使用Distinct()方法创建一个新的去重后的DataTable Dim distinctDT As DataTable = dt.DefaultView.ToTable(True) ' 输出去重后的DataTable For Each row As DataRow In distinctDT.Rows Console.WriteLine(row("ID") & vbTab & row("Name")) Next ``` 运上述代码将输出结果: ``` 1 John 2 Jane 3 Mike ``` 在代码中,我们创建了一个示意的DataTable,并添加了几数据,其中有重复。然后,我们使用DataTable的DefaultView属性的ToTable方法,传入参数true,创建了一个去重后的新DataTable。最后,我们遍历这个新的DataTable的每一,并输出相应的字段值。 这样,我们就可以通过Distinct()方法对DataTable去重操作。请注意,Distinct()方法将根据各的值来判断是否为重复,所以要确保DataTable中的字段值是可比较的。如果需要根据特定的字段去重,可以使用DefaultView属性的RowFilter属性来设定过滤条件。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值