8.4.16 IsLeapYear （うるう年かどうかを調べる）
- 機能
-
指定された西暦年がうるう年かどうかを調べ，結果を真（True），または偽（False）で返します。
- 形式
IsLeapYear ( Year )
- 指定項目
-
- Year
-
西暦年を数値，または値を格納した変数名で指定します。
西暦年に0〜69の範囲の数値を指定すると，2000〜2069と読み替えられます。
- 説明
-
指定された西暦年がうるう年かどうかを調べ，結果をコマンドの実行結果として返します。うるう年である場合には真（True）を，うるう年でない場合には偽（False）を返します。
- 例
' 今年がうるう年かどうかを調べる。 Dim nowYear nowYear = Year ( Date() ) If IsLeapYear ( nowYear ) Then MessageBox ( "今年はうるう年です。" ) Else MessageBox ( "今年はうるう年ではありません。" ) End If
- 対象バージョン
-
JP1/Script 05-20以降