日付と時刻を表す浮動小数点数
記述:
日付けの連続値(日付シリアル値)とは、PDS や VBDOS で用いられのと同じ形式の、日付と時間の値を持つ数です。
値は、1899年12月30日の午前0時から数え始める、日数です。
この日付けの連続値は、2つの日付の間の時間を、容易に計算するために、主に使われます。
日付の連続値の単位は一日です。そして、端数部分は、その日の時間に相当します。
日付の連続値が整数の場合は、時間の部分はありません。
VBDOS では、日付の範囲が、1753年と2078年の間に制限されていますが、FreeBASIC の日付の連続値は、日付の範囲は無制限です。
FreeBASIC で、日付の連続値を操作する関数は、
Double の引数を使います。
Format 関数は、日付けの連続値を、人が見て分かるように表示する表現形式を持っています。
例:
#include
"vbcompat.bi"
Dim a
As Double, b
As Double
a =
0
Print "日付の連続値の起点は:"
Print Format
(a,
"yyyy/mm/dd hh:mm:ss")
Print
a =
Now
Print "現在の時刻は:
"
Print Format
(a,
"yyyy/mm/dd hh:mm:ss")
Print
b =
DateSerial
(2000,
1,
1)
Print " 2000/01/01 から、"
&
Int(a-b
) &
" 日、経過しました。"
Sleep
(
既存のライブラリを使う
の
FreeBASIC ヘッダー も参照下さい。)