- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]刚接触foxtable ,在学习treeview 中ParentNode的问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=103387)
-- 发布时间：2017/7/6 21:57:00
-- [求助]刚接触foxtable ,在学习treeview 中ParentNode的问题
ParentNode
返回父节点。
示例：
Dim tr As WinForm.TreeView
Dim pd As WinForm.TreeNode
tr = Forms("窗口1").Controls("TreeView1")
pd =
tr.SelectedNode.ParentNode
pd.Nodes.Add("新节点")
我用此代码单独试用时，出现下图错误提示，在反复应用几次，竟使用正常，可照搬到另一项目中，次次出错，
此主题相关图片如下：tim截图20170706213925.png
此主题相关图片如下：tim截图20170706214556.png
将ParentNode属性去掉，竟不报错，但达不到我的设计要求。
各位有遇过此问题吗？
-- 发布时间：2017/7/6 23:22:00
--
Dim tr As WinForm.TreeView
Dim pd As WinForm.TreeNode
tr = Forms("窗口1").Controls("TreeView1")
If tr.SelectedNode Is Nothing Then
msgbox("请选择节点")
Else
pd = tr.SelectedNode.ParentNode
If pd Is Nothing Then
tr.Nodes.Add("新节点")
Else
pd.Nodes.Add("新节点")
End If
End If
-- 发布时间：2017/7/7 7:47:00
--
首先谢谢你，将你的代码复制过去，仍然是这种情况，只放一个按钮的窗口中执行没有问题，在一个多按钮窗口中执行就出错，但我其他按钮里没有ParentNode属性的代码，运行也不出错。只要去掉ParentNode属性就正常，我用的是windows 10系统，会是兼容性问题吗？
-- 发布时间：2017/7/7 8:06:00
--
感谢，是我自己忽略了窗口名称的变化，已经发现并解决