以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  多个表引用一个下拉窗口  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=142885)

--  作者：15666282205 --  发布时间：2019/11/8 10:01:00 --  多个表引用一个下拉窗口 老师，设计了一个下拉窗口，想多个表引用，如何改代码呢？ Dim tbl As Table = Tables("商品信息下拉窗口_Table1") If tbl.Current IsNot Nothing Then     e.Form.DropDownBox.Value = tbl.Current("pfullname")     Tables("莱矿备件表").Current("商品编码") = tbl.Current("pusercode") End If e.Form.DropDownBox.CloseDropDown() 还有一个“发货记录表”，如何把代码改一下，让它自己区分是哪个表，请指导。

--  作者：有点蓝 --  发布时间：2019/11/8 10:07:00 --   参考：http://www.foxtable.com/webhelp/topics/2704.htm

--  作者：15666282205 --  发布时间：2019/11/9 7:48:00 --   老师，帮助写得太简单了，还是不会写代码。

--  作者：有点蓝 --  发布时间：2019/11/9 8:45:00 --   Dim tbl As Table = Tables("商品信息下拉窗口_Table1") If tbl.Current IsNot Nothing Then     e.Form.DropDownBox.Value = tbl.Current("pfullname")     e.Form.DropTable.Current("商品编码") = tbl.Current("pusercode") End If e.Form.DropDownBox.CloseDropDown()