Foxtable(狐表)用户栏目专家坐堂 → 关于利用目录树筛选数据问题


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

主题:关于利用目录树筛选数据问题

帅哥哟,离线,有人找我吗?
裴保民
  21楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1989 积分:12631 威望:0 精华:0 注册:2017/4/3 15:01:00
  发帖心情 Post By:2020/3/5 18:43:00 [显示全部帖子]

以前用的是目录树,只能选择最底层节点的数据才能被选选择,现在我有添加了一种列表框的形式(用的是窗体数据表)来选择有效数据,可是怎么窗体数据表只加载目录树最底层的数据呢?向下面的表

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



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


加好友 发短信
等级:八尾狐 帖子:1989 积分:12631 威望:0 精华:0 注册:2017/4/3 15:01:00
  发帖心情 Post By:2020/3/6 9:23:00 [显示全部帖子]

蓝老师您看看怎么设置一下只要打开下拉窗体时按列表选择只显示最底层节点的数据呢?

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:日常记账最后.rar


[此贴子已经被作者于2020/3/6 9:23:47编辑过]

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


加好友 发短信
等级:八尾狐 帖子:1989 积分:12631 威望:0 精华:0 注册:2017/4/3 15:01:00
  发帖心情 Post By:2020/3/6 11:59:00 [显示全部帖子]

在哪个事件写呢?

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


加好友 发短信
等级:八尾狐 帖子:1989 积分:12631 威望:0 精华:0 注册:2017/4/3 15:01:00
  发帖心情 Post By:2020/3/6 14:24:00 [显示全部帖子]

运行后错误如下

图片点击可在新窗口打开查看此主题相关图片如下:截图26.jpg
图片点击可在新窗口打开查看
并且什么数据也没有

图片点击可在新窗口打开查看此主题相关图片如下:微信图片_20200306142240.jpg
图片点击可在新窗口打开查看


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

[此贴子已经被作者于2020/3/6 14:29:49编辑过]

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


加好友 发短信
等级:八尾狐 帖子:1989 积分:12631 威望:0 精华:0 注册:2017/4/3 15:01:00
  发帖心情 Post By:2020/3/11 17:08:00 [显示全部帖子]

对目录树操作时怎么控制不能对一级层节点的修改、删除和添加一级节点呢?只能是一个总结点

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


加好友 发短信
等级:八尾狐 帖子:1989 积分:12631 威望:0 精华:0 注册:2017/4/3 15:01:00
  发帖心情 Post By:2020/3/11 18:00:00 [显示全部帖子]

增加根节点这样写
Dim trv As WinForm.TreeView = e.Form.Controls("srflTreeView")
Dim Index As Integer =1
If trv.Nodes.Count >= 1 Then
    Index = cint(trv.Nodes(trv.nodes.count-1).name) +1
End If
Dim nd As WinForm.TreeNode = trv.Nodes.Add(index,"新节点")
trv.SelectedNode = nd
trv.Select
trv.BeginEdit
(1)增加一个二级节点怎么写呢?


(2)向左移动节点时,最多只能移动到二级节点,不能到一级节点,怎么控制?





[此贴子已经被作者于2020/3/11 19:08:47编辑过]

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


加好友 发短信
等级:八尾狐 帖子:1989 积分:12631 威望:0 精华:0 注册:2017/4/3 15:01:00
  发帖心情 Post By:2020/3/12 9:54:00 [显示全部帖子]

1、Dim nd As WinForm.TreeNode = trv.Nodes.Add(index,"新节点")
nd.Nodes.Add("xxx","xxx")

我测试了一下子增加了两个节点一个是一级的“新节点”和一个二级的“xxx”

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


加好友 发短信
等级:八尾狐 帖子:1989 积分:12631 威望:0 精华:0 注册:2017/4/3 15:01:00
  发帖心情 Post By:2020/3/12 11:38:00 [显示全部帖子]

要在原来的一级菜单下生成一个二级菜单,我想实现一个目录只能有一个一级菜单

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


加好友 发短信
等级:八尾狐 帖子:1989 积分:12631 威望:0 精华:0 注册:2017/4/3 15:01:00
  发帖心情 Post By:2020/3/12 13:55:00 [显示全部帖子]

保存时弹出错误框

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



Dim nd As WinForm.TreeNo改为Dim nd As WinForm.TreeNode

运行后没反应 添加时没反应
[此贴子已经被作者于2020/3/12 14:01:54编辑过]

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


加好友 发短信
等级:八尾狐 帖子:1989 积分:12631 威望:0 精华:0 注册:2017/4/3 15:01:00
  发帖心情 Post By:2020/3/12 14:02:00 [显示全部帖子]

Dim nd As WinForm.TreeNo改为Dim nd As WinForm.TreeNode

运行后没反应 添加时没反应

想实现的是当添加根节点的时候,就在该目录的所有二级节点下新建一个二级节点
[此贴子已经被作者于2020/3/12 14:05:57编辑过]

 回到顶部
总数 32 上一页 1 2 3 4 下一页