以下代码是设计在源表(即“分部装备”)datachanged事件中的,意思是想把源表中部分列按_ididentify 排序填充到接收表中,但充后接收表“序号”总是从“2”开始的,难道-ididentify没有从“1”开始吗?
Dim f As New Filler
f.SourceTable = DataTables("分部装备") '指定数据来源
f.SourceCols = "_identify,出厂编号,规格型号,装备名称,ePMS单价" '指定数据来源列,ePMS单价,检验周期,检验时间
f.DataTable = DataTables("装备管理") '指定数据接收表
f.DataCols = "序号,出厂编号,规格型号,装备名称,ePMS单价" '指定数据接收列,ePMS单价,检验周期,检验时间
f.Append = False
'f.Distinct = False
'f.ExcludeNullValue = True
f.Fill() '填充数据
DataTables("装备管理").DeleteFor( " 装备名称 Is Null ") '删除空白行
DataTables("装备管理").Save()
'End If
此主题相关图片如下:源表.png
这是源表。

此主题相关图片如下:接收表.png

这是接收表。