09-11-10, 09:39
|
| Όνομα: Γιώργος Έκδοση λογισμικού Office: Ms-Office 2010 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική | | Εγγραφή: 18-06-2010
Μηνύματα: 3.674
| |
Καλημέρα στην παρέα
Η συνάρτηση προσδιορισμού των ημερών ενός μήνα μπορεί να βοηθήσει και στον προσδιορισμό των δίσεκτων ετών.
Αυτό μπορεί να γίνει με την ακόλουθη συνάρτηση: Κώδικας: Public Function isDisekto(Etos As Integer) As Boolean
isDisekto = Day(DateSerial(Etos, 3, 0)) = 29
End Function
Φιλικά/Γιώργος
|