ظڵָ֡

DatePart(interval, date[, firstdayofweek[, firstweekofyear]])
Arguments
interval 
ѡַʽʾҪصʱйֵġá֡ 
Date 
ѡҪڱʽ 
firstdayof week 
ѡָеĵһĳûָĬΪաйֵġá֡ 
Firstweekofyear 
ѡָһеһܵĳûָĬΪ 1  1 ڵڡйֵġá֡ 

interval ֵ

  
yyyy  
q  
m  
y һ 
d  
w һܵ 
ww  
h Сʱ 
n  
s  

firstdayofweek ֵ

 ֵ  
vbUseSystemDayOfWeek 0 ʹ֧ (NLS) API á 
vbSunday 1 գĬϣ 
vbMonday 2 һ 
vbTuesday 3 ڶ 
vbWednesday 4  
vbThursday 5  
vbFriday 6  
vbSaturday 7  

firstweekofyear ֵ

 ֵ  
vbUseSystem 0 ʹ֧ (NLS) API á 
vbFirstJan1 1  1  1 ڵڿʼĬϣ 
vbFirstFourDays 2 ĵһܿʼ 
vbFirstFullWeek 3 µһеһܣȣʼ 

˵
DatePart ڼڲָʱʹ DatePart ĳһڼǰʱ䡣

firstdayofweek Ӱʹáw͡wwŵļ㡣

 date ָ֣ȻΪڵĹ̶֡ date  (" ") Уʡݣڴÿμ date ʽʱ뵱ǰݡͿԱдڲͬݵĳ롣.

ʾ DatePart ڲʾڵļڡ

Function GetQuarter(TheDate) 
   GetQuarter = DatePart("q", TheDate)
End Function
