Funzione DatePart (Visual Basic)

Articolo
09/12/2008

Aggiornamento: novembre 2007

Restituisce un valore Integer contenente la parte specificata di un valore Date.

Public Overloads Function DatePart( _
   ByVal Interval As DateInterval, _
   ByVal DateValue As DateTime, _
   Optional ByVal FirstDayOfWeekValue As FirstDayOfWeek = VbSunday, _
   Optional ByVal FirstWeekOfYearValue As FirstWeekOfYear = VbFirstJan1 _
) As Integer
' -or-
Public Overloads Function DatePart( _
    ByVal Interval As String, _
   ByVal DateValue As Object, _
   Optional ByVal DayOfWeek As FirstDayOfWeek = FirstDayOfWeek.Sunday, _
   Optional ByVal WeekOfYear As FirstWeekOfYear = FirstWeekOfYear.Jan1 _
) As Integer

Parametri

Interval
Obbligatorio. Valore di enumerazione DateInterval o espressione String che rappresenta la parte del valore di data/ora che deve essere restituita.
DateValue
Obbligatorio. Valore Date da valutare.
FirstDayOfWeekValue, DayOfWeek
Facoltativo. Valore scelto dall'enumerazione FirstDayOfWeek che specifica il primo giorno della settimana. Se non è specificato, viene utilizzato FirstDayOfWeek.Sunday.
FirstWeekOfYearValue, WeekOfYear
Facoltativo. Valore scelto dall'enumerazione FirstWeekOfYear che specifica la prima settimana dell'anno. Se non è specificato, viene utilizzato FirstWeekOfYear.Jan1.

Impostazioni

Di seguito sono indicate le possibili impostazioni dell'argomento Interval.

Valore di enumerazione	Stringa	Parte del valore data/ora da restituire
DateInterval.Day	d	Giorno del mese (da 1 a 31)
DateInterval.DayOfYear	y	Giorno dell'anno (da 1 a 366)
DateInterval.Hour	h	Ora
DateInterval.Minute	n	Minuto
DateInterval.Month	m	Mese
DateInterval.Quarter	q	Trimestre
DateInterval.Second	s	Secondo
DateInterval.Weekday	w	Giorno della settimana (da 1 a 7)
DateInterval.WeekOfYear	ww	Settimana dell'anno (da 1 a 53)
DateInterval.Year	yyyy	Anno

Di seguito sono indicate le possibili impostazioni dell'argomento FirstDayOfWeekValue.

Valore di enumerazione	Valore	Descrizione
FirstDayOfWeek.System	0	Primo giorno della settimana specificato nelle impostazioni di sistema
FirstDayOfWeek.Sunday	1	Domenica (impostazione predefinita)
FirstDayOfWeek.Monday	2	Lunedì (conforme allo standard ISO 8601, sezione 3.17)
FirstDayOfWeek.Tuesday	3	Martedì
FirstDayOfWeek.Wednesday	4	Mercoledì
FirstDayOfWeek.Thursday	5	Giovedì
FirstDayOfWeek.Friday	6	Venerdì
FirstDayOfWeek.Saturday	7	Sabato

Di seguito sono indicate le possibili impostazioni dell'argomento FirstWeekOfYearValue.

Valore di enumerazione	Valore	Descrizione
FirstWeekOfYear.System	0	Prima settimana dell'anno specificata nelle impostazioni di sistema
FirstWeekOfYear.Jan1	1	Settimana in cui cade l'1 gennaio (impostazione predefinita).
FirstWeekOfYear.FirstFourDays	2	Settimana in cui almeno quattro giorni cadono nel nuovo anno (conforme allo standard ISO 8601, sezione 3.17)
FirstWeekOfYear.FirstFullWeek	3	Prima settimana completa del nuovo anno

Eccezioni

Tipo di eccezione	Numero di errore	Condizione
ArgumentException	5	Interval non valido.
InvalidCastException	13	DateValue non può essere assegnato forzatamente a un valore Date.

Se si esegue l'aggiornamento delle applicazioni Visual Basic 6.0 che utilizzano la gestione degli errori non strutturata, vedere la colonna "Numero di errore". È possibile confrontare il numero di errore con la Proprietà Number (oggetto Err). Se possibile, tuttavia, si consiglia di sostituire il controllo dell'errore con la procedura illustrata nella sezione Cenni preliminari sulla gestione strutturata delle eccezioni per Visual Basic.

Note

È possibile utilizzare la funzione DatePart per valutare un valore di data/ora e restituire un determinato componente. È possibile, ad esempio, utilizzare DatePart per calcolare il giorno della settimana o l'ora corrente.

Se si sceglie DateInterval.Weekday per l'argomento Interval, il valore restituito è coerente con i valori dell'enumerazione FirstDayOfWeek. Se si sceglie DateInterval.WeekOfYear, DatePart utilizza le classi Calendar e CultureInfo dello spazio dei nomi System.Globalization per determinare le impostazioni correnti.

L'argomento FirstDayOfWeekValue ha effetto sui calcoli che utilizzano le impostazioni DateInterval.Weekday e DateInterval.WeekOfYear di Interval. L'argomento FirstWeekOfYearValue ha effetto sui calcoli che specificano DateInterval.WeekOfYear per Interval.

Poiché ogni valore Date è supportato da una struttura DateTime, i relativi metodi offrono ulteriori opzioni per il recupero di parti relative a data/ora. È ad esempio possibile ottenere l'intero valore di data di una variabile Date, con il valore orario impostato su mezzanotte, come nell'esempio che segue:

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

Esempio

Nell'esempio riportato di seguito viene specificata una data e, mediante la funzione DatePart, viene visualizzato il trimestre in cui è inclusa.

Dim FirstDate, Msg As String   'Declare variables.
Dim SecondDate As Date
FirstDate = InputBox("Enter a date:")
SecondDate = CDate(FirstDate)
Msg = "Quarter: " & DatePart(DateInterval.Quarter, SecondDate)
MsgBox(Msg)