Foxtable(狐表)用户栏目专家坐堂 → [求助]关于表达式如何加单双引号(已解决)


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

主题:[求助]关于表达式如何加单双引号(已解决)

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


加好友 发短信
等级:等待验证 帖子:386 积分:2482 威望:0 精华:1 注册:2011/5/10 11:13:00
  发帖心情 Post By:2011/7/11 12:17:00 [显示全部帖子]

Dim k1 As String ="加工费_"
Dim k2 As String ="投工_"
Dim k3 As String ="人加工费_"
Dim k4 As String ="环比_"

With DataTables("年度汇总")
    For j As Integer = 1 To i    
       '.DataCols.Add( k3 & j , Gettype(Double))   '动态增加列 
         r.DataTable.DataCols.Add( k3 & j , Gettype(Double),"iif(" & k2 & j =0,null," & k1 & j / k2 & j & ")")

        .DataCols.Add( k4 & j , Gettype(Double))   '动态增加列
        .DataCols( k1 & j ).SetFormat("0.00")
        .DataCols( k2 & j ).SetFormat("0.00")
        .DataCols( k3 & j ).SetFormat("0.00")
        .DataCols( k4 & j ).SetFormat("0.00")
    Next

End With


 回到顶部