按日期划分的多个ID的平均值表

Question

我有一张桌子上装满了各自具有唯一ItemID的项目。还有另一张表格，每个月对这些项目进行一次测试（有些可能每个月会有多个测试，有些可能没有几个月），每个测试项目的完整日期为mm/dd/yyyy。我想按月显示所有数据的其中一个字段的平均值。因此，假如什么，我平均是物品的重量，我想结束了像这样的表：

Date AvgOfWeight 
1/09 24.55 
2/09 28.64 
3/09 22.39 

等等...

我知道我可以做一个查询做平均值和我可以按照某些标准对平均值进行分组，但是有没有简单的方法可以按月分组日期？

Answer 1

我爱这里可以使用这种方式这strzero功能：

m_monthYear = strZero(year(date()),4) & "-" & strZero(month(date()),2) 

结果看起来像2009-09可以责令上升，因为他们与当年开始。你只需要创建这个strZero函数如下：

Public function strZero(x_myLong as long, x_length as integer) as string 
Dim m_strZero as string 

m_strZero = trim(str(x_myLong)) 
do while len(m_strZero) <= x_length 
    m_strZero = "0" & m_strZero 
loop 
strZero = m_strZero 
end function 

这是写在飞。请检查str的所有参数（如果有），添加错误管理并适应您自己的需求。例如，您可能希望将x_myLong作为变体传递，以返回“0000”字符串。将数字转换为固定长度字符串时，此函数具有多种其他用途。