[VB5/VB6] Controllo della data di sistema

[giorgiogio48]

Io il problema lo risolverei così:

Nell'evento load di Form1 inserisci questo codice:

Private Sub Form_Load()
MsgBox Format("10 / 3 / 2006", "dd/mm/yyyy")
If Format(Date, "dd/mm/yyyy") > Format("10/03/2006", "dd/mm/yyyy") Then
MsgBox "Tempo di prova scaduto"
Unload Form1
End If

End Sub

Ovviamente nell'evento load potrai mettere anche altro codice.