VB6 fermer le programme

louloukaika -  
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.
Configuration: Windows Vista
Firefox 3.6

1 réponse

  • Votes
  • Date
  • Date décroissante
  1. Aligator_427
    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

    Discussions similaires

    TV LG "Non programmé"
    Chantal Joubert

    7 réponses