- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]在窗口中给表新增数据？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=38721)
-- 发布时间：2013/8/5 13:44:00
-- [求助]在窗口中给表新增数据？
放款表的窗口中，有一个 打款 的复选框，怎么在这个 打款 中打对勾时，自动在 打款明细 表中新增一行，并直接把以下数据填入打款明细表中 谢谢。。
放款表窗口中的 = 打款明细表中的
放款编号 = 打款编号
收款人 = 收款人
放款人 = 负责人
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:实验.foxdb |
-- 发布时间：2013/8/5 14:04:00
--
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=37915&skin=0
参考这里做吧,打勾自动增加复制行很简单的.
-- 发布时间：2013/8/5 21:24:00
--
大哥 不太一样的东西啊，您就费点劲帮我解决了吧 不会自己写代码啊 谢谢 谢谢
-- 发布时间：2013/8/5 22:02:00
--
代码
If e.Sender.Checked Then
Dim ts As Table = e.Form.Controls("Table1").Table
Dim td As Table = Tables("打款明细")
Dim nr As Row = td.AddNew
nr("打款编号") = ts.Current("放款编号")
nr("收款人") = ts.Current("付款人")
nr("负责人") = ts.Current("放款人")
End If
-- 发布时间：2013/8/5 22:25:00
--
虽然看不明白吧 不过管用 谢谢大哥……