表A的字段：单号，料号，品名，数量，日期，审核表B的字段：单号，料号，品名，数量，日期，审核，客户
注：
，
2.合并后在，单号，料号，品名，在同一行
'Dim cmd As New SQ-LCommand
'Dim dt As DataTable
'Dim sCols() As String = {"单号", "料号", "品名", "数量", "日期"}
'Dim dCols() As String = {"单号", "料号", "品名", "表A数量", "日期"}
'cmd.C'"
'cmd.CommandText = "SELEC-T * From {表A}WHERE 审核 = '未审核"
'dt = cmd.ExecuteReader()
'For Each dr As DataRow In dt.DataRows
' Dim nr As DataRow = DataTables("员工").AddNew()
' For i As Integer = 0 To sCols.Length - 1
' nr(dCols(i)) = dr(sCols(i))
' Next
'Next
[此贴子已经被作者于2023/8/25 16:51:23编辑过]
加好友 
发短信
Post By：2023/8/24 10:31:00 [只看该作者]
