ACCESS計算

在ACCESS中計算兩個日期間的工作天數(shù)

　雖然看起來是一個小問題，但很不幸的是在Access中沒有直接的函數(shù)支持（Excel中有一個現(xiàn)成的函數(shù)：NETWeekdays)，

ACCESS計算

。所以非得自己做點開發(fā)
　　第一步：創(chuàng)建一個自定義的函數(shù)
　　Public　Function　WeekDayCount(firstDate　As　Date,　LastDate　As　Date)　As　Integer
　　'計算工作日天數(shù)
　　On　Error　GoTo　Err:
　　Dim　i　As　Integer
　　Dim　TempDate　As　Date　　　　'臨時日期
　　Dim　Tempts　As　Long
　　Tempts　=　DateDiff("d",　firstDate,　LastDate)
　　For　i　=　0　To　Tempts
　　TempDate　=　DateAdd("d",　i,　firstDate)
　　Select　Case　Format(TempDate,　"w")
　　Case　2,　3,　4,　5,　6
　　WeekDayCount　=　WeekDayCount　+　1
　　End　Select
　　Next
　　Err:
　　Exit　Function
　　End　Function來源：考試大的美女編輯們
　　第二步：然后在查詢中使用如下語句
　　SELECT WeekDayCount(開始日期,結(jié)束日期) AS 工作日天數(shù), *
　　FROM orders;

【ACCESS計算】相關(guān)文章：

怎樣增強Access文件的安全性07-05

病假工資如何計算07-03

加班工資怎樣計算10-29

房產(chǎn)契稅如何計算?10-13

延遲退休方案計算表09-27

印花稅怎么計算10-25

違約金的計算標(biāo)準(zhǔn)04-08

汽車購置稅計算11-01

退休年齡如何計算10-06

員工的工齡工資計算標(biāo)準(zhǔn)07-03