Select Case e.DataCol.name
Case "送货单号","商品编码"
Dim dr As DataRow = e.DataRow
If dr.IsNull("送货单号") = False AndAlso dr.IsNull("商品编码") = False Then
If e.DataTable.Compute("Count([_Identify])","送货单号 = '" & dr("送货单号") & "' And 商品编码 = '" & dr("商品编码") & "'") > 1 Then
e.DataRow(e.DataCol.Name) = e.OldValue
End If
End If
End Select
合并Excel 文件时,为什么还有送货单号,商品编码,两列一样的?