Foxtable(狐表)用户栏目专家坐堂 → 帮忙看下这个固定格式统计


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

主题:帮忙看下这个固定格式统计

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


加好友 发短信
等级:管理员 帖子:47449 积分:251065 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/11/13 11:34:00 [显示全部帖子]

正确的:

 

Select Case e.DataCol.name
    Case "产品名称"
        Dim dr As DataRow = e.DataRow
        Dim dt As DataTable =DataTables("仓库")
        If dr.IsNull("产品名称") = False Then
            dr("状态_y") = dt.Compute("sum(数量)","[产品名称] = '" & dr("产品名称") & "' And [状态] = 'y'")
            dr("状态_n") = dt.Compute("sum(数量)","[产品名称] = '" & dr("产品名称") & "' And [状态] = 'n'")
        End If
End Select

 

如果要分类小计,统计表也得加上分类列。


 回到顶部