✅ VBA Biçim Süresi

İçindekiler

Biçim İşlevi ve Zamanı

Bu öğretici, zamanı biçimlendirmek için Format VBA işlevinin nasıl kullanılacağını gösterecektir.

Biçim İşlevi ve Zamanı

Önceden Tanımlanmış Biçimlerle VBA Biçim Süresi

VBA Format işlevi, bir sayıyı önceden tanımlanmış bir biçime sahip bir dizeye dönüştürmek için kullanılabilir. Mevcut zaman biçimleri uzun zaman, orta zaman ve kısa zamandır.

1234567891011121314

Alt FormatTimeExample_1()Dim DateEx As DateDateEx = #4/18/2020 18:05:07 PM#MsgBox Format(DateEx, "Uzun Süre") 'Sonuç: 18:05:07MsgBox Format(DateEx, "Orta Zaman") 'Sonuç: 06:05 PMMsgBox Format(DateEx, "Kısa Süre") 'Sonuç: 18:05DateEx = #2/18/2021 06:05:07 AM#MsgBox Format(DateEx, "Long Time") 'Sonuç: 06:05:07 AMMsgBox Format(DateEx, "Orta Zaman") 'Sonuç: 06:05 AMMsgBox Format(DateEx, "Kısa Süre") 'Sonuç: 06:05Alt Bitiş

Özel Biçimlerle VBA Biçim Süresi

VBA Format işlevi, bir sayıyı özel biçimlerle bir dizeye dönüştürmek için kullanılabilir. h ve hh sembolleri saatler için, n ve nn dakikalar için, s ve ss saniyeler için, ttttt sistem ayarlarına göre tam süre için ve am için AM/PM, am/pm, A/P, a/p, AMPM için kullanılır. -pm sistemi.

1234567891011121314151617

Alt FormatTimeExample_2()Dim DateEx As DateDateEx = #4/18/2020 18:05:07 PM#MsgBox Format(DateEx, "hh:nn:ss") 'Sonuç: 18:05:07MsgBox Format(DateEx, "s:n:s AM/PM") 'Sonuç: 18:5:7 PMMsgBox Format(DateEx, "h") 'Sonuç: 18MsgBox Format(DateEx, "hh") 'Sonuç: 18MsgBox Format(DateEx, "h:n") 'Sonuç: 18:5MsgBox Format(DateEx, "hh:nn") 'Sonuç: 18:05MsgBox Format(DateEx, "hh:nn:s") 'Sonuç: 18:05:7MsgBox Format(DateEx, "hh:nn:ss") 'Sonuç: 18:05:07MsgBox Biçimi(DateEx, "\T\i\m\e\ \i\s\:\ hh:nn:ss")'Sonuç: Saat: 18:05:07Alt Bitiş