以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 列计算代码,请求修改 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=124301) |
-- 作者:jamhuton -- 发布时间:2018/9/4 9:57:00 -- 列计算代码,请求修改 Select Case e.DataCol.name Case "月份", "天津水运", "荆州水运", "仓库业务" Dim s As String = e.DataRow("月份") If s = "月份" Then e.DataRow("水运") = e.DataRow("天津水运")) + e.DataRow("荆州水运") e.DataRow("货代") = e.DataRow("水运")) + e.DataRow("仓库业务") End If End Select
|
-- 作者:有点甜 -- 发布时间:2018/9/4 10:24:00 -- 你这段代码要实现什么?目前遇到什么?
Select Case e.DataCol.name
Case "月份", "天津水运", "荆州水运", "仓库业务"
Dim s As String = e.DataRow("月份")
If s = "月份" Then
e.DataRow("水运") = e.DataRow("天津水运") + e.DataRow("荆州水运")
e.DataRow("货代") = e.DataRow("水运") + e.DataRow("仓库业务")
End If
End Select
|
-- 作者:jamhuton -- 发布时间:2018/9/4 10:28:00 -- 我用表达式列情况下,会出现“只读”,所以我想找表达式列改成代码的方式。 |
-- 作者:有点甜 -- 发布时间:2018/9/4 10:32:00 -- 以下是引用jamhuton在2018/9/4 10:28:00的发言:
我用表达式列情况下,会出现“只读”,所以我想找表达式列改成代码的方式。
不要用表达式列,改成数据列
http://www.foxtable.com/webhelp/scr/2494.htm
然后,用2楼的代码测试 |
-- 作者:jamhuton -- 发布时间:2018/9/4 10:43:00 -- 用这个代码写在datacolchanged,没计算结果. 并且我重置“月份”列也没有反应。
[此贴子已经被作者于2018/9/4 10:44:38编辑过]
|
-- 作者:有点甜 -- 发布时间:2018/9/4 10:56:00 -- 以下是引用jamhuton在2018/9/4 10:43:00的发言:
用这个代码写在datacolchanged,没计算结果. 并且我重置“月份”列也没有反应。
[此贴子已经被作者于2018/9/4 10:44:38编辑过]
1、你本来的表达式是怎么写的?
2、msgbox(s)弹出什么?
3、做个实例发上来说明你要做什么功能。 |
-- 作者:jamhuton -- 发布时间:2018/9/4 11:03:00 -- ![]() ![]() |
-- 作者:有点甜 -- 发布时间:2018/9/4 11:12:00 -- 那试试改成
Select Case e.DataCol.name
Case "月份", "天津水运", "荆州水运", "仓库业务"
e.DataRow("水运") = e.DataRow("天津水运") + e.DataRow("荆州水运")
e.DataRow("货代") = e.DataRow("水运") + e.DataRow("仓库业务")
End Select
|
-- 作者:jamhuton -- 发布时间:2018/9/4 11:17:00 -- 这样可以,还有一个问题,就是零值的就不能计算的问题。 |
-- 作者:有点甜 -- 发布时间:2018/9/4 11:25:00 -- 以下是引用jamhuton在2018/9/4 11:17:00的发言:
这样可以,还有一个问题,就是零值的就不能计算的问题。
代码不存在这种问题。你现在代码遇到什么问题?输入什么得到什么错误结果?
|