以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]关于<自定义录入界面之三>下拉窗口的疑问(已解决)  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=35271)

--  作者:pc005637
--  发布时间:2013/6/27 17:04:00
--  [求助]关于<自定义录入界面之三>下拉窗口的疑问(已解决)

如果除了客户ID列,还要同时从客户表选择其它多列内容输入到订单表,可以将DropDownClosed事件代码改为:

If e.Selected Then \'如果选择了值
    Dim tbl As Table = Tables("窗口1_Table1")
    If
tbl.Current IsNot Nothing
Then
        e.Form.DropDownBox.Value = tbl.Current(
"客户ID")
       
Tables("订单").Current("其它列1") = tbl.Current("其它列1")
        Tables("订单").Current("其它列2") = tbl.Current("其它列2")
        Tables("订单").Current("其它列3") = tbl.Current("其它列3")
    End
If
End If


如果我有多个表,共享同一个下拉窗口,应该如果设置?

给个思路。谢谢。

[此贴子已经被作者于2013-6-27 18:00:37编辑过]

--  作者:狐狸爸爸
--  发布时间:2013/6/27 17:08:00
--  

看看这个贴:

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=33606&page=2