做个按钮：
Dim cnt as integer = DataTables("原始名单").Datarows.Count
写代码正常合并数据到原始名称
For i as integer = cnt to DataTables("原始名单").Datarows.Count -1
DataTables("原始名单").Datarows(i)("关联列") = Tables("展会信息").Current("关联列")
next
加好友 
发短信
Post By：2014/1/6 21:46:00 [显示全部帖子]
