主题：[求助]这段表达式代码如何改（已解决）

一段代码，要求对其表达式（红字部分）的结果减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应该如何加上去？

k3 & j &"/"& k3 & (j-1) & ""    后面的两个""有什么用呀

也不知道，但是去掉后会出错。对加单双引号，觉得规律很难掌握，老是搞不定。

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

 

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

谢谢czy老师。但是出错，上面的代码是正确的，就是需要在以上运算结果的基础上再减1，应该怎样改？谢谢！！

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

ok!成功！！谢谢狐爸老师！！