Comment faire pour que son application ne se ferme pas si elle effectue une activité importante?

Contenu du snippet

C'est un code tout simple mais qui peut servir au débutant car c'est une base assez complète sur laquelle on peut restructurer diverse architecture et algorithme différent.
Ce mini code permet tout simplement, en cas d'action importante de demander à l'utilisateur s'il veut réellement l'arreter, et si c'est le cas il finit de faire son action avant de desactiver l'application, bien qu'elle ne soit plus visible.

Source / Exemple :


Private Sub Form_Unload(Cancel As Integer) 
    If Action Then 
        If (MsgBox("Voulez-vous réellement quitter cette application?", vbExclamation + vbYesNo, "Fermer l'application?") = vbNo) Then 
            Cancel = True 
        Else 
            Cancel = False 
            Do While Action = True 
                DoEvents 
            Loop 
            End 
        End If 
    End If 
End Sub

Conclusion :


Action est actif quand des actions importantes sont effectuées comme des enregistrement ou autre traitement primaire. Il est désactivé lors de la fin de cette ou de ces actions.

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.