Indholdsfortegnelse
Denne vejledning viser, hvordan du bruger Format VBA -funktionen til at formatere tid.
Formater funktion og tid
VBA -formattid med foruddefinerede formater
Funktionen VBA Format kan bruges til at konvertere et tal til en streng med et foruddefineret format. De tilgængelige formater for tid er lang tid, mellemlang tid og kort tid.
1234567891011121314 | Sub FormatTimeExample_1 ()Dim DateEx As DateDateEx = #4/18/2020 18:05:07 PM #MsgBox Format (DateEx, "Long Time") 'Resultat er: 18:05:07 PMMsgBox Format (DateEx, "Medium Time") 'Resultat er: 18:05MsgBox Format (DateEx, "Short Time") 'Resultat er: 18:05DateEx = #2/18/2021 06:05:07 AM #MsgBox Format (DateEx, "Long Time") 'Resultat er: 6:05:07 AMMsgBox Format (DateEx, "Medium Time") 'Resultat er: 06:05MsgBox Format (DateEx, "Short Time") 'Resultat er: 06:05Afslut Sub |
VBA -formattid med tilpassede formater
Funktionen VBA Format kan bruges til at konvertere et tal til en streng med brugerdefinerede formater. Symbolerne h og hh bruges i timer, n og nn i minutter, s og ss i sekunder, ttttt på fuld tid i henhold til systemindstillinger og AM/PM, am/pm, A/P, a/p, AMPM for am -pm system.
1234567891011121314151617 | Sub FormatTimeExample_2 ()Dim DateEx As DateDateEx = #4/18/2020 18:05:07 PM #MsgBox Format (DateEx, "hh: nn: ss") 'Resultat er: 18:05:07MsgBox Format (DateEx, "h: n: s AM/PM") 'Resultat er: 18: 17: 19MsgBox Format (DateEx, "h") 'Resultat er: 18MsgBox Format (DateEx, "hh") 'Resultat er: 18MsgBox Format (DateEx, "h: n") 'Resultat er: 18: 5MsgBox Format (DateEx, "hh: nn") 'Resultat er: 18:05MsgBox Format (DateEx, "hh: nn: s") 'Resultat er: 18: 05: 7MsgBox Format (DateEx, "hh: nn: ss") 'Resultat er: 18:05:07MsgBox -format (DateEx, "\ T \ i \ m \ e \ \ i \ s \: \ hh: nn: ss")'Resultatet er: Klokken er: 18:05:07Afslut Sub |