sperimentare

ricerca degli anni bisestili tra due date da indicare
usando la funzione di Visual Basic su PowerPoint
Dateserial(anno/2/29)

utilizzando la funzione DateSerial
si richiede al programma di individuare gli anni
bisestili tra due date da indicare:
si assegna l'anno dal quale iniziare
(anno1..1950) e quello al quale finire (anno2..2000)
si calcola la differenza tra le due date (
anno2-anno1) = 2000-1950 = 50 e si aggiunge 1
per ricavare il numero di ricerche
da eseguire con il ciclo For
si assegna con DateSerial la data (anno1/2/29) :
 se tale data esiste, verrà confermata
e visualizzata con 2/29/anno1
( e quindi anno1 bisestile):
se non esiste verrà visualizzata
la data del giorno e mese successivo con 3/1/anno1
(e quindi anno1 non bisestile).

per descrizione, immagini,attivazione.ppt , codice
copiabile e incollabile, vedi:

http://digilander.libero.it/francescovise/visualpre/visapre.htm
http://digilander.libero.it/francescovise/visualpre/bisesto1.htm
http://digilander.libero.it/francescovise/visualpre/bisesto2.htm
http://digilander.libero.it/francescovise/visualpre/bisesto1.ppt
http://digilander.libero.it/francescovise/visualpre/bisesto2.ppt