mirage 发表于：2010-09-16 19:02:29
如表中，我想取1月，或者2月，或者1-3月的合计数，怎么建立查询？
点击下载此附件
Public Function MYDSum(tbname As String, Nfirst As Long, Nlast As Long, WH As String) As Single
'功能：字段间合计
'参数：tbname--表或查询名称
' Nfirst--开始计算的字段号（从0开始）
' Nlast---截止计算的字段号
' WH---计算的条件
'示例:select 工资ID,人员ID,月度,基本工资,绩效工资,奖金,MYDSum("工资表",3,5,"工资ID=" & [工资ID]) as 应发工资 from 工资表
Dim rs As New ADODB.Recordset
Dim ssql As String
Dim i As Long
rs.Open tbname, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
rs.Find WH
MYDSum = 0
For i = Nfirst To rs.Fields.Count - 1
MYDSum = MYDSum + nz(rs.Fields(i).Value)
Next
rs.Close
End Function
你可以参照一下本例，
点击下载此附件
SELECT Sum(Sheet1.[1月]) AS 1月之总计, Sum(Sheet1.[2月]) AS 2月之总计, Sum(Sheet1.[3月]) AS 3月之总计, Sum(Sheet1.[1月])+Sum(Sheet1.[2月])+Sum(Sheet1.[3月]) AS 合计
FROM Sheet1;
查询SQL视图中输入SQL语言就可以。
补上附件
不好意思，可能我的意思没表达清楚！
我是做其他的表，中间要用到这个表的某列或某几列合计的数据，我想要的目的是设一个参数，我只要选择参数，就能引用这个表某列或某几列合计的数据。谢谢！
如果你的参数是3，那么你想把前3列加一起还是想把后3列加一起？
总记录：8篇 页次：1/1 9 1 :
