In diesem Beispiel wird die TimeValue-Funktion verwendet, um eine Zeichenfolge in eine Uhrzeit umzuwandeln. Sie können auch Datumsliterale verwenden, um einer Variablen vom Typ Variant oder Date direkt eine Uhrzeit zuzuweisen, zum Beispiel Zeit1 = #4:35:17 PM#.
Dim Zeit1
Zeit1 = TimeValue("4:35:17 PM") ' Uhrzeit zurückgeben.