Foxtable(狐表)用户栏目专家坐堂 → 表达式请教


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

主题:表达式请教

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/22 16:14:00 [显示全部帖子]

Dim kmjh() As String = {"数量","数量1","数量2","合计"}
Dim zf As String
Dim zzf As String
For Each v As String In kmjh
   
    If v <> "合计"  Then
        zf = zf & "+" & "isnull(" & v & ",0)"
    End If


    zzf = zf.TrimStart("+")
    If v <> "合计"
        dtb.AddDef(v ,Gettype(Double),"",v)
    Else
        dtb.AddDef(v ,Gettype(Double),zf,v)
    End If
   
Next


 回到顶部