Foxtable(狐表)用户栏目专家坐堂 → 遍历统计工具,组合统计


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

主题:遍历统计工具,组合统计

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/8/2 10:47:00 [显示全部帖子]

For Each c2 As Col In Tables(e.Form.Name & "_table1").cols
    If c2.name.startwith("吊牌金额") = True Then
        Dim c As Col = Tables(e.Form.Name & "_table1").Cols(c2.name)
        Dim s1 As String = c.Caption.SubString(0,27)  '这个是为了得到 表头,使得新增的列的标题的列头和其他的一样.
        DataTables(e.Form.Name & "_table1").DataCols.Add("销售折扣",Gettype(Double), "销售金额_" & c2.name.Replace("吊牌金额_","") & " / " & c2.name ,s1 & "销售折扣")
    End If
Next

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/8/2 14:23:00 [显示全部帖子]

会不会是连到其它数据库了

 回到顶部