请教以下报表如何实现？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 请教以下报表如何实现？

共有10117人关注过本帖树形打印复制链接主题：请教以下报表如何实现？

20090530

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：55 积分：626 威望：0 精华：0 注册：2010/7/11 23:30:00

请教以下报表如何实现？ 发帖心情

Post By：2012/2/1 10:55:00 [只看该作者]

将人员表输出为以下格式：

办公室 5人陈成进 555 陈诗淇 391 陈思达 461 程康文 506 邓玉婷 389
财务部 20人林景阳 556 苏捷 601 谢杰立 465 谢晓霞 510 杨景亮 529 张李华 537 陈成进 410 陈诗淇 509 陈思达 391
                 程康文 529 邓玉婷 479 林景阳 465 苏捷 537 谢杰立 554 谢晓霞 551 杨景亮 601 张李华 544 陈成进 510
                 陈诗淇 506 陈思达 502
人资部 3人   程康文 498 邓玉婷 494 林景阳 490

合计
办公室 5人综合部 23人

下载信息 [文件大小：下载次数： ]
点击浏览该文件:20120201.table

[此贴子已经被作者于2012-2-1 10:58:29编辑过]

20090530

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：55 积分：626 威望：0 精华：0 注册：2010/7/11 23:30:00

Post By：2012/2/1 11:36:00 [只看该作者]

麻烦老师予以指导！谢了！

狐狸爸爸

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2012/2/1 11:54:00 [只看该作者]

Dim sb As new StringBuilder
Dim bms As List(of String) = DataTables("人员").GetUniqueValues("","二级部门")
For Each bm As String In bms
    Dim nms As List(of String) = DataTables("人员").GetUniqueValues("二级部门 = '" & bm & "'", "姓名" )
    sb.Append(bm & " " & nms.Count & "人")
    For Each nm As String In nms
        sb.append(" " & nm)
    Next
    sb.AppendLine("")
Next
bms = DataTables("人员").GetUniqueValues("","部门")
For Each bm As String In bms
    sb.Append(bm & DataTables("人员").Compute("Count([_Identify])","部门 = '" & bm & "'"))
Next
output.show(sb.Tostring)

169163

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：42 积分：464 威望：0 精华：0 注册：2011/8/24 9:47:00

Post By：2012/2/1 15:01:00 [只看该作者]

请教狐狸爸爸，这相当于用狐表出了一份职工名单，如何在输出到excel报表，二级部门人多的话，如何设置换行，谢谢！

狐狸爸爸

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2012/2/1 15:04:00 [只看该作者]

这个不能输出到excel报表，知道了原理，自己用专业报表写吧。

20120312	小大 6楼 \| 信息 \| 搜索 \| 邮箱 \| 主页 \| UC
加好友发短信等级：婴狐帖子：12 积分：824 威望：0 精华：0 注册：2012/3/13 10:30:00	Post By：2012/3/31 10:37:00 [只看该作者] 用户已被锁定

下一主题 >> << 上一主题

主题：请教以下报表如何实现？