Bagikan melalui


DateAndTime.DatePart Metode

Definisi

Mengembalikan nilai bilangan bulat yang berisi komponen yang ditentukan dari nilai Date tertentu.

Overload

DatePart(DateInterval, DateTime, FirstDayOfWeek, FirstWeekOfYear)

Mengembalikan nilai bilangan bulat yang berisi komponen yang ditentukan dari nilai Date tertentu.

DatePart(String, Object, FirstDayOfWeek, FirstWeekOfYear)

Mengembalikan nilai yang berisi komponen yang ditentukan dari nilai Date tertentu.

DatePart(DateInterval, DateTime, FirstDayOfWeek, FirstWeekOfYear)

Sumber:
DateAndTime.vb
Sumber:
DateAndTime.vb
Sumber:
DateAndTime.vb

Mengembalikan nilai bilangan bulat yang berisi komponen yang ditentukan dari nilai Date tertentu.

public static int DatePart (Microsoft.VisualBasic.DateInterval Interval, DateTime DateValue, Microsoft.VisualBasic.FirstDayOfWeek FirstDayOfWeekValue = Microsoft.VisualBasic.FirstDayOfWeek.Sunday, Microsoft.VisualBasic.FirstWeekOfYear FirstWeekOfYearValue = Microsoft.VisualBasic.FirstWeekOfYear.Jan1);
static member DatePart : Microsoft.VisualBasic.DateInterval * DateTime * Microsoft.VisualBasic.FirstDayOfWeek * Microsoft.VisualBasic.FirstWeekOfYear -> int
Public Function DatePart (Interval As DateInterval, DateValue As DateTime, Optional FirstDayOfWeekValue As FirstDayOfWeek = Microsoft.VisualBasic.FirstDayOfWeek.Sunday, Optional FirstWeekOfYearValue As FirstWeekOfYear = Microsoft.VisualBasic.FirstWeekOfYear.Jan1) As Integer

Parameter

Interval
DateInterval

Diperlukan. Nilai enumerasi DateInterval atau ekspresi string yang mewakili bagian dari nilai tanggal/waktu yang ingin Anda kembalikan.

DateValue
DateTime

Diperlukan. Nilai Date yang ingin Anda evaluasi.

FirstDayOfWeekValue
FirstDayOfWeek

Fakultatif. Nilai yang dipilih dari enumerasi FirstDayOfWeek yang menentukan hari pertama dalam seminggu. Jika tidak ditentukan, Sunday digunakan.

FirstWeekOfYearValue
FirstWeekOfYear

Fakultatif. Nilai yang dipilih dari enumerasi FirstWeekOfYear yang menentukan minggu pertama dalam setahun. Jika tidak ditentukan, Jan1 digunakan.

Mengembalikan

Nilai bilangan bulat yang berisi komponen yang ditentukan dari nilai Date tertentu.

Pengecualian

Interval tidak valid.

DateValue tidak dapat dipaksa untuk Date.

Contoh

Contoh ini mengambil tanggal dan, menggunakan fungsi DatePart, menampilkan seperempat tahun di mana itu terjadi.

Dim DateString, Msg As String
Dim ActualDate As Date
' Enter February 12, 2008, or 2/12/2008.
DateString = InputBox("Enter a date:")
ActualDate = CDate(DateString)

' The first two examples use enumeration values for the interval.
Msg = "Quarter: " & DatePart(DateInterval.Quarter, ActualDate)
' The quarter is 1.
MsgBox(Msg)
Msg = "The day of the month: " & DatePart(DateInterval.Day, ActualDate)
' The day of the month is 12.
MsgBox(Msg)

' The next two examples use string values for the interval parameter.
Msg = "The week of the year: " & DatePart("ww", ActualDate)
' The week of the year is 7.
MsgBox(Msg)
Msg = "The day of the week: " & DatePart("w", ActualDate)
' The day of the week is 3 (Tuesday).
MsgBox(Msg)

Keterangan

Anda dapat menggunakan fungsi DatePart untuk mengevaluasi nilai tanggal/waktu dan mengembalikan komponen tertentu. Misalnya, Anda dapat menggunakan DatePart untuk menghitung hari dalam seminggu atau jam saat ini.

Jika Anda memilih DateInterval.Weekday untuk argumen Interval, nilai yang dikembalikan konsisten dengan nilai enumerasi FirstDayOfWeek. Jika Anda memilih DateInterval.WeekOfYear, DatePart menggunakan kelas Calendar dan CultureInfo namespace System.Globalization untuk menentukan pengaturan Anda saat ini.

Argumen FirstDayOfWeekValue memengaruhi perhitungan yang menggunakan pengaturan DateInterval.Weekday dan DateInterval.WeekOfYearInterval. Argumen FirstWeekOfYearValue memengaruhi perhitungan yang menentukan DateInterval.WeekOfYear untuk Interval.

Karena setiap nilai Date didukung oleh struktur DateTime, metodenya memberi Anda opsi tambahan dalam mengambil bagian tanggal/waktu. Misalnya, Anda dapat memperoleh seluruh nilai tanggal variabel Date, dengan nilai waktu yang diatur ke tengah malam, sebagai berikut:

Dim CurrDatTim As Date = Now   ' Current date and time.  
Dim LastMidnight As Date = CurrDatTim.Date   ' At midnight.  

Argumen Interval dapat memiliki salah satu pengaturan berikut.

Nilai enumerasi Tali Bagian dari nilai tanggal/waktu yang akan dikembalikan
DateInterval.Day d Hari dalam sebulan (1 hingga 31)
DateInterval.DayOfYear y Hari dalam setahun (1 hingga 366)
DateInterval.Hour h Jam
DateInterval.Minute n Menit
DateInterval.Month m Bulan
DateInterval.Quarter q Kuartal
DateInterval.Second s Kedua
DateInterval.Weekday w Hari dalam seminggu (1 hingga 7)
DateInterval.WeekOfYear Ww Minggu dalam setahun (1 hingga 53)
DateInterval.Year yyyy Tahun

Argumen FirstDayOfWeekValue dapat memiliki salah satu pengaturan berikut.

Nilai enumerasi Nilai Deskripsi
FirstDayOfWeek.System 0 Hari pertama dalam minggu yang ditentukan dalam pengaturan sistem
FirstDayOfWeek.Sunday 1 Minggu (default)
FirstDayOfWeek.Monday 2 Senin (sesuai dengan standar ISO 8601, bagian 3.17)
FirstDayOfWeek.Tuesday 3 Selasa
FirstDayOfWeek.Wednesday 4 Rabu
FirstDayOfWeek.Thursday 5 Kamis
FirstDayOfWeek.Friday 6 Jumat
FirstDayOfWeek.Saturday 7 Sabtu

Argumen FirstWeekOfYearValue dapat memiliki salah satu pengaturan berikut.

Nilai enumerasi Nilai Deskripsi
FirstWeekOfYear.System 0 Minggu pertama tahun yang ditentukan dalam pengaturan sistem
FirstWeekOfYear.Jan1 1 Minggu di mana 1 Januari terjadi (default)
FirstWeekOfYear.FirstFourDays 2 Minggu yang memiliki setidaknya empat hari di tahun baru (sesuai dengan standar ISO 8601, bagian 3.17)
FirstWeekOfYear.FirstFullWeek 3 Minggu penuh pertama di tahun baru

Lihat juga

Berlaku untuk

DatePart(String, Object, FirstDayOfWeek, FirstWeekOfYear)

Sumber:
DateAndTime.vb
Sumber:
DateAndTime.vb
Sumber:
DateAndTime.vb

Mengembalikan nilai yang berisi komponen yang ditentukan dari nilai Date tertentu.

public static int DatePart (string Interval, object? DateValue, Microsoft.VisualBasic.FirstDayOfWeek DayOfWeek = Microsoft.VisualBasic.FirstDayOfWeek.Sunday, Microsoft.VisualBasic.FirstWeekOfYear WeekOfYear = Microsoft.VisualBasic.FirstWeekOfYear.Jan1);
public static int DatePart (string Interval, object DateValue, Microsoft.VisualBasic.FirstDayOfWeek DayOfWeek = Microsoft.VisualBasic.FirstDayOfWeek.Sunday, Microsoft.VisualBasic.FirstWeekOfYear WeekOfYear = Microsoft.VisualBasic.FirstWeekOfYear.Jan1);
static member DatePart : string * obj * Microsoft.VisualBasic.FirstDayOfWeek * Microsoft.VisualBasic.FirstWeekOfYear -> int
Public Function DatePart (Interval As String, DateValue As Object, Optional DayOfWeek As FirstDayOfWeek = Microsoft.VisualBasic.FirstDayOfWeek.Sunday, Optional WeekOfYear As FirstWeekOfYear = Microsoft.VisualBasic.FirstWeekOfYear.Jan1) As Integer

Parameter

Interval
String

Diperlukan. Nilai enumerasi DateInterval atau ekspresi string yang mewakili bagian dari nilai tanggal/waktu yang ingin Anda kembalikan.

DateValue
Object

Diperlukan. Nilai Date yang ingin Anda evaluasi.

DayOfWeek
FirstDayOfWeek

Fakultatif. Nilai yang dipilih dari enumerasi FirstDayOfWeek yang menentukan hari pertama dalam seminggu. Jika tidak ditentukan, Sunday digunakan.

WeekOfYear
FirstWeekOfYear

Fakultatif. Nilai yang dipilih dari enumerasi FirstWeekOfYear yang menentukan minggu pertama dalam setahun. Jika tidak ditentukan, Jan1 digunakan.

Mengembalikan

Nilai bilangan bulat yang berisi komponen yang ditentukan dari nilai Date tertentu.

Pengecualian

Interval tidak valid.

DateValue tidak dapat dipaksa untuk Date.

Contoh

Contoh ini mengambil tanggal dan, menggunakan fungsi DatePart, menampilkan seperempat tahun di mana itu terjadi.

Dim DateString, Msg As String
Dim ActualDate As Date
' Enter February 12, 2008, or 2/12/2008.
DateString = InputBox("Enter a date:")
ActualDate = CDate(DateString)

' The first two examples use enumeration values for the interval.
Msg = "Quarter: " & DatePart(DateInterval.Quarter, ActualDate)
' The quarter is 1.
MsgBox(Msg)
Msg = "The day of the month: " & DatePart(DateInterval.Day, ActualDate)
' The day of the month is 12.
MsgBox(Msg)

' The next two examples use string values for the interval parameter.
Msg = "The week of the year: " & DatePart("ww", ActualDate)
' The week of the year is 7.
MsgBox(Msg)
Msg = "The day of the week: " & DatePart("w", ActualDate)
' The day of the week is 3 (Tuesday).
MsgBox(Msg)

Keterangan

Anda dapat menggunakan fungsi DatePart untuk mengevaluasi nilai tanggal/waktu dan mengembalikan komponen tertentu. Misalnya, Anda dapat menggunakan DatePart untuk menghitung hari dalam seminggu atau jam saat ini.

Jika Anda memilih DateInterval.Weekday untuk argumen Interval, nilai yang dikembalikan konsisten dengan nilai enumerasi FirstDayOfWeek. Jika Anda memilih DateInterval.WeekOfYear, DatePart menggunakan kelas Calendar dan CultureInfo namespace System.Globalization untuk menentukan pengaturan Anda saat ini.

Argumen FirstDayOfWeekValue memengaruhi perhitungan yang menggunakan pengaturan DateInterval.Weekday dan DateInterval.WeekOfYearInterval. Argumen FirstWeekOfYearValue memengaruhi perhitungan yang menentukan DateInterval.WeekOfYear untuk Interval.

Karena setiap nilai Date didukung oleh struktur DateTime, metodenya memberi Anda opsi tambahan dalam mengambil bagian tanggal/waktu. Misalnya, Anda dapat memperoleh seluruh nilai tanggal variabel Date, dengan nilai waktu yang diatur ke tengah malam, sebagai berikut:

Dim CurrDatTim As Date = Now   ' Current date and time.  
Dim LastMidnight As Date = CurrDatTim.Date   ' At midnight.  

Argumen Interval dapat memiliki salah satu pengaturan berikut.

Nilai enumerasi Tali Bagian dari nilai tanggal/waktu yang akan dikembalikan
DateInterval.Day d Hari dalam sebulan (1 hingga 31)
DateInterval.DayOfYear y Hari dalam setahun (1 hingga 366)
DateInterval.Hour h Jam
DateInterval.Minute n Menit
DateInterval.Month m Bulan
DateInterval.Quarter q Kuartal
DateInterval.Second s Kedua
DateInterval.Weekday w Hari dalam seminggu (1 hingga 7)
DateInterval.WeekOfYear Ww Minggu dalam setahun (1 hingga 53)
DateInterval.Year yyyy Tahun

Argumen FirstDayOfWeekValue dapat memiliki salah satu pengaturan berikut.

Nilai enumerasi Nilai Deskripsi
FirstDayOfWeek.System 0 Hari pertama dalam minggu yang ditentukan dalam pengaturan sistem
FirstDayOfWeek.Sunday 1 Minggu (default)
FirstDayOfWeek.Monday 2 Senin (sesuai dengan standar ISO 8601, bagian 3.17)
FirstDayOfWeek.Tuesday 3 Selasa
FirstDayOfWeek.Wednesday 4 Rabu
FirstDayOfWeek.Thursday 5 Kamis
FirstDayOfWeek.Friday 6 Jumat
FirstDayOfWeek.Saturday 7 Sabtu

Argumen FirstWeekOfYearValue dapat memiliki salah satu pengaturan berikut.

Nilai enumerasi Nilai Deskripsi
FirstWeekOfYear.System 0 Minggu pertama tahun yang ditentukan dalam pengaturan sistem
FirstWeekOfYear.Jan1 1 Minggu di mana 1 Januari terjadi (default)
FirstWeekOfYear.FirstFourDays 2 Minggu yang memiliki setidaknya empat hari di tahun baru (sesuai dengan standar ISO 8601, bagian 3.17)
FirstWeekOfYear.FirstFullWeek 3 Minggu penuh pertama di tahun baru

Lihat juga

Berlaku untuk