以下代码是设计在源表（即“分部装备”）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
这是接收表。
加好友 
发短信
Post By：2012/11/10 9:18:00 [只看该作者]
