| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]关于录入 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=114978) |
| -- 作者：cool314156 -- 发布时间：2018/2/27 10:07:00 -- [求助]关于录入 想请教下，在窗口设计一个输入框，父子孙表用产品编号关联，能用一个输入框同时实现三个表都输入了同一个产品编号吗 |
| -- 作者：有点甜 -- 发布时间：2018/2/27 10:31:00 -- textChanged事件，写代码
Dim t1 As Table = Tables("父") Dim t2 As Table = Tables("父.子") Dim t3 As Table = Tables("父.子.孙")
If t1.Current is Nothing Then t1.addnew t1.current("产品编号") = e.sender.Text If t2.Current is Nothing Then t2.addnew t2.current("产品编号") = e.sender.Text If t3.Current is Nothing Then t3.addnew t3.current("产品编号") = e.sender.Text
|