Foxtable(狐表)用户栏目专家坐堂 → 带统计的多级目录树问题


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

主题:带统计的多级目录树问题

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


加好友 发短信
等级:二尾狐 帖子:546 积分:4332 威望:0 精华:0 注册:2019/1/13 10:12:00
带统计的多级目录树问题  发帖心情 Post By:2019/10/19 20:09:00 [只看该作者]

老师,您看看实例。打开后显示的目录树,统计性别不行,请指教。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:病案管理系统.foxdb



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


加好友 发短信
等级:五尾狐 帖子:1093 积分:6682 威望:0 精华:0 注册:2013/7/1 9:05:00
  发帖心情 Post By:2019/10/19 22:18:00 [只看该作者]

            nd.Text = nd.text & "月(" & dt.Compute("Sum(次数)","年 = " & Year & " And 月 = " & Month & " And  性别 = '" & nd.Text & "'") & ")"

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


加好友 发短信
等级:二尾狐 帖子:546 积分:4332 威望:0 精华:0 注册:2019/1/13 10:12:00
  发帖心情 Post By:2019/10/20 21:03:00 [只看该作者]

老师,我试了,还是不行。

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111401 积分:567075 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/20 21:13:00 [只看该作者]

NodeMouseClick事件


    Dim Product As String = e.Node.DataRow("性别")


窗口afterload事件


        Case 2

            nd.Text = nd.text & "(" & dt.Compute("Sum(次数)","年 = " & Year & " And 月 = " & Month & " And  性别 = '" & nd.Text & "'") & ")"


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


加好友 发短信
等级:二尾狐 帖子:546 积分:4332 威望:0 精华:0 注册:2019/1/13 10:12:00
  发帖心情 Post By:2019/10/20 21:56:00 [只看该作者]

行了,谢谢,蓝老师。

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


加好友 发短信
等级:二尾狐 帖子:546 积分:4332 威望:0 精华:0 注册:2019/1/13 10:12:00
  发帖心情 Post By:2019/10/20 22:12:00 [只看该作者]

老师,在另一个项目里,还需要增加两级目录,比如年龄 、类型,怎样加呢?

 回到顶部
帅哥,在线噢!
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111401 积分:567075 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/20 22:25:00 [只看该作者]

完全同样的方法

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


加好友 发短信
等级:二尾狐 帖子:546 积分:4332 威望:0 精华:0 注册:2019/1/13 10:12:00
  发帖心情 Post By:2019/10/21 8:24:00 [只看该作者]

我也知道方法差不多,我也试了。问题在于加case3下面的那一行代码时,后面怎么加上一个目录。我模仿着试了好多次都不行,还请您示范一下,帮助也找不到。

 回到顶部
帅哥,在线噢!
有点蓝
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111401 积分:567075 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/21 8:36:00 [只看该作者]

把您模仿的代码贴出来

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


加好友 发短信
等级:二尾狐 帖子:546 积分:4332 威望:0 精华:0 注册:2019/1/13 10:12:00
  发帖心情 Post By:2019/10/21 13:41:00 [只看该作者]

老师,还是用这个实例吧,您看看。我改了代码以后目录树不显示了。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:病案管理系统.foxdb



 回到顶部
总数 17 1 2 下一页