Visual Basic 6 - data

esatto

Ci devo riflettere su domani te lo dico con certezza
allora ti faccio sapere a domani ciao

ciao e grazie spero di non averti annoiato, fatto arrabbiare

nono anzi era da un pò che nn mettevo in moto il cervello ihihihi ciao a domani

è semplice, in un file scrivi la data.

Metti che nel tuo form2 c'è una textbox e un command e serve per salvare la data. nel codice del command button ci metti:

open "C:\percorso\tuofile.txt" for output as #1
print #1, date
close #1

in questo modo salvi la data di scadenza. Poi nella form_load del form1 recuperi i dati...

dim data as string
open "C:\percorso\tuofile.txt" for input as #1
line input #1, data
close #1

...e poi con un if confronti la data corrente con la data di scadenza:

if date = data then
msgbox "raggiunta scadenza"
end if

Rieccomi ho lavorato un pò e alla fine sono arrivato ad un conclusione simile a quella di GrG (attienitti cmq al form di ieri sera e poi aggiungi il codice) eccola:

Private Sub Command1_Click()
Open "C:\Users\Federico\Desktop\Ciao.txt" For Output As #1
Print #1, Date
Close #1
End Sub
Private Sub Form_Load()
Dim data As String
Open "C:\Users\Federico\Desktop\Ciao.txt" For Input As #1
Line Input #1, data
Close #1
If Date = data Then
MsgBox "raggiunta scadenza"
End If
End Sub
Private Sub Timer1_Timer()
Text3.Text = Date
End Sub


Avvisami se riscontri Problemi

graze tante sei stato di parola.ad aiutarmi.sei veramente doc.
ci provo a farlo e ti faccio sapere. in poche parole che se metto la data in form2 nel textbox e invio alla scadenza compare il messaggio.

Sisisisisi cmq prego nn c'è di che