主题：[求助]能否在交叉表的垂直分组列中增加列（已解决）

考虑了半天，还是将那段代码替换掉，比较好懂，但是又碰到闹心的单双引号搞不定，还是烦请各位老师再次帮忙，不胜感谢！！

 

For j As Integer = 1 To i
    Dim dr As DataRow
    dr("人均加工费_" & j &) =" iif(dr("投工_" & j &)=0,null,dr("加工费_" & j &) "/" dr("投工_" & j &)"
    If j-1 = 0 Then
        dr("环比_" & j &) = Nothing

    Else
        dr("环比_" & j &) = iif(dr("人均加工费_" (j-1))=0,null,(dr("人均加工费_" & j &) / dr("人均加工费_" (j-1)))-1)
    End If
Next

 

谢谢狐爸和don老师的热情帮助！

don老师的代码在项目中通过，没有出错的提示，但出现一个问题：

月均人数、人均加工费和环比列数据类型均为整数，如何调整为双精度小数。

对两位老师的帮助再次感谢！！

谢谢狐爸老师的再次帮助，已经解决了2列的双精度问题，还有一列（月均人数）设想将数据源表的投工列数据类型改成双精度，不知是否可行？再次谢谢狐爸和don两位老师。

在各位老师的热情帮助下，该问题得到完美解决，再次感谢！！