窗口中的DropBox共用目录树问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 窗口中的DropBox共用目录树问题

共有2207人关注过本帖树形打印复制链接主题：窗口中的DropBox共用目录树问题

www111998

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：87 积分：721 威望：0 精华：0 注册：2018/2/26 13:37:00

窗口中的DropBox共用目录树问题 发帖心情

Post By：2018/5/11 18:19:00 [显示全部帖子]

做了一个目录树的窗口文件，想在不同窗口的DropBox中实现都可以使用这个目录树

但是DropBox又没有绑定表的，没有这个要求，能够实现吗？

这个通用的目录树的NodeMouseClick事件代码怎么写啊？

现在的代码如下：

if e.node.level = 2 then

dim tr as dataRow = e.node.datarow

dim dr as winform.dropdownbox = forms("窗口1").controls("dropbox1")

dr.text = tr("姓名")

e.form.dropdownbox.closedropdown

end if

想实现窗口2和窗口3的dropbox1都可以使用这个共享目录树，代码应该怎么写，是应该用for each语句吗？

www111998

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：87 积分：721 威望：0 精华：0 注册：2018/2/26 13:37:00

Post By：2018/5/11 19:16:00 [显示全部帖子]

老师，我自己试了下，代码改成如下

if e.node.level = 2 then

dim tr as dataRow = e.node.datarow

e.Form.DropDownBox.value = tr("姓名")

e.form.dropdownbox.closedropdown

end if

试过就可以在任何窗口的DropBox中使用，不知道会不会有问题

www111998

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：87 积分：721 威望：0 精华：0 注册：2018/2/26 13:37:00

Post By：2018/5/11 20:40:00 [显示全部帖子]

说的有道理，受教了！

主题：窗口中的DropBox共用目录树问题