以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请教怎么获取另一个窗口里当前节点的name?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=81398)

--  作者:free666
--  发布时间:2016/2/26 16:52:00
--  请教怎么获取另一个窗口里当前节点的name?
本人新手!!代码基础不是很好,求教各位大大: 
在"主窗口"里用代码生成了"treeview1"以后,想弄成双击"treeview1"的节点打开一个"信息窗口",在"信息窗口"里获取"treeview1"当前节点的name,text 属性,在"信息窗口"的afterload 事件里怎么写啊?

--  作者:大红袍
--  发布时间:2016/2/26 16:54:00
--  

 去编写目录树的 NodeMouseDoubleClick 事件
 
http://www.foxtable.com/help/topics/0886.htm


 
 

[此贴子已经被作者于2016/2/26 16:59:12编辑过]

--  作者:大红袍
--  发布时间:2016/2/26 16:59:00
--  

 获取目录树当前节点这样写代码

 

Dim trv As WinForm.TreeView = forms("窗口1").controls("treeview1")
Dim nd As WinForm.TreeNode = trv.SelectedNode
msgbox(nd.name)


--  作者:free666
--  发布时间:2016/2/26 17:15:00
--  
以下是引用大红袍在2016/2/26 16:59:00的发言:

 获取目录树当前节点这样写代码

 

Dim trv As WinForm.TreeView = forms("窗口1").controls("treeview1")
Dim nd As WinForm.TreeNode = trv.SelectedNode
msgbox(nd.name)



这个可以用~~谢谢大大~


--  作者:free666
--  发布时间:2016/2/26 18:04:00
--  
但是现在又发现个问题,我做了个按钮,clik里只写了 forms("信息窗口").open, 在打开主窗口后,目录树不用鼠标选择节点的情况下点击按钮,报错了
Object reference not set to an instance of an object.
但是用鼠标选择节点后再点按钮是没有问题的,是不是有什么东西要先设定一下?

--  作者:大红袍
--  发布时间:2016/2/26 18:08:00
--  

那你不选中目录树的话,就是就获取不到节点的。

 

Dim trv As WinForm.TreeView = forms("窗口1").controls("treeview1")
Dim nd As WinForm.TreeNode = trv.SelectedNode

If nd IsNot Nothing Then
    msgbox(nd.name)

End If

[此贴子已经被作者于2016/2/26 18:07:59编辑过]