以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]treeview增加  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=103479)

--  作者:yjh2002
--  发布时间:2017/7/9 21:33:00
--  [求助]treeview增加
在treeview上增加一个节点代码如下:
Dim tr As WinForm.TreeView
Dim pd As WinForm.TreeNode
pd = tr.SelectedNode.ParentNode
pd.Nodes.Add("99",“aaa") "99"是肯定没有重复的二级节点。
出现错误提示:
未将对象引用设置到对象的实例。

--  作者:有点甜
--  发布时间:2017/7/9 22:00:00
--  
Dim tr As WinForm.TreeView = e.form.controls("TreeView1")
Dim pd = tr.SelectedNode.ParentNode
If pd Is Nothing Then
    pd = tr
End If
pd.Nodes.Add("99","aaa")
[此贴子已经被作者于2017/7/9 22:00:20编辑过]

--  作者:yjh2002
--  发布时间:2017/7/11 9:43:00
--  
还是不行啊。
图片点击可在新窗口打开查看此主题相关图片如下:qq图片20170711094203.png
图片点击可在新窗口打开查看
图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2017/7/11 9:44:00
--  
不要给pd定义类型,或者可以定义为object类型。看2楼,直接复制粘贴。
--  作者:yjh2002
--  发布时间:2017/7/11 10:11:00
--  
好了,谢谢您。但为啥要这样操作才行呢?
--  作者:有点甜
--  发布时间:2017/7/11 10:13:00
--  
以下是引用yjh2002在2017/7/11 10:11:00的发言:
好了,谢谢您。但为啥要这样操作才行呢?

 

如果节点是第一层,那么其父节点是空值,其父节点应该是目录树本身,也就是tr。