Eteindre Pc

Signaler
Messages postés
27
Date d'inscription
mardi 13 avril 2004
Statut
Membre
Dernière intervention
28 juin 2004
-
Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Statut
Membre
Dernière intervention
30 juin 2009
-
voici mon pb:
je n'arrive pas à eteintre mon pc depuit mon appli.
j'ai essayer plusieur source qui ne marche pas.
avez vous une solution
ps: je suis sous win nt4

A L'AIDE SVP

3 réponses

Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Statut
Membre
Dernière intervention
30 juin 2009
8
t'as essayé ça ??

Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
Private Variable As Long, XX As Long

Sub arret()
Variable = 1
XX = ExitWindowsEx(Variable, Constante)
Unload Me
End Sub

Private Sub Command1_Click()
arret
End Sub

It@li@
Messages postés
27
Date d'inscription
mardi 13 avril 2004
Statut
Membre
Dernière intervention
28 juin 2004

ca ne marche pas, ca ferme juste mon appli
Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Statut
Membre
Dernière intervention
30 juin 2009
8