Foxtable(狐表) → 用户栏目 → 专家坐堂 → [讨论] 如何目录树获取一级节点（已解决）


  共有8367人关注过本帖树形打印复制链接

主题：[讨论] 如何目录树获取一级节点（已解决）
帅哥哟，离线，有人找我吗？
qq121454970
 小大  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：880 积分：9011 威望：0 精华：3 注册：2012/4/22 18:06:00 		[讨论] 如何目录树获取一级节点（已解决）  发帖心情 Post By：2012/7/1 9:16:00 [只看该作者]

请问下，如何做到，当我点击目录树中的“店铺信息”中的任意子节点时，声明一个字符变量，变量的值等于一级节点的名称。然后根据变量值的不同，执行不同的代码？
如果点击的子节点的一级节点标题是“店铺信息”
则执行代码一
如果点击的子节点的一级节点标题是“处理方式”
则执行代码二

这段代码该怎么写呀，各位大哥，解救下呀图片点击可在新窗口打开查看
[此贴子已经被作者于2012-7-1 16:10:30编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
sunbrain
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：383 积分：2439 威望：0 精华：0 注册：2011/12/3 22:19:00 		  发帖心情 Post By：2012/7/1 11:12:00 [只看该作者]

Dim tv As WinForm.TreeView = e.Form.Controls("TreeView1")
Dim nd11 As winform.treenode
Dim nd12 As winform.treenode
tv.BuildTree("表a", "第一列")
nd11 = tv.Nodes.Insert("店铺信息","店铺信息",100)
nd12 = tv.Nodes.Insert("处理方式"," 处理方式 ",101)


If e.Node.text = "店铺信息"
  '你的代码
End If
If e.Node.text = "处理方式"
  '你的代码
End If
 回到顶部
帅哥哟，离线，有人找我吗？
qq121454970
 小大  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：880 积分：9011 威望：0 精华：3 注册：2012/4/22 18:06:00 		  发帖心情 Post By：2012/7/1 15:48:00 [只看该作者]

谢了

 回到顶部
帅哥哟，离线，有人找我吗？
qq121454970
 小大  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：880 积分：9011 威望：0 精华：3 注册：2012/4/22 18:06:00 		  发帖心情 Post By：2012/7/1 16:12:00 [只看该作者]

我用的是
Dim tr As WinForm.TreeView
Dim pd As WinForm.TreeNode
tr = e.Form.Controls("TreeView1")
pd = tr.SelectedNode.ParentNode
Dim s As String = pd.text
If s = "xx"
'执行代码
else
 s = "xx"
'执行代码
end if
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.07031 秒, 4 次数据查询