Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共8 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:B表引用A表数据

1楼
13678391902 发表于:2024/4/8 11:21:00
老师请帮忙解决以下问题:
父表“区报表9”:岗位类别13:乡村公岗及城镇公岗位和补贴标准500和1970  (A表)
子表“区表统计8)要求结合“区报表9”:自动显示:①乡村(补贴)公岗标准500 ②城镇公岗(补贴)标准1970  (B表)
图片点击可在新窗口打开查看        图片点击可在新窗口打开查看
2楼
有点蓝 发表于:2024/4/8 11:37:00
参考:http://www.foxtable.com/webhelp/topics/1451.htm

如果看不懂请上传实例说明
3楼
13678391902 发表于:2024/4/10 15:20:00
If e.DataCol.Name = "手工录入_补贴申报年度" OrElse e.DataCol.Name = "手工录入_发放期次"Then 
    Dim Filter As String = "[手工录入_补贴申报年度2] = '" & e.DataRow("手工录入_补贴申报年度") & "' and [手工录入_发放期次24] = '" & e.DataRow("手工录入_发放期次") & "'"
    e.DataRow("关联表或公式自动生成_岗位补贴情况_乡村_金额") = DataTables("区报表9").Compute("Sum(公式重置列自动生成数据_申请金额_岗位补贴19)", Filter) 
End If

 请老师帮忙修改完善一下,谢谢。    要求: 一、A表(乡村金额)=B表 (年度2+发放期次24+岗位类别13  ) ;二:A表(城镇金额)=B表 (年度2+发放期次24+岗位类别13  )。  
       图片点击可在新窗口打开查看          图片点击可在新窗口打开查看
4楼
有点蓝 发表于:2024/4/10 15:41:00
A表datacolchanged事件

If e.DataCol.Name = "手工录入_补贴申报年度" OrElse e.DataCol.Name = "手工录入_发放期次"Then 
    Dim Filter As String = "[手工录入_补贴申报年度2] = '" & e.DataRow("手工录入_补贴申报年度") & "' and [手工录入_发放期次24] = '" & e.DataRow("手工录入_发放期次") & "'"
    e.DataRow("关联表或公式自动生成_岗位补贴情况_乡村_金额") = DataTables("区报表9").Compute("Sum(公式重置列自动生成数据_申请金额_岗位补贴19)", Filter & " and 岗位类别13='乡村公岗'") 
    e.DataRow("关联表或公式自动生成_岗位补贴情况_城镇_金额") = DataTables("区报表9").Compute("Sum(公式重置列自动生成数据_申请金额_岗位补贴19)", Filter & " and 岗位类别13='城镇公岗'") 
End If
5楼
13678391902 发表于:2024/4/11 9:48:00
可以了,太感谢您了。
6楼
13678391902 发表于:2024/6/5 17:26:00
If e.DataCol.Name = "手工录入_补贴申报年度" OrElse e.DataCol.Name = "手工录入_发放期次"Then 
    Dim Filter As String = "[手工录入_补贴申报年度2] = '" & e.DataRow("手工录入_补贴申报年度") & "' and [手工录入_发放期次24] = '" & e.DataRow("手工录入_发放期次") & "'"
    e.DataRow("关联表或公式自动生成_岗位补贴情况_乡村_金额") = DataTables("区报表9").Compute("Sum(公式重置列自动生成数据_申请金额_岗位补贴19)", Filter & " and 关联表自动生成数据_岗位类别13='乡村'") 
    e.DataRow("关联表或公式自动生成_岗位补贴情况_城镇_金额") = DataTables("区报表9").Compute("Sum(公式重置列自动生成数据_申请金额_岗位补贴19)", Filter & " and 关联表自动生成数据_岗位类别13='城镇'") 
    End If
请教师帮忙:第三行:绿色“城镇金额”按以上代码显示为空的情况下,如何能自动显示为“0”呢?谢谢
图片点击可在新窗口打开查看
7楼
有点蓝 发表于:2024/6/5 17:27:00
dim a as double =  DataTables("区报表9").Compute("Sum(公式重置列自动生成数据_申请金额_岗位补贴19)", Filter & " and 关联表自动生成数据_岗位类别13='乡村'") 
e.DataRow("关联表或公式自动生成_岗位补贴情况_乡村_金额") =a
8楼
13678391902 发表于:2024/6/5 17:54:00
可以了,谢谢老师。
共8 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .02344 s, 2 queries.