以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  [求助]选择当前行  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=70986)

--  作者：l1q2lq --  发布时间：2015/7/2 17:55:00 --  [求助]选择当前行 If Tables("物料需求").rows.Count > 0 Then               For Each r1 As Row In Tables("物料需求")             Dim  r2 As Row = Tables("出库信息").AddNew             r2("零件号") = r1("零件号")             r2("出库数量") = r1("物料需求_")         Next     End If 其中这一句，我想让 r2("出库数量") = 在表A中鼠标所选的列 这个要怎么改？

--  作者：大红袍 --  发布时间：2015/7/2 18:24:00 --   r2("出库数量") = r1("物料需求_" & Tables("物料需求").Cols(Tables("物料需求").Colsel).Name)

--  作者：l1q2lq --  发布时间：2015/7/2 19:28:00 --   多谢多谢