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


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

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

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


加好友 发短信
等级:七尾狐 帖子:1525 积分:10580 威望:0 精华:0 注册:2008/9/24 11:16:00
[求助]关于表达式如何加单双引号(已解决)  发帖心情 Post By:2011/7/11 12:03:00 [只看该作者]

一段代码,红色的部分为表达式,应该怎样加单双引号?请各位老师指教,谢谢!!

 

Dim k1 As String ="加工费_"
Dim k2 As String ="投工_"
Dim k3 As String ="人加工费_"
Dim k4 As String ="环比_"
For j As Integer = 1 To i   
    'DataTables("年度汇总").DataCols.Add( k3 & j , Gettype(Double))   '动态增加列
    r.DataTable.DataCols.Add( k3 & j , Gettype(Double),"iif( k2 & j =0,null, k1 & j / k2 & j )")

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

[此贴子已经被作者于2011-7-11 12:28:36编辑过]

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


加好友 发短信
等级:管理员 帖子:47448 积分:251048 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/7/11 12:16:00 [只看该作者]

 r.DataTable.DataCols.Add( k3 & j , Gettype(Double),"iif(" &  k2 & j  & "=0,null, "  & k1 & j  & “/” &  k2 & j & ")")

 

 

 

 

 


 回到顶部
帅哥哟,离线,有人找我吗?
hhbb
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | 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


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


加好友 发短信
等级:七尾狐 帖子:1525 积分:10580 威望:0 精华:0 注册:2008/9/24 11:16:00
  发帖心情 Post By:2011/7/11 12:28:00 [只看该作者]

谢谢两位老师,狐爸老师的为正解。再次感谢!!


 回到顶部