Foxtable(狐表)用户栏目专家坐堂 → [求助]


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

主题:[求助]

美女呀,离线,留言给我吧!
hch
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:110 积分:1170 威望:0 精华:0 注册:2012/9/12 15:30:00
[求助]  发帖心情 Post By:2015/2/18 15:23:00 [只看该作者]

老师您好!我是个初学者。为工作方便,尝试学习狐表,制作了一个狐表文件,发现用同样的方法编写统计汇总数据参数,一个表可以(学术论文统计),另一个统计不出汇总数据(三新项目汇总表)是怎么回事?,是哪里参数写错了,现将文件附上,烦请指教,给与修改,谢谢。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:人事管理系统.table


 回到顶部
美女呀,离线,留言给我吧!
hch
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:110 积分:1170 威望:0 精华:0 注册:2012/9/12 15:30:00
  发帖心情 Post By:2015/2/20 11:06:00 [只看该作者]

还是上面提出的“求助”问题,不明白表达式在哪弄错,将打开文件出现错误的提示截图上传,请看到此贴的老师们费心给解答一下,指出差错出现在哪里,并给予修改,谢谢。

 回到顶部
美女呀,离线,留言给我吧!
hch
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:110 积分:1170 威望:0 精华:0 注册:2012/9/12 15:30:00
  发帖心情 Post By:2015/2/20 11:06:00 [只看该作者]


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

 回到顶部
美女呀,离线,留言给我吧!
hch
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:110 积分:1170 威望:0 精华:0 注册:2012/9/12 15:30:00
  发帖心情 Post By:2015/2/20 19:13:00 [只看该作者]

怎么没人给解答呀图片点击可在新窗口打开查看

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/2/23 9:38:00 [只看该作者]

Select Case MainTable.Name
    Case "三新项目汇总表"
        MainTable.DataTable.DataRows.Clear
        Dim at As DataTable = DataTables("三新项目")
        For Each year As String In at.GetUniqueValues("年度 is not null", "年度")
            Dim r As Row = MainTable.AddNew
            r("海南州人民医院三新项目汇总表_年度") = year
            r("海南州人民医院三新项目汇总表_合计") = at.Compute("Count(_Identify)", "年度 = " & year)
            r("海南州人民医院三新项目汇总表_卫生厅申报项目数_项目数") = at.Compute("Count(_Identify)", "年度 = " & year & " And 申报情况= '申报'")
            r("海南州人民医院三新项目汇总表_卫生厅申报项目数_省内优秀") = at.Compute("Count(_Identify)", "年度 = " & year & " And 申报结果 = '省内优秀'")
            r("海南州人民医院三新项目汇总表_卫生厅申报项目数_省内先进") = at.Compute("Count(_Identify)", "年度 = " & year & " And 申报结果 = '省内先进'")
            r("海南州人民医院三新项目汇总表_卫生厅申报项目数_国内先进") = at.Compute("Count(_Identify)", "年度 = " & year & " And 申报结果 = '国内先进'")
            r("海南州人民医院三新项目汇总表_卫生厅申报项目数_申报获奖情况小计") = at.Compute("Count(_Identify)", "年度 = " & year & " And (申报结果 = '国内先进' Or 申报结果 = '省内先进'Or 申报结果 = '省内优秀')")
            r("海南州人民医院三新项目汇总表_项目类别_临床") = at.Compute("Count(_Identify)", "年度 = " & year & " And 专业类别= '临床'")
            r("海南州人民医院三新项目汇总表_项目类别_药学") = at.Compute("Count(_Identify)", "年度 = " & year & " And 专业类别= '药学'")
            r("海南州人民医院三新项目汇总表_项目类别_其他") = at.Compute("Count(_Identify)", "年度 = " & year & " And 专业类别= '其他'")
            r("海南州人民医院三新项目汇总表_项目类别_影像病理电生理") = at.Compute("Count(_Identify)", "年度 = " & year & " And 专业类别= '医技'")
            r("海南州人民医院三新项目汇总表_项目类别_护理") = at.Compute("Count(_Identify)", "年度 = " & year & " And 专业类别= '护理'")
            r("海南州人民医院三新项目汇总表_项目类别_检验") = at.Compute("Count(_Identify)", "年度 = " & year & " And 专业类别= '检验'")
            r("海南州人民医院三新项目汇总表_申报项目数_通过开展项目数") = at.Compute("Count(_Identify)", "年度 = " & year & " And 院内开展情况= '开展'")
            r("海南州人民医院三新项目汇总表_申报项目数_申报开展项目数") = at.Compute("Count(_Identify)", "年度 = " & year & " And (学术会审议情况= '通过' Or 学术会审议情况= '未通过')")
        Next

End Select


 回到顶部
美女呀,离线,留言给我吧!
hch
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:110 积分:1170 威望:0 精华:0 注册:2012/9/12 15:30:00
  发帖心情 Post By:2015/2/23 16:35:00 [只看该作者]

非常感谢老师的解答,问题已解决。

 回到顶部