Fungsi DatePart
Fungsi DatePart mengembalikan bagian tertentu dari tanggal.
DatePart (interval As String, date As Date [, firstDayOfWeek As Integer [, firstWeekOfYear As Integer]]) As Long
Nilai hasil:
The extracted part for the given date.
 interval - A string expression from the following table, specifying the date interval.
  
    | interval (string value) | Penjelasan | 
  
    | yyyy | Tahun | 
  
    | q | Kuartal | 
  
    | m | Bulan | 
  
    | y | Hari dalam Tahun | 
  
    | w | Hari kerja | 
  
    | ww | Pekan dalam tahun | 
  
    | d | Hari | 
  
    | h | Jam | 
  
    | n | Menit | 
  
    | s | Detik | 
 
 date - The date from which the result is calculated.
Literal tanggal memungkinkan untuk menentukan variabel tanggal yang tidak ambigu yang independen dari bahasa saat ini. Literal diapit diantara tanda hash #. Format yang mungkin adalah:
    - 
        #yyyy-mm-dd# 
- 
        #mm/dd/yyyy# 
 
 firstdayofweek: An optional parameter that specifies the starting day of a week.
  
    | firstdayofweek value | Penjelasan | 
  
    | 0 | Gunakan nilai standar sistem | 
  
    | 1 | Minggu (utama) | 
  
    | 2 | Senin | 
  
    | 3 | Selasa | 
  
    | 4 | Rabu | 
  
    | 5 | Kamis | 
  
    | 6 | Jumat | 
  
    | 7 | Sabtu | 
 firstweekofyear: An optional parameter that specifies the starting week of a year.
  
    | firstweekofyear value | Penjelasan | 
  
    | 0 | Gunakan nilai standar sistem | 
  
    | 1 | Pekan 1 adalah pekan dengan Bulan Januari, 1 (default) | 
  
    | 2 | Pekan 1 adalah pekan pertama yang mengandung empat hari atau lebih tahun itu | 
  
    | 3 | Pekan 1 adalah pekan pertama yang hanya berisi hari-hari tahun baru | 
 
Sub example_datepart
    MsgBox DatePart("ww", #01/02/2005#) ' displays 2 because weeks start on Sunday
    MsgBox DatePart("ww", #12/31/2005#) ' displays 53
    MsgBox DatePart(date:=#2005-12-30#, interval:="q") ' displays 4
End Sub