主题：关于统计方法疑问

1、先设置合并模式，然后再汇总。

2、foxtable没有设置某行高度的命令，所以应该是没办法的。

可以看看AutoSizeRow：

http://help.foxtable.com/topics/1564.htm

看看我的：

此主题相关图片如下：21.gif

如果是时间分组，是不能合并的，值相同才能合并

g.DateGroup = DateGroupEnum.None

改为：

g.DateGroup = DateGroupEnum.Day

这里有问题：

  If r.IsGroup '如果是分组行
        Dim f As String = "排产日期 = '" & r("排产日期") & "'"
        Dim v As String = " 订单数:" & t.Compute("Count(订单编号)",f)
        r("排产日期") = "当日提示:" & r("排产日期") & v
    End If

提示： 既然此行是分组行，那么r("排产日期")返回的肯定不是日期值，而且表达式的日期应该用#扩起来的。

t.subtotal之后的代码应该改为：

Dim r As Row
Dim r1 As Row
For i As Integer = 1 To t.Rows.Count(True) - 1
    r = t.Rows(i,True)
    r1 = t.Rows(i-1,True)
    If r.IsGroup '如果是分组行
        Dim f As String = "排产日期 = #" & r1("排产日期") & "#"
        Dim v As String = " 订单数:" & t.Compute("Count(订单编号)",f)
        r("排产日期") = "当日提示:" & r1("排产日期") & v
    End If
Next

请仔细体会一下。