Foxtable(狐表)用户栏目专家坐堂 → 汇总报表打印问题,请教!


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

主题:汇总报表打印问题,请教!

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


加好友 发短信
等级:三尾狐 帖子:792 积分:5649 威望:0 精华:0 注册:2013/12/9 20:12:00
汇总报表打印问题,请教!  发帖心情 Post By:2014/3/24 16:52:00 [显示全部帖子]

图片点击可在新窗口打开查看


是这样的~ 

窗体中统计出这样的数据,然后利用想转化为专业报表进行打印。目前遇到的问题是:

小计、总计部分,邮于他是负数行标,不知道怎么样取到相应的数据。(让它显示的位置也保持一致)。请指教~~



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


加好友 发短信
等级:三尾狐 帖子:792 积分:5649 威望:0 精华:0 注册:2013/12/9 20:12:00
  发帖心情 Post By:2014/3/24 17:27:00 [显示全部帖子]

参照帮助,以下代码运行到第二个小计时报错。检查几次没找到问题。

帮纠正下错在哪儿。。

For n As Integer = 0 To tb.Rows.Count(True) -1
    If tb.Rows(n,True).IsGroup = True  Then
        For m As Integer = 0 To tb.Cols.Count -1
            rt.Cells(n+hn,m).text = tb.Rows(n,True)(m)
        Next        
    Else
        For m As Integer = 0 To tb.Cols.Count -1
            rt.Cells(n+hn,m).text = tb.Rows(n)(m)
        Next
    End If
Next

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


加好友 发短信
等级:三尾狐 帖子:792 积分:5649 威望:0 精华:0 注册:2013/12/9 20:12:00
  发帖心情 Post By:2014/3/24 17:31:00 [显示全部帖子]

我看了下两个帮助,你贴这个更适合我现在这个功能。(因为统计方式用户可以自定义的)

报下面这个错;
————————————————————————
.NET Framework 版本:2.0.50727.3655
Foxtable 版本:2014.3.7.1
错误所在事件:窗口,生产数据查询,打印预览,Click
详细错误信息:
Index 6 is either negative or above rows count.


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


加好友 发短信
等级:三尾狐 帖子:792 积分:5649 威望:0 精华:0 注册:2013/12/9 20:12:00
  发帖心情 Post By:2014/3/24 17:41:00 [显示全部帖子]


狐爸莫怪,我是专门有地方来生成统计表,需求如此。呵~

图片点击可在新窗口打开查看

帮指导下,我这个问题错在哪。

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


加好友 发短信
等级:三尾狐 帖子:792 积分:5649 威望:0 精华:0 注册:2013/12/9 20:12:00
  发帖心情 Post By:2014/3/24 17:50:00 [显示全部帖子]

For n As Integer = 0 To tb.Rows.Count(True) -1
    If tb.Rows(n,True).IsGroup = True  Then
        For m As Integer = 0 To tb.Cols.Count -1
            rt.Cells(n+hn,m).text = tb.Rows(n,True)(m)
        Next        
    Else
        For m As Integer = 0 To tb.Cols.Count -1
            rt.Cells(n+hn,m).text = tb.Rows(n,true)(m)
        Next
    End If
Next


晕,原来这里也要加上true

 回到顶部