Foxtable(狐表)用户栏目专家坐堂 → [求助]如何正确统计多值结果?


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

主题:[求助]如何正确统计多值结果?

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


加好友 发短信
等级:小狐 帖子:364 积分:3637 威望:0 精华:0 注册:2008/11/2 21:50:00
[求助]如何正确统计多值结果?  发帖心情 Post By:2021/1/7 22:42:00 [显示全部帖子]

这是示图例:

图片点击可在新窗口打开查看此主题相关图片如下:202101072237.png
图片点击可在新窗口打开查看
左侧任务栏统计结果如何才能正确?
这是原本代码:

Dim c As WinForm.TopicPage = fll.Pages("疾病诊断")
c.Links.Clear    '清除之前的link项目
For Each xl As String In DataTables("基本信息").GetComboListString("名称","类别 = '疾病诊断'","_Identify").Split("|")
    Dim k1 As String = new String (" ",20-xl.Length*2)   '定义k1的空格字符串,长度为10-疾病诊断的长度
    c.Links.Add(xl,xl & k1  & "(" & DataTables("病案信息").Compute("count(_identify)","出院诊断 = '" & xl & "'") & "人)"  )
Next



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

[此贴子已经被作者于2021/1/7 22:49:56编辑过]

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


加好友 发短信
等级:小狐 帖子:364 积分:3637 威望:0 精华:0 注册:2008/11/2 21:50:00
  发帖心情 Post By:2021/1/7 23:41:00 [显示全部帖子]

感谢!但同时出现一个新问题:任务栏如何筛选的问题:

这是我任务栏本来的代码:
Tables("病案信息").Filter = e.Page.Name & "='" & e.Link.Name & "'"

如此一来,上面的任务栏内控件单击能筛选,可是这个出院诊断任务栏的控件就没有用了,应该如何改善呢?

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


加好友 发短信
等级:小狐 帖子:364 积分:3637 威望:0 精华:0 注册:2008/11/2 21:50:00
  发帖心情 Post By:2021/1/8 23:03:00 [显示全部帖子]

这是显示结果:

图片点击可在新窗口打开查看此主题相关图片如下:捕获0108.png
图片点击可在新窗口打开查看


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


加好友 发短信
等级:小狐 帖子:364 积分:3637 威望:0 精华:0 注册:2008/11/2 21:50:00
  发帖心情 Post By:2021/1/9 13:02:00 [显示全部帖子]

测试结果是一样的.但是统计数量是正确的了;点击控件还是筛选不出相应数据.

图片点击可在新窗口打开查看此主题相关图片如下:捕获1212121.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:小狐 帖子:364 积分:3637 威望:0 精华:0 注册:2008/11/2 21:50:00
  发帖心情 Post By:2021/1/10 23:29:00 [显示全部帖子]

这是实例:
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:医院病案管理系统.table



 回到顶部