Lang L: none (table-of-contents)
See õpetus näitab, kuidas kasutada aja vormindamiseks funktsiooni Vormindus.
Vormingu funktsioon ja aeg
VBA vorminguaeg eelnevalt määratletud vormingutega
Funktsiooni VBA Format saab kasutada numbri teisendamiseks eelnevalt määratletud vormingus stringiks. Aja jaoks saadaval olevad vormingud on pikad, keskmised ja lühikesed.
| 1234567891011121314 | AlamvormingTimeExample_1 ()Dim DateEx kui kuupäevDateEx = #4/18/2020 18:05:07 PM #MsgBox Format (DateEx, "Long Time") 'Tulemus on: 18:05:07 PMMsgBox Format (DateEx, "Keskmine aeg") 'Tulemus on: 18:05MsgBox Format (DateEx, "Short Time") 'Tulemus: 18:05DateEx = #2/18/2021 6:05:07 AM #MsgBox Format (DateEx, "Long Time") 'Tulemus on: 6:05:07 AMMsgBox Format (DateEx, "Keskmine aeg") 'Tulemus on: 06:05 AMMsgBox Format (DateEx, "Short Time") 'Tulemus on: 06:05End Sub |
VBA vormindusaeg kohandatud vormingutega
Funktsiooni VBA Format saab kasutada numbri teisendamiseks kohandatud vormingutega stringiks. Sümbolit h ja hh kasutatakse tundideks, n ja nn minutiks, s ja ss sekundiks, ttttt täistööajaks vastavalt süsteemi seadetele ja AM/PM, am/pm, A/P, a/p, AMPM -pm süsteem.
| 1234567891011121314151617 | AlamvormingTimeExample_2 ()Dim DateEx kui kuupäevDateEx = #4/18/2020 18:05:07 PM #MsgBoxi vorming (DateEx, "hh: nn: ss") 'Tulemus: 18:05:07MsgBoxi vorming (DateEx, "h: n: s AM/PM") 'Tulemus on: 6: 5: 7 PMMsgBoxi vorming (DateEx, "h") 'Tulemus: 18MsgBoxi vorming (DateEx, "hh") 'Tulemus: 18MsgBox Format (DateEx, "h: n") 'Tulemus: 18: 5MsgBoxi vorming (DateEx, "hh: nn") 'Tulemus: 18:05MsgBoxi vorming (DateEx, "hh: nn: s") 'Tulemus on: 18: 05: 7MsgBoxi vorming (DateEx, "hh: nn: ss") 'Tulemus: 18:05:07MsgBoxi vorming (DateEx, "\ T \ i \ m \ e \ \ i \ s \: \ hh: nn: ss")Tulemus on: aeg on: 18:05:07End Sub |
