- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]复制 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=188942)
-- 发布时间：2023/11/1 12:37:00
-- [求助]复制
老师好，谢谢老师！
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:复制.table |
此主题相关图片如下：2023-11-01 12 11 42.png
-- 发布时间：2023/11/1 13:36:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:复制.zip |
-- 发布时间：2023/11/2 7:45:00
--
老师好，非常感谢！
-- 发布时间：2023/11/2 8:14:00
--
老师好
此主题相关图片如下：2023-11-02 07 58 22.png
[此贴子已经被作者于2023/11/2 8:16:09编辑过]
-- 发布时间：2023/11/2 9:15:00
--
直接调换一下列名不就行了
-- 发布时间：2023/11/2 12:47:00
--
老师，燃气表的计算是倒过来的，我买1000立方在燃气表上显示1000立方每天用掉的是减法。
下面是电和水的计算方式
dr("消耗_数量") = dr("读数水电_本期")- dr("读数水电_上期")
燃气的计算方式
dr("消耗燃气_数量") = dr("读数燃气_上期")- dr("读数燃气_本期")
-- 发布时间：2023/11/2 13:31:00
--
就是调换一下列名啊，判断一个项目如果是燃气就倒过来减，否则就正着减
-- 发布时间：2023/11/2 13:44:00
--
老师，搞不好啊，谢谢老师。
[此贴子已经被作者于2023/11/2 13:46:56编辑过]
-- 发布时间：2023/11/2 14:00:00
--
请上传实例说明
-- 发布时间：2023/11/2 14:43:00
--
老师好，
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:复制.table |
Dim dr1 As DataRow = e.DataRow
Select Case e.DataCol.Name
Case "本期", "上期"
If dr1.IsNull("上期") OrElse dr1.IsNull("本期") Then \'如果数量或单价为空
dr1("消耗") = Nothing
Else
dr1("消耗") = dr1("本期") - dr1("上期") ‘自来水、电的计算
dr1("消耗") = dr1("上期") - dr1("本期") ‘燃气的计算
End If
End Select