Rubrik: Datum/Zeit und Timer · Datums- und Zeit-Funktionen | VB-Versionen: VB2005, VB2008 | 27.10.08 |
Anzahl der Tage eines Monats / eines Jahres ermitteln Zwei Funktionen, mit denen sich die Anzahl der Tage eines bestimmten Monats und auch die Anzahl der Tage eines bestimmten Jahres ermitteln lassen. | ||
Autor: Dieter Otter | Bewertung: | Views: 19.849 |
www.tools4vb.de | System: Win2k, WinXP, Win7, Win8, Win10, Win11 | Beispielprojekt auf CD |
Nachfolgender Code zeigt, wie man die Anzahl der Tages eines bestimmten Monats ermitteln kann:
Dim iYear As Integer = 2008 Dim iMonth As Integer = 2 ' Anzahl der Tage im Februar 2008 Dim MaxDays As Integer = DateTime.DaysInMonth(iYear, iMonth)
Möchte man wissen, ob das Jahr 365 oder 366 Tage hat, kann man entweder prüfen, ob es sich um ein Schaltjahr handelt...
' Anzahl der Tage im Jahr Dim MaxDays As Integer = IIf(DateTime.IsLeapYear(iYear), 366, 365)
... oder die GetDaysInYear-Funktion des gregorianischen Kalenders verwenden:
Dim calendar As New System.Globalization.GregorianCalendar ' Anzahl der Tage im Jahr MayDays = calendar.GetDaysInYear(iYear)