Acch ja, hier noch entsprechender Code:

Function Schaltjahr(Jahreszahl)
   If (Jahreszahl Mod 4) = 0 And (Jahreszahl Mod 100) <> 0 Or _
     ((Jahreszahl Mod 400) = 0) Then
      Schaltjahr = True
   Else
      Schaltjahr = False
   End If
End Function



Mit freundlichen Gr�ssen
Stephan Schr�der

> -----Urspr�ngliche Nachricht-----
> Von: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED]]Im Auftrag von Klaus
> Aschenbrenner
> Gesendet: Dienstag, 8. Januar 2002 08:24
> An: aspDEdotnet
> Betreff: [aspdedotnet] Schaltjahr
>
>
> Hallo Gruppe!
>
> Wie kann ich ermitteln, ob das aktuelle Jahr ein Schaltjahr ist?
>
> mfg Aschenbrenner Klaus
>
> | [aspdedotnet] als [EMAIL PROTECTED] subscribed
> | http://www.dotnetgerman.com/archiv/aspdedotnet/ = Listenarchiv
> | Sie k�nnen sich unter folgender URL an- und abmelden:
> | http://www.dotnetgerman.com/listen/aspDEdotnet.asp
>
>



| [aspdedotnet] als [email protected] subscribed
| http://www.dotnetgerman.com/archiv/aspdedotnet/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.dotnetgerman.com/listen/aspDEdotnet.asp

Antwort per Email an