
加好友 发短信
等级:超级版主
帖子:112377
积分:572147
威望:0
精华:9
注册:2015/6/24 9:21:00
|
Post By:2017/7/19 9:37:00 [显示全部帖子]
确定按钮 Dim rs As List(of Row) = Tables("选择窗口_Table1").GetCheckedRows()For Each r As Row In rs Dim nr As Row = Tables("收货单_Table1").Addnew nr("编号") = xxx nr("引用单号") = r("单号") nr("引用行号") = r("顺序号")Next
|
|