Beispiel für eine Funktionssyntaxbeschreibung
Now Now() Ruft das aktuelle Datum und die aktuelle Uhrzeit des Systems ab. Dim MyVar MyVar = Now
'' MyVar enthält das aktuelle Datum und die aktuelle Uhrzeit.
Date Date() Ruft das aktuelle Datum des Systems ab. Dim MyDate MyDate = Date
'' MyDate enthält das aktuelle Systemdatum.
Time Time() ermittelt die aktuelle Systemzeit. Dim MyTime MyTime = Time
'' Gibt die aktuelle Systemzeit zurück.
Year Year(Date) Ruft das Jahr des angegebenen Datums ab. Dim MyDate, MyYear
MeinDatum = #19. Oktober 1962#
Beispiel für eine Funktionssyntaxbeschreibung
Now Now() Ruft das aktuelle Datum und die aktuelle Uhrzeit des Systems ab. Dim MyVar MyVar = Now
'' MyVar enthält das aktuelle Datum und die aktuelle Uhrzeit.
Date Date() Ruft das aktuelle Datum des Systems ab. Dim MyDate MyDate = Date
'' MyDate enthält das aktuelle Systemdatum.
Time Time() ermittelt die aktuelle Systemzeit. Dim MyTime MyTime = Time
'' Gibt die aktuelle Systemzeit zurück.
Year Year(Date) Ruft das Jahr des angegebenen Datums ab. Dim MyDate, MyYear
MeinDatum = #19. Oktober 1962#
„Vergeben Sie ein Datum.
MyYear = Year(MyDate)
'' MyYear enthält 1962.
Month Month(Date) Ruft den Monat des angegebenen Datums ab Dim MyVar MyVar = Month(Now)
'' MyVar enthält die Zahl, die dem aktuellen Monat entspricht.
Day Day(Date) Ermittelt das Datum des angegebenen Datums. Dim MyDay MyDay = Day("19. Oktober 1962")
''MyDay enthält 19.
Stunde Stunde(Zeit) Ruft die Stunde der angegebenen Zeit ab Dim MyTime, MyHour
MyTime = Now MyHour = Hour(MyTime)
'' MyHour enthält einen numerischen Wert, der die aktuelle Uhrzeit darstellt.
Minute Minute(time) Ermittelt die Minute der angegebenen Zeit Dim MyVar
MyVar = Minute(Jetzt)
Second Second(time) Ermitteln Sie die Anzahl der Sekunden, die die Wiedergabezeit beträgt. Dim MySec
MySec = Second(Jetzt)
''MySec enthält eine Zahl, die die aktuelle Sekunde darstellt.
WeekDay WeekDay(Date) Ruft die Ganzzahl des Wochentags für das angegebene Datum ab, 1 bedeutet Sonntag, 2 bedeutet Montag usw. Dim MyDate, MyWeekDay
MeinDatum = #19. Oktober 1962#
'' Zuweisungsdatum
MyWeekDay = Wochentag(MyDate)
„MyWeekDay enthält 6, MyDate steht für Freitag.“
DateDiff DateDiff("Var",Var1,Var2)
Var: Datums- oder Zeitintervallfaktor mit den folgenden Parametern:
jjjj Jahr m Monat d Tag ww Woche h Stunde s Sekunde Var1: das erste Datum oder die erste Uhrzeit
Var2: Das zweite Datum oder die zweite Uhrzeit, die nach Var1 liegt, berechnet das Intervall zwischen zwei Datums- oder Uhrzeitangaben. DateDiff("d",Date(),#1/1/2005#)
''Geben Sie an, wie viele Tage bis zum Neujahrstag 2005 verbleiben
DateDiff("h",Date(),#1/1/2005#)
''Geben Sie an, wie viele Stunden bis zum Neujahrstag 2005 verbleiben
DateDiff("d",#1/1/2003#,#1/1/2005#)
''Gibt die Anzahl der Tage zwischen zwei Daten zurück
DateAdd DateDiff("Var",Var1,Var2)
Var: Datums- oder Zeitintervallfaktor:
Var1: Vielfaches des Datums- oder Zeitintervalls
Var2: Datums- oder Zeitbasis. Das folgende Beispiel fügt einen Monat zum 31. Januar 1995 hinzu:
NewDate = DateAdd("m", 1, "31-Jan-95").
In diesem Beispiel gibt DateAdd den 28. Februar 1995 zurück, nicht den 31. Februar 1995. Wenn das Datum der 31. Januar 1996 ist, wird der 29. Februar 1996 zurückgegeben, da 1996 ein Schaltjahr ist.
Wenn das berechnete Datum vor 100 n. Chr. liegt, tritt ein Fehler auf.
FormatDateTime FormatDateTime(Date,vbShortDate) In kurzes Datumsformat konvertieren FromatDateTime(Date(),vbLongDate)
„Anzeige im langen Datumsformat
FormatDateTime(Date,vbLongDate) In langes Datumsformat konvertieren
FormatDateTime(Date,vbShortTime) In Kurzzeitformat konvertieren
FormatDateTime(Date,vbLongTime) In Langzeitformat konvertieren