[浏览完整版]
标题：[求助]代码修改（已解决）
1楼
yyzlxc 发表于：2011/11/18 11:19:00一段代码，目的是在交叉统计表增加5列与分组对应的列，结果出错，应该如何修改代码，请各位老师帮助指教，谢谢！！
For Each r As Row In t.Rows
For k As Byte = 1 To i
t.DataTable.DataCols.Add("平均人数_" & k , Gettype(Double),"累计人数_" & k / s2)
Next
For j As Byte = 1 To i
If r("累计人数_" & j) <> 0 Then
r("人均报酬_" & j) = r("报酬合计_" & j)/r("平均人数_" & j)
End If
Next
Next
注：s2代表月份
出错提示：
此主题相关图片如下：a.png
[此贴子已经被作者于2011-11-18 15:48:56编辑过]
2楼
狐狸爸爸 发表于：2011/11/18 11:21:00messgebox.show( "累计人数_" & k / s2)
看看你合成的表达式到底是什么。
3楼
yyzlxc 发表于：2011/11/18 11:30:00谢谢狐爸老师的回复，但是代码加不进去。
此主题相关图片如下：c.png
4楼
yyzlxc 发表于：2011/11/18 11:34:00结果是：
此主题相关图片如下：d.png
5楼
yyzlxc 发表于：2011/11/18 11:38:00先除后赋值，肯定是错，如何先赋值后除，请狐爸老师指教，谢谢！！
6楼
狐狸爸爸 发表于：2011/11/18 11:38:00因为合成的表达式是： 累计人数_0.11111111111，所以出错。
因为s2等于0.1111111111，所以很成的表达式是：累计人数_0.11111111111。
因为什么，所以s2等于0.1111111111，这需要你自行分析处理。
7楼
yyzlxc 发表于：2011/11/18 12:29:00又是双引号单引号问题，参照[合计_累计人数]/"& s2，将表达式调整为""累计人数_" & k /"& s2，还是出错！！
此主题相关图片如下：e.png
8楼
czy 发表于：2011/11/18 12:36:00多了个引号
9楼
yyzlxc 发表于：2011/11/18 12:52:00谢谢czy老师的回复，应该如何改，请指教，谢谢！！
10楼
mr725 发表于：2011/11/18 13:07:00""累计人数_" & k /"& s2 ===>>> "累计人数_" & k & " / " & s2