以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  下拉窗口公用问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=134825)
--  作者：jinhetian
--  发布时间：2019/5/10 9:44:00
--  下拉窗口公用问题
老师您好。
下段是下拉窗口中目录树NodeMouseClick属性中的编码。下拉窗口是原本是用在窗口中DropBox1控件的下拉窗口，编码可以实现其功能。现修改后多了一个DropBox2控件，公用下拉窗口。请问编码如何修改？谢谢！


If e.Node.Level = 1 Then \'如果单击的是第二层节点
    Dim tr As Row = Tables("焊接调试检验维修表").Current
    Dim dr As DataRow = e.Node.DataRow \'获取生成此节点的DataRow
    tr("原始故障原因") = dr("规格型号")
End If
--  作者：有点甜
--  发布时间：2019/5/10 9:54:00
--  

看看

 

http://www.foxtable.com/webhelp/scr/2893.htm