请高手帮忙 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 请高手帮忙

共有4562人关注过本帖树形打印复制链接主题：请高手帮忙

don

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：八尾狐帖子：1812 积分：12993 威望：0 精华：14 注册：2008/10/11 18:07:00

Post By：2013/5/17 14:26:00 [显示全部帖子]

Dim YM,SQL As String

YM = "2013-04" '自定义月份

SQL ="Select a.教工编号, a.教工姓名,'" & YM & "' As 月份,基本工资,奖励工资,(iif(奖励工资 Is null,0,奖励工资)+基本工资) As 实领工资"

SQL+ =" From{教工标准工资} a Left join (Select * From{教工奖励工资} where 月份 = '" & YM & "') b On a.教工编号 = b.教工编号"

DataTables("教工奖励工资").Save

DataTables("教工工资").FIll(SQL,"",True)

MainTable = Tables("教工工资")

主题：请高手帮忙