指定した分数を加算または減算する
スポンサーリンク
VB6 では、DateTime モジュールの DateAdd 関数を使用します。時間間隔を表す文字列を、Interval に設定するのがちょっと面倒です。
サンプルコード
以下にサンプルコードを示します。
VB6.0 以前
' 日付と時刻を格納するための変数を宣言する
Dim dtBirth As Date
dtBirth = CDate("2005/04/07 22:31:35")
' 16 分加算する
dtBirth = DateTime.DateAdd("n", 16, dtBirth)
' 8 分減算する
dtBirth = DateTime.DateAdd("n", -8, dtBirth)
' 結果を表示する
Call MsgBox(Format$(dtBirth, "yyyy/MM/dd hh:mm:ss"))
関連するリファレンス
準備中です。