In diesem Beispiel wird die Hour-Funktion verwendet, um die Stunde aus einer Zeitangabe zu ermitteln. In der Entwicklungsumgebung wird das Zeitliteral im kurzen Zeitformat unter Verwendung der Gebietsschemaeinstellungen für Ihren Code angezeigt.
Dim Zeit1, Stunde1 Zeit1 = #4:35:17 PM# ' Zeitangabe zuweisen. Stunde1 = Hour(Zeit1) ' Stunde1 enthält 16.