VB6 fermer le programme

louloukaika Messages postés 523 Statut Membre -  
Aligator_427 Messages postés 57 Statut Membre -
Bonjour,

C'est n'est pas pour demander la commande pour fermer un programme (end) c'est très simple mais je cherche un moyen de fermer mon application après 48 h, bien sur le timer ne supporte pas un délais aussi long donc si vous avez une idée.
A voir également:

1 réponse

Aligator_427 Messages postés 57 Statut Membre 21
 
Option Explicit

Dim TimeOnLoad

Private Sub Form_Load()
TimeOnLoad = Now
Timer1.Interval = 10000
End Sub

Private Sub Timer1_Timer()
If DateDiff("h", TimeOnLoad, Now) >= 48 Then End
End Sub
1