Prikazi cijelu temu 09.06.2014 16:44
Gjoreski Van mreze
Administrator
Registrovan od:02.02.2009
Lokacija:Ohrid Makedonija


Predmet:Re: Prestupna godina
eve uste edna funkcija i ovaa ja imam koristeno
PreuzmiIzvorni kôd (Visual Basic):
  1. Public Function IsLeapYear(Y As Integer)
  2.     IsLeapYear = Month(DateSerial(Y, 2, 29)) = 2
  3. End Function