Page 2 of 3

Re: Saro' ignorante ?

Posted: 25 Mar 2013, 12:30
by MarcoMi
Tempo fa mi era capitato di doverla calcolare per un programma che stavo sviluppando... e ovviamente non sono stato ad inventare l'acqua calda... ho cercato in internet ed ho trovato questa funzione più compatta.

[size=medium]Public Function EasterDate(ByVal iYear As Integer) As Date
Dim D As Integer
D = (((255 - 11 * (iYear Mod 19)) - 21) Mod 30) + 21
EasterDate = DateSerial(iYear, 3, 1) + D + (D > 48) + 6 - ((iYear + iYear \ 4 + D + (D > 48) + 1) Mod 7)
End Function[/size]

Ciao
Marco

Re: Saro' ignorante ?

Posted: 25 Mar 2013, 13:21
by Vince MO
Ahhh, la sintesi del software: e' praticamente arte!!!(tu)

Vince MO

Re: Saro' ignorante ?

Posted: 25 Mar 2013, 13:35
by Francis MI
Tanto poi clicki ctrl+alt+canc....X(

Re: Saro' ignorante ?

Posted: 25 Mar 2013, 13:44
by paolobolz
ahhh Marco è lo stesso sistema che usi per calcolare i giorni fertili?? ....!:D:D( scusa mi è venuta spontanea)

Re: Saro' ignorante ?

Posted: 25 Mar 2013, 13:48
by pluto16
paolobolz Scritto:
-------------------------------------------------------
> Ieri mia figlia 5 anni:
> Papa' come fai a sapere quando è il giorno di
> Pasqua..?? io : semplice guardo il calendario
> Mamma .....come fai etc etc ...... risposta pronta
> di mia moglie: guardo il calendario
>
> Elena ..ma noooo dovete festeggiare la Pasqua la
> prima domenica dopo la prima luna piena che viene
> dopo il primo giorno di primavera!!!!
> giuro che in 50 anni non lo avevo mai sentito ne
> saputo... !!
>
> buona settimana a tutti !


bene e anche oggi ne abbiamo imparata un altra ;)

Re: Saro' ignorante ?

Posted: 25 Mar 2013, 14:11
by andrea firenze
...sapevo anch'io che il conteggio della Pasqua è molto complicato......la soluzione di Elena è sicuramente più semplice...ma non so se corrisponda (sempre) ai calcoli...matematici....comunque sbirciando per tempo il calendario la soluzione si trova......:D
Comunque , Paolo, sapere di essere ignorante...nel senso di ignorare qualcosa....può essere positivo....perché ci dà la forza di voler imparare qualcosa di nuovo......!tt!

Re: Saro' ignorante ?

Posted: 25 Mar 2013, 17:48
by Roberto Firenze
Paolo, mi hai fatto ridere da solo guardando uno schermino........
Roberto

Re: Saro' ignorante ?

Posted: 25 Mar 2013, 20:34
by l.santa
50 giorni prima di pentecoste?
40 giorni dall'inizio della quaresima?

Re: Saro' ignorante ?

Posted: 26 Mar 2013, 06:15
by portos
Questa me la segno!!
Non la tua Prof.(:P).... quella di ElenaX(

Re: Saro' ignorante ?

Posted: 26 Mar 2013, 09:57
by Gianluigi 807
Sono due giorni che faccio lo splendido (a Scuola, a casa......ovunque) con questa storia.
Solo una ragazzina di seconda media la conosceva grazie ai racconti della nonna.

Gianluigi