Examples: AMString, IsTime24Hour, PMString, TimeSep, and TimeZone properties

This example displays international time settings: 24-hour or 12-hour; for 12-hour, the AM and PM strings; the hour-minute-second separator; and the time zone.

Dim session As New NotesSession
Dim international As NotesInternational
Set international = session.International
If international.IsTime24Hour Then
  Messagebox "24-hour",, "Time format"
Else
  Messagebox "12-hour",, "Time format"
  Messagebox international.AMString & Chr(10) & _
  international.PMString,, "AM and PM notation"
End If
Messagebox international.TimeSep,, "Time separator"
Messagebox international.TimeZone,, "Time zone"