- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 窗口添加按钮 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=32611)
-- 发布时间：2013/5/5 10:17:00
-- 窗口添加按钮
设计了一个窗口，我要表A的第一列，第二列，第三列，第四列，输入内容后，单击增加按钮，会自动在表B里面增加一行而后在相同的单元格里面输入相同的内容。如何实现。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:文件 - 副本.table |
-- 发布时间：2013/5/5 15:26:00
--
Dim dr As DataRow = DataTables("表B").AddNew
For Each dc As DataCol In DataTables("表A").DataCols
dr(dc.Name) = Tables("表A").Current(dc.Name)
Next
-- 发布时间：2013/5/5 15:55:00
--
如何指定表A里的前四列，单击后只增加指定列，上面的公式是所有列。
-- 发布时间：2013/5/6 8:55:00
--
dr("第一列") = Tables("表A").Current("第一列")
dr("第二列") = Tables("表A").Current("第二列")