IBM Lotus Domino Designer 8.5
  バージョン 8.5 および 8.5.1

例:ConvertToZone メソッド

次のコードは今日の 6:00 AM をサマータイムを使用するすべてのタイムゾーンに変更します。

Sub Initialize

  Dim dateTime As New NotesDateTime("Today 06:00")

  msg = "Zone" & Chr(9) + "Time"

  For i = -12 To 12

    Call dateTime.ConvertToZone(i, True)

    msg = msg & Chr(10) & dateTime.TimeZone & Chr(9) &  _

    dateTime.ZoneTime

  Next

  Messagebox msg,, "Today 06:00 DST"

End Sub

---

ライブラリー | サポート | ご利用条件 |

最終更新日: 2009 年 10 月 5 日 (月曜日)