Thời gian định dạng VBA

Hướng dẫn này sẽ trình bày cách sử dụng chức năng Định dạng VBA để định dạng thời gian.

Định dạng chức năng và thời gian

Thời gian định dạng VBA với các định dạng được xác định trước

Chức năng Định dạng VBA có thể được sử dụng để chuyển đổi một số thành một chuỗi với định dạng được xác định trước. Các định dạng có sẵn cho thời gian là thời gian dài, thời gian trung bình và thời gian ngắn.

1234567891011121314

Sub FormatTimeExample_1 ()Dim DateEx As DateDateEx = # 4/18/2020 6:05:07 PM #Định dạng MsgBox (DateEx, "Long Time") 'Kết quả là: 6:05:07 PMĐịnh dạng MsgBox (DateEx, "Thời gian trung bình") 'Kết quả là: 06:05 PMĐịnh dạng MsgBox (DateEx, "Thời gian ngắn") 'Kết quả là: 18:05DateEx = # 2/18/2021 6:05:07 AM #Định dạng MsgBox (DateEx, "Long Time") 'Kết quả là: 6:05:07 sángĐịnh dạng MsgBox (DateEx, "Thời gian trung bình") 'Kết quả là: 06:05 sángĐịnh dạng MsgBox (DateEx, "Thời gian ngắn") 'Kết quả là: 06:05Kết thúc Sub

Thời gian định dạng VBA với các định dạng tùy chỉnh

Chức năng Định dạng VBA có thể được sử dụng để chuyển đổi một số thành một chuỗi với các định dạng tùy chỉnh. Các ký hiệu h và hh được sử dụng cho giờ, n và nn cho phút, s và ss cho giây, ttttt cho toàn thời gian theo cài đặt hệ thống và AM / PM, am / pm, A / P, a / p, AMPM cho sáng -pm hệ thống.

1234567891011121314151617

Sub FormatTimeExample_2 ()Dim DateEx As DateDateEx = # 4/18/2020 6:05:07 PM #Định dạng MsgBox (DateEx, "hh: nn: ss") 'Kết quả là: 18:05:07Định dạng MsgBox (DateEx, "h: n: s AM / PM") Kết quả là: 6: 5: 7 CHĐịnh dạng MsgBox (DateEx, "h") 'Kết quả là: 18Định dạng MsgBox (DateEx, "hh") 'Kết quả là: 18Định dạng MsgBox (DateEx, "h: n") 'Kết quả là: 18: 5Định dạng MsgBox (DateEx, "hh: nn") 'Kết quả là: 18:05Định dạng MsgBox (DateEx, "hh: nn: s") 'Kết quả là: 18: 05: 7Định dạng MsgBox (DateEx, "hh: nn: ss") 'Kết quả là: 18:05:07Định dạng MsgBox (DateEx, "\ T \ i \ m \ e \ i \ s \: \ hh: nn: ss")'Kết quả là: Thời gian là: 18:05:07Kết thúc Sub