Foxtable(狐表)用户栏目专家坐堂 → [求助]TreeView的Level属性


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

主题:[求助]TreeView的Level属性

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


加好友 发短信
等级:九尾狐 帖子:2609 积分:16926 威望:0 精华:11 注册:2011/9/20 16:13:00
[求助]TreeView的Level属性  发帖心情 Post By:2011/10/31 15:10:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:qq截图1.png
图片点击可在新窗口打开查看


 


图片点击可在新窗口打开查看此主题相关图片如下:qq截图1.png
图片点击可在新窗口打开查看

 

同样的代码,为什么点击客服部可以查询到数据,点击生产部的节点就不行呢?

 

Dim tv As WinForm.TreeView = e.Form.Controls("TreeView1")
Dim r As Integer
With Tables("C10分组及流程权限设置")
    If tv.SelectedNode.Level = 0 Then
        r = .FindRow("[部门] = '" & tv.SelectedNode.Name & "'", .Position + 1, True ) 

        If r >= 0 Then 

            .Position = r 

        End If
    Else
        r = .FindRow("[分组] = '" & tv.SelectedNode.Name & "'", .Position + 1, True ) 

        If r >= 0 Then 

            .Position = r 

        End If
    End If
End With

[此贴子已经被作者于2011-10-31 15:18:38编辑过]

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


加好友 发短信
等级:九尾狐 帖子:2609 积分:16926 威望:0 精华:11 注册:2011/9/20 16:13:00
[求助]TreeView的Level属性  发帖心情 Post By:2011/10/31 15:20:00 [只看该作者]

顶一下


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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/10/31 15:25:00 [只看该作者]

看不出问题来,用例子说话。

 回到顶部