Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
楼上文件不能下载!
下载信息 [文件大小: 下载次数: ] | |
![]() |
下载信息 [文件大小: 下载次数: ] | |
![]() |
按照你设计的代码,我增加了城建税、教育费附加、地方教育费附加、防洪保安费、印花税的计算。但没有计算不知为什么?使用狐表我是菜鸟,请你帮忙。
If e.DataCol.name = "序号"
If e.DataRow("序号") IsNot Nothing
e.DataRow("企业所得税") = DataTables("已交税金明细").Compute("Sum(金额)", "工程名称 = '" & e.DataRow("工程名称") & "' and 税种 = '企业所得税'")
e.DataRow("营业税") = DataTables("已交税金明细").Compute("Sum(金额)", "工程名称 = '" & e.DataRow("工程名称") & "' and 税种 = '营业税'")
e.DataRow("城建税") = DataTables("已交税金明细").Compute("Sum(金额)", "工程名称 = '" & e.DataRow("工程名称") & "' and 税种 = '城建税'")
e.DataRow("教育费附加") = DataTables("已交税金明细").Compute("Sum(金额)", "工程名称 = '" & e.DataRow("工程名称") & "' and 税种 = '教育费附加'")
e.DataRow("地方教育费附加") = DataTables("已交税金明细").Compute("Sum(金额)", "工程名称 = '" & e.DataRow("工程名称") & "' and 税种 = '地方教育费附加'")
e.DataRow("防洪保安费") = DataTables("已交税金明细").Compute("Sum(金额)", "工程名称 = '" & e.DataRow("工程名称") & "' and 税种 = '防洪保安费'")
e.DataRow("印花税") = DataTables("已交税金明细").Compute("Sum(金额)", "工程名称 = '" & e.DataRow("工程名称") & "' and 税种 = '印花税'")
End If
End If
呵呵,你是根据序号触发的,你重置序号列,单击菜单中的重置按钮,即可得到新的统计结果。
建议:
1、不应该用序号,应该根据工程名称判断
2、建议看看:
http://help.foxtable.com/topics/1454.htm
http://help.foxtable.com/topics/1472.htm
当然,开发指南中关于foxtable编程这一部分,整体应该多看几次,这是重点。