If DataTables("出库").DataRows.Count =0 Then '如果出库表没有数据
DataTables("销售明细").LoadFilter ="送货单号 Is Null" '不加载销售明细
Else
Dim ids As String
For Each dr As DataRow In DataTables("出库").DataRows
ids =ids & "," & dr("送货单号")
Next
ids=ids.Trim(",")
DataTables("销售明细").LoadFilter ="送货单号 In (" & ids & ")"
End If
DataTables("销售明细").Load()
出库表和销售明细根据送货单号关联,出库表的AfterLoad如上设置,可出库表动态加载后,销售明细没有同步加载相关送货单号的销售明细,如上代码根据帮助中修改,不知问题出现在那?