[VB6]: Aiuto con le Date

[vr-claudio]

Ciao ragazzi
sto effettuando un piccolo programmino per un negozio di ottica, vi espongo subito il problema:

Nella funzione Form_Load carico in una label la data giornaliera in questo semplice modo:

-) DATA_GIORNALIERA.Caption = Date

Nel Form1 cè un pulsante che mi apre un Calendar1 e nella Funzione Calendar1_DblClick ho
inserito il seguente codice per inserire in un'altra Label la data selezionata:

-) DATASCONTRINO.Caption = Calendar1

Come posso far capire alla funzione Calendar1_DblClick che se la data selezionata supera di un anno quella giornaliera non è possibile inserire la data nella label (DATASCONTRINO) e quindi una sostituzione di un eventuale occhiale?

Spero di essermi fatto capire abbastanza bene...

Ciauz, vrclaudio

[vr-claudio]

sono andato a vedere nelle diverse help di vb6 ma in merito a questo ho trovato gran poco e niente, se sapete indirizzarmi da qualche parte ne sarei felice

grazie vr-claudio

[rotteninside]

Con la funzione Datediff puoi prendere l'intervallo che intercorre tra due date.

http://www.w3schools.com/vbscript/func_datediff.asp