閏年かどうかを判定しよう

このレッスンでは、VB.NETである年が閏年かどうかを判定する方法を学び、複数の条件を組み合わせた判定ロジックの書き方を理解することを目標にします。「VB.NET 閏年判定実装」で調べている方向けです。

閏年は「4で割り切れるが100で割り切れない年」、または「400で割り切れる年」という少し複雑なルールで決まります。単純に4の倍数で判定すると、実は正しくない結果になってしまう年があります。

サンプルコードでは、(year Mod 4 = 0 AndAlso year Mod 100 <> 0) OrElse year Mod 400 = 0という1つの式で、この複雑なルールをまとめて表現しています。2024年は4で割り切れて100で割り切れないため閏年、1900年は100で割り切れるが400で割り切れないため閏年ではない、という結果になります。

初心者がよくつまずくのが、単純に「4で割り切れるかどうか」だけで判定してしまうことです。西暦1900年のように、4の倍数だが実際には閏年ではない例外があるため、100と400の条件もあわせて確認する必要があります。

実際の開発現場では、日付計算やカレンダー機能を実装する際に、この閏年判定のロジックが正確な日数計算のために欠かせません。

📖 お手本コード

Module Program
    Function IsLeapYear(year As Integer) As Boolean
        Return (year Mod 4 = 0 AndAlso year Mod 100 <> 0) OrElse year Mod 400 = 0
    End Function

    Sub Main()
        Console.WriteLine(IsLeapYear(2024))
        Console.WriteLine(IsLeapYear(2023))
        Console.WriteLine(IsLeapYear(1900))
    End Sub
End Module

✍️ あなたのコード

コードを書いたら「実行する」を押してください

🧪 このサイトではVisual Basic(.NET)を直接コンパイル・実行できないため、お手本コードと同じ内容を入力できたかをその場で判定します(採点はブラウザ内だけで行われ、どこにも送信されません)。

🎯

ここまでできればゴール達成!
うるう年かどうかを判定する、カレンダー機能が作れるようになります。