シリアル値をUWSC時間に変換します。シリアル値は、1日(24時間)を1.0とし、1日ごとに1ずつ増える。整数部分は日付を、小数部分は時刻を表す。Windows版では、1900年日付システムを適用しており、1900年1月1日の午前0時を起点として、シリアル値は1から始まる。
- 構文
- Double = serialToUwsc( serialDate )
- 引数
- serialTime
- シリアル値
- 戻値
- UWSC時間
プログラム
//////////////////////////////////////////////////
// 【引数】
// serialTime : シリアル値
// 【戻値】
// UWSC時間
//////////////////////////////////////////////////
FUNCTION serialToUwsc(serialDate)
RESULT = GETTIME(serialDate, "18991230000000")
FEND
解説
- 2行目
RESULT = GETTIME(serialDate, "18991230000000")
シリアル値
FUNCTION serialToUwsc(serialDate)
RESULT = GETTIME(serialDate, "18991230000000")
FEND
この記事は役に立ちましたか?