以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]这段表达式代码如何改(已解决)  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=11183)

--  作者:yyzlxc
--  发布时间:2011/7/12 12:08:00
--  [求助]这段表达式代码如何改(已解决)

一段代码,要求对其表达式(红字部分)的结果减1,代码如何写,请各位老师指教。谢谢!!

    If j-1 = 0 Then
        r.DataTable.DataCols.Add( k4 & j , Gettype(Double))
    Else
        r.DataTable.DataCols.Add( k4 & j , Gettype(Double), k3 & j &"/"& k3 & (j-1) &"")
    End If

 

此段代码是生成环比,本月值k3 & j &除以上月值& k3 & (j-1) &还应该减1,才符合要求。这个减1应该如何加上去?

[此贴子已经被作者于2011-7-12 14:13:47编辑过]

--  作者:kgd815
--  发布时间:2011/7/12 12:40:00
--  
k3 & j &"/"& k3 & (j-1) & ""    后面的两个""有什么用呀



--  作者:yyzlxc
--  发布时间:2011/7/12 12:44:00
--  
也不知道,但是去掉后会出错。对加单双引号,觉得规律很难掌握,老是搞不定。
[此贴子已经被作者于2011-7-12 12:46:30编辑过]

--  作者:czy
--  发布时间:2011/7/12 13:23:00
--  

我在想是不是应该这样呢?

 

     r.DataTable.DataCols.Add( k4 & j , Gettype(Double), k3 & j & "/" & k3 & "(" & j-1 & ")")


--  作者:yyzlxc
--  发布时间:2011/7/12 13:32:00
--  
谢谢czy老师。但是出错,上面的代码是正确的,就是需要在以上运算结果的基础上再减1,应该怎样改?谢谢!!
--  作者:狐狸爸爸
--  发布时间:2011/7/12 13:47:00
--  
 r.DataTable.DataCols.Add( k4 & j , Gettype(Double), k3 & j &"/"& k3 & (j-1) &"-1")
--  作者:yyzlxc
--  发布时间:2011/7/12 14:13:00
--  
ok!成功!!谢谢狐爸老师!!