Kazalo
Ta vadnica bo pokazala, kako uporabiti funkcijo Format VBA za oblikovanje časa.
Oblika funkcije in časa
Čas oblike zapisa VBA z vnaprej določenimi oblikami
Funkcijo VBA Format lahko uporabite za pretvorbo števila v niz z vnaprej določeno obliko. Razpoložljive oblike za čas so dolgotrajne, srednjeročne in kratke.
1234567891011121314 | PodoblikTimeExample_1 ()Zatemni DateEx kot datumDatumEx = #18.4.2020 18:05:07 #Format MsgBox (DateEx, "Dolgo časa") "Rezultat je: 18:05:07 PMMsgBox Format (DateEx, "Medium Time") 'Rezultat je: 18:05MsgBox Format (DateEx, "Short Time") 'Rezultat je: 18:05DatumEx = #2/18/2021 6:05:07 AM #Format MsgBox (DateEx, "Dolgo časa") "Rezultat je: 06:05:07 AMFormat MsgBox (DateEx, "Srednji čas") "Rezultat je: 06:05 AMMsgBox Format (DateEx, "Short Time") 'Rezultat je: 06:05End Sub |
Čas oblike zapisa VBA z oblikami po meri
Funkcijo VBA Format lahko uporabite za pretvorbo števila v niz z oblikami po meri. Simbola h in hh se uporabljata za ure, n in nn za minute, s in ss za sekunde, ttttt za polni delovni čas glede na nastavitve sistema in AM/PM, am/pm, A/P, a/p, AMPM za am -pm sistem.
1234567891011121314151617 | PodoblikTimeExample_2 ()Zatemni DateEx kot datumDatumEx = #18.4.2020 18:05:07 #Format MsgBox (DateEx, "hh: nn: ss") 'Rezultat je: 18:05:07Format sporočila (DateEx, "h: n: s AM/PM") "Rezultat je: 6: 5: 7 PMMsgBox Format (DateEx, "h") 'Rezultat je: 18MsgBox Format (DateEx, "hh") 'Rezultat je: 18MsgBox Format (DateEx, "h: n") 'Rezultat je: 18: 5MsgBox Format (DateEx, "hh: nn") 'Rezultat je: 18:05MsgBox Format (DateEx, "hh: nn: s") 'Rezultat je: 18: 05: 7Format MsgBox (DateEx, "hh: nn: ss") 'Rezultat je: 18:05:07Format MsgBox (DateEx, "\ T \ i \ m \ e \ \ i \ s \: \ hh: nn: ss")"Rezultat je: Čas je: 18:05:07End Sub |