如何把一天的巡视写在一行内 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何把一天的巡视写在一行内

共有3305人关注过本帖树形打印复制链接主题：如何把一天的巡视写在一行内

34772849

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

等级：幼狐帖子：69 积分：752 威望：0 精华：0 注册：2012/2/6 19:10:00

如何把一天的巡视写在一行内 发帖心情

Post By：2014/8/27 15:53:00 [只看该作者]

用专业报表，我想根据巡视数据表，生成考核表，代码应该怎样修改？代码如下：

rt.Cells(0,2).Text = "[Format(Fields!日期.Value,""MM-dd"")]"

rt.Cells(0,3).Text ="[Format(Fields!开始时间.Value,""HH:mm"")]-[Format(Fields!结束时间.Value,""HH:mm"")][Fields!检查地点.Value]"

With rt.RowGroups(0,1)

.DataBinding.DataSource = BindTables("巡视数据表")

.DataBinding.Grouping.Expressions.Add("Fields!序号.Value")

End With

[此贴子已经被作者于2014-9-16 8:28:00编辑过]

有点甜

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

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/8/27 15:58:00 [只看该作者]

例子发上来。

yan2006l

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

等级：一尾狐帖子：431 积分：3214 威望：0 精华：2 注册：2011/9/10 21:35:00

Post By：2014/8/27 16:05:00 [只看该作者]

不要用专业报表，编程生成另外一张临时表，然后把临时表导出

编码也挺简单的，遍历本月1-最后一天;里面再套一个遍历当天所有的selsct,每次aadnew()增加一行直接把数据合成进去

主题：如何把一天的巡视写在一行内