FormatSaat Fonksiyonu

Tanım

Verilen saat bilgisinin, gösterim şeklini düzenlemek için kullanılır.

Kullanım Şekli

Değişken = Document.FormatSaat(Saat, Stil)

Ana Nesne

Document (Doc) nesnesinin elemanıdır. Bir doküman nesnesi ile kullanılmak zorundadır.

Parametreler

Parametre

Açıklama

Saat

Gösterim şekli düzenlenecek olan zaman bilgisi. Zaman formatında (“hh:mm:ss”) girilmelidir.

Stil

Verilen saatinin kaç karakter olarak gösterileceğini sağlayan tam sayı değeri. Yazılımda saat, normalde “hh:mm:ss” gösterilir. Bu bilgi de, karakter sayısı olarak 8 (sekiz) karakterlik bir bilgi dir.

Geçerli mantıklı parametre değerleri şunlardır:

•4 : “hhmm” formatında bilgi geri dönülür. Örnek: 1458

•5 : “hh:mm” formatında bilgi geri dönülür. Örnek: 14:58

•6 : “hhmmss” formatında bilgi geri dönülür. Örnek: 145853

•8 : “hh:mm:ss” formatında bilgi geri dönülür. Örnek: 14:58:53

Geri Dönen Değerler

Günün saati en uzun “hh:mm:ss” şeklindeki karakter dizisi şeklinde geri dönülür. Bir değişkene atanarak kullanılmalıdır.

Hatırlatmalar

•Parametre olarak 8 (Sekiz) değerinden büyük sayılarda, 8 parametresinin değeri dönülür.

•Parametre olarak 0 (Sıfır) değerinde ise boş karakter dizisi dönülür.

Örnek

Sub Makro1()

Zaman = "10:34:21"

Mesaj = "FormatSaat(""" & Zaman & """) saatinin gösterim şekilleri aşağıdadır."

Mesaj = Mesaj & chr(13) & "Gösterim Karakter Sayısı ""2"" : " & Doc.FormatSaat(Zaman,2)

Mesaj = Mesaj & chr(13) & "Gösterim Karakter Sayısı ""4"" : " & Doc.FormatSaat(Zaman,4)

Mesaj = Mesaj & chr(13) & "Gösterim Karakter Sayısı ""5"" : " & Doc.FormatSaat(Zaman,5)

Mesaj = Mesaj & chr(13) & "Gösterim Karakter Sayısı ""6"" : " & Doc.FormatSaat(Zaman,6)

Mesaj = Mesaj & chr(13) & "Gösterim Karakter Sayısı ""8"" : " & Doc.FormatSaat(Zaman,8)

Doc.Msgbox Mesaj

End Sub

Verilen bir zaman bilgisinin, farklı şekillerde gösterimi için yukarıdaki örnek verilmiştir. Bu örneğin sonucu ise aşağıdaki mesaj kutusunda gösterilmiştir.

Birleşik Yazılım