drawcell代码如下： _userdept 是一个单位名称分组 

If _username <> "admin" Then

    If e.Col.Name = "单价" Then

        If _UserDept <> e.Row("库存单位")

            e.Text = "***"

        End If

    End If

    If e.Col.Name = "金额" Then

        If _UserDept <> e.Row("库存单位")

            e.Text = "***"

        End If

    End If

End If

If  e.Col.Name = "数量" Then \'如果是分组行的数量列

    If e.Row("数量") < 10 Then

        e.Style = "or"

    Else

        e.style = "els"

    End If

End If

窗口绑定“库存表”

afterload 代码如下：

‘合并模式

With Tables("库存表")

    .MergeMode = MergeModeEnum.Standard

    .MergeCols.Clear()

    .MergeCols.Add("库存单位")

    .MergeCols.Add("品牌")

    .MergeCols.Add("类别")

    .MergeCols.Add("系列")

    .MergeSort = "库存单位,品牌,类别,系列"

    .AllowMerge = True

End With

‘汇总模式

Dim t As Table = Tables("库存表")

Dim g As Subtotalgroup

t.SubtotalGroups.Clear()

t.GroupAboveData = False

t.TreeVisible = False

t.SpillNode = True

g = New Subtotalgroup

g.Aggregate = AggregateEnum.Sum

g.GroupOn = "库存单位"

g.TotalOn = "金额"

g.Caption = "{0} 小计"

t.SubtotalGroups.Add(g)

g = New Subtotalgroup

g.Aggregate = AggregateEnum.Sum

g.GroupOn = "*"

g.TotalOn = "数量,金额"

g.Caption = "总计"

t.SubtotalGroups.Add(g)

t.Subtotal()

显示结果如附件：
此主题相关图片如下：8888.png

现在是以‘武汉公司’登录，希望能显示武汉公司小计中的“金额”数据 以及  总计中的“金额”数据。

请教 在哪里改？