有一张表中，2个字段：生成日期，完成日期

如何求完成日期和生成日期之间的平均值？
要求计算工作日的平均值，即 不包括周六和周日


最好还能去掉黄金周


多谢！！！

你要的平均值是个数值还是个日期？
对于你说的去掉周末和节假日最好再维护一张表，把周末和节假日去掉

如：
生成日期 20091008
完成日期 20091013

他的时效就是3天 因为去掉了周末

大虾请说的具体点
我是新手

多谢！

给你段代码参考：
Private Sub Command1_Click()
hj = 0
rs.Open "select 生成日期, 完成日期  from 表1", cn, adOpenKeyset, adLockOptimistic
If rs.BOF = False And rs.EOF = False Then
   rs.MoveFirst
   Do While rs.EOF = False
      n = DateDiff("d", rs.Fields("生成日期"), rs.Fields("完成日期"))
      d = n
      For i = 0 To n - 1
          If Weekday(rs.Fields("生成日期") + i, vbMonday) = 6 Then d = d - 1
          If Weekday(rs.Fields("生成日期") + i, vbMonday) = 7 Then d = d - 1
          If Month(rs.Fields("生成日期") + i) = 1 And Day(rs.Fields("生成日期") + i) < 4 And Weekday(rs.Fields("生成日期") + i, vbMonday) <> 6 And Weekday(rs.Fields("生成日期") + i, vbMonday) <> 7 Then d = d - 1  '五一
          If Month(rs.Fields("生成日期") + i) = 5 And Day(rs.Fields("生成日期") + i) < 4 And Weekday(rs.Fields("生成日期") + i, vbMonday) <> 6 And Weekday(rs.Fields("生成日期") + i, vbMonday) <> 7 Then d = d - 1  '十月一
          '各种假日根据实际自己加入吧
      Next
      hj = hj + d
      rs.MoveNext
   Loop
   pj = hj / rs.RecordCount
   Text1.Text = pj
End If
rs.Close
End Sub

你先等等，我明天到公司找一张维护好的节假日表给你，然后再写个sql给你

我先给你发一张我们维护好的表，现只给你提供2008年后的数据，第一个字段代表星期，第二个1代表休息日2代表工作日，第三个字段代表时间
把这个表和你的表关联一下，相信你也会写sql了