Foxtable(狐表)用户栏目专家坐堂 → [求助] 如何获取TreeView控件的值


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

主题:[求助] 如何获取TreeView控件的值

帅哥哟,离线,有人找我吗?
clchen
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:241 积分:1750 威望:0 精华:0 注册:2016/5/20 12:55:00
[求助] 如何获取TreeView控件的值  发帖心情 Post By:2016/9/5 11:31:00 [只看该作者]

 如何获取TreeView控件的值
当我勾选某条子节点的时候 在单击Button的时候 就会按照我勾选的值做为条件查询
图片点击可在新窗口打开查看此主题相关图片如下:3q3ovkx1(el8)43jn_4y4}u.png
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110597 积分:562881 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/9/5 11:40:00 [只看该作者]

循环所有节点判断是否勾选

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")

For Each node As WinForm.TreeNode In trv.AllNodes
    If node.Checked Then
        msgbox("选我")
    End If
Next

 回到顶部
帅哥哟,离线,有人找我吗?
clchen
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:241 积分:1750 威望:0 精华:0 注册:2016/5/20 12:55:00
  发帖心情 Post By:2016/9/5 11:51:00 [只看该作者]

 
这个条件要怎么写啊??

此主题相关图片如下:pzqwxj9ax(gv0z}t1}_rpbt.png
按此在新窗口浏览图片


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110597 积分:562881 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/9/5 12:22:00 [只看该作者]

='" & node.text & "'"

 回到顶部
帅哥哟,离线,有人找我吗?
clchen
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:241 积分:1750 威望:0 精华:0 注册:2016/5/20 12:55:00
  发帖心情 Post By:2016/9/5 14:25:00 [只看该作者]

那如果勾选两条 或者是三条数据 该如何查询呢??

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110597 积分:562881 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/9/5 14:57:00 [只看该作者]

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")

Dim filter As String = "1=1"

For Each node As WinForm.TreeNode In trv.AllNodes
    If node.Checked Then
        filter &= " and " & node.Name & "='" & node.text & "'"
    End If
Next

Output.Show(filter)

 回到顶部
帅哥哟,离线,有人找我吗?
atiwhl5
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:120 积分:1157 威望:0 精华:0 注册:2019/8/10 1:23:00
  发帖心情 Post By:2020/1/30 11:06:00 [只看该作者]

代码中1=1是啥意思

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110597 积分:562881 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/1/30 11:44:00 [只看该作者]

表示为真,一个减少代码量的小技巧而已。

Output.Show(filter)输出最后的结果看看

 回到顶部