CalcolaBisestile
Function Bisestile(Anno As Integer) As Boolean Bisestile = ((Anno Mod 4) = 0 And (Anno Mod 100)) Or (Anno Mod 400) = 0 End Function
Function Bisestile(Anno As Integer) As Boolean
Bisestile = ((Anno Mod 4) = 0 And (Anno Mod 100)) Or (Anno Mod 400) = 0
End Function
( calcolabisestile.html )- by Paolo Puglisi
- Modifica del 17/12/2023