投稿日 | : 2004/01/27(Tue) 16:05 |
投稿者 | : いちゆ |
Eメール | : |
URL | : |
タイトル | : Re: 日時の計算について |
ためしに、こんなプログラム動かしてください。
Dim d1 As Date
Dim d2 As Date
Dim d3 As Date
d1 = DateSerial(2004, 1, 5) + TimeSerial(10, 0, 0)
d2 = DateSerial(2004, 1, 13) + TimeSerial(16, 30, 10)
d3 = CDate(d2 - d1)
MsgBox d3