Berekening schrikkeljaren met code

Article View: be.comp.programming

Article #16712

Back to be.comp.programming Previous Next

#16712

From: Marc Vandenbussche
Date: Sun, 16 Apr 2000 00:00

34 lines
2050 bytes

Beste,

Daar mijn laatste leerling Visual Basic 6.0 Professional afgestudeerd is,
heb ik tijd om eens leerrijke informatie (een geneste lus) op het Internet
te plaatsen.

Een klein programma berekent tussen 1 januari 1904 en 2009 het aantal
schrikkeldagen. De schrikkeldagen in de laatste eeuwen zijn de jaartallen
deelbaar door 4. De eeuwtallen moeten deelbaar door 400 zijn.

Jaartallen deelbaar door 4 : 1904, 1908, 1912, 1916 enz...
Eeuw deelbaar door 400 : 2000
Eeuw niet deelbaar door 400 : 1900

[In bijlage - als attachment - vind u een Word 97 document. Tevens in
bijlage
hebt u het programma zelf.] Tijdelijk krijg ik mijn mail met bijlagen niet
doorgestuurd. Daar ik ge�nteresseerden niet langer wil laten wachten stuur
ik deze mail door.

De bedoeling is dat u deze oefening zelf na maakt maar dan niet van 1
janurai 1904 tot 2004 maar van 1 janurari 1800 tot 2100. Denk hierbij goed
aan de theorie van de schrikkeldagen.

Deze oefening kan zowel in Visual Basic for Applications als in Visual Basic
gemaakt worden. Ook in tal van andere programmeertalen kan je deze oefening
maken. Slechts in VBA en VB zal de code identiek zijn.

Indien u ge�nteresseerd bent in de code of het programma mag u me mailen
naar onderstaand adres. Dit adres mag niet gebruikt worden voor SPAM !!!

Veel succes,

marc.vandenbusscheNOSPAM@euronet.be

Technical Details

Message-ID: <8de7c2$l60$1@buty.wanadoo.nl>

Path: arc1-ca.pugleaf.net!unknown!not-for-mail

Show Full Headers

Complete Article Headers

X-Google-Language: DUTCH,ASCII
X-Google-Thread: fcea4,1649a019aa898ad1,start
X-Google-Attributes: gidfcea4,public
From: "Marc Vandenbussche" <marc.vandenbussche@euronet.be>
Subject: Berekening schrikkeljaren met code
Date: 2000/04/16
Message-ID: <8de7c2$l60$1@buty.wanadoo.nl>
X-Deja-AN: 612105588
X-Priority: 3
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2014.211
X-Complaints-To: The appropriate party according to NNTP-Posting-Host:
X-Trace: buty.wanadoo.nl 955949251 21696 212.65.44.89 (17 Apr 2000 05:27:31 GMT)
Organization: EuroNet Internet
X-MSMail-Priority: Normal
NNTP-Posting-Date: 17 Apr 2000 05:27:31 GMT
Newsgroups: be.comp.programming