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以降

8.4.16 IsLeapYear （うるう年かどうかを調べる）

8.4.16　IsLeapYear （うるう年かどうかを調べる）