Eteindre et allumer le ou les écrans
Contenu du snippet
Private Const WM_SYSCOMMAND As Integer = &H112UI
Private Const SC_MONITORPOWER As Integer = &HF170I
Private ReadOnly HWND_BROADCAST As IntPtr = New IntPtr(&HFFFFI)
<DllImport("user32")> _
Private Function SendMessage(ByVal hwnd As IntPtr, ByVal wMsg As UInteger, ByVal wParam As Integer, ByVal lParam As Integer) As Integer
End Function
Public Sub SetScreenPowerOff()
Call SendMessage(HWND_BROADCAST, WM_SYSCOMMAND, SC_MONITORPOWER, 1)
End Sub
Public Sub SetScreenPowerOn()
Call SendMessage(HWND_BROADCAST, WM_SYSCOMMAND, SC_MONITORPOWER, 0)
End Sub
Compatibilité : VB 2005, VB 2008, VB.NET 1.x
Disponible dans d'autres langages :
A voir également
- Eteindre et allumer le ou les écrans
- Allumer et eteindre led en vb - Forum Visual Basic 6
- Éteindre l'écran ✓ - Forum C / C++ / C++.NET
- Allumer et eteindre à distance un pc de mon réseau - Forum VB.NET
- Comment eteindre l ecran? ✓ - Forum C# / .NET
- Allumer et éteindre une seul LED avec masm 8086 - Forum ASM
Du même auteur (PCPT)
-
Insérer des données dans un fichier
-
Retourner le Nième jour de la période (ex : 3ème lundi d'aout 2010)
-
Retourner le Nième jour de la période (ex : 3ème lundi d'aout 2010)
-
[vb2008] observer l'activité input (clavier souris) de l'utilisateur
-
[c#2008] observer l'activité input (clavier souris) de l'utilisateur
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.