Dim Atable As DataTable = clsErp.selectTA(strdate, enddate, TBTA001) '销货单
Dim Btable As DataTable = clsErp.selectTB(strdate, enddate, TBTA001) '销退单
'Dim Ctable As DataTable = Atable.Clone()
'Dim myrow As DataRow = Atable.NewRow()
'''''''''''''''''''''''''''''''''''''''
'''''''''''''''''''''''''''''''''''''''
''''''两表合并一张表数据'''''''''''''''
'''''''''''''''''''''''''''''''''''''''
'''''''''''''''''''''''''''''''''''''''
For Each row2 As DataRow In Btable.Rows
Dim rowtmp As DataRow = Atable.NewRow()
&nb
根据条件查询生成两张表并合并绑定datagridview控件
