by 100 that are not also divisible by 400. Years divisible by 400 are leap years. 2000 is a eap year. 1900 is not a leap year.</p>
<pre><code>FUNCTION IsLeapYear (BYVAL nYear AS LONG = 0) AS BOOLEAN
</code></pre>
<table>
<thead>
<tr class="header">
<th>Parameter</th>
<th>Description</th>
</tr>
</thead>
<tbody>
<tr class="odd">
<td><em>nYear</em></td>
<td>A four digit year.</td>
</tr>
</tbody>
</table>
<h4 id="return-value-1">Return value</h4>
<p>TRUE or FALSE.</p>
<h1 id="juliantogregorian"><a name="JulianT