MVEs are more concerned with the satisfaction of those they help than with the considerable points they can earn. They are the types of people you feel privileged to call colleagues. Join us in honoring this amazing group of Experts.
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Me.Load ' Works in Windows XP and above but not Windows 2000 AddHandler SystemEvents.SessionSwitch, AddressOf SampleForm1_SessionSwitch End Sub Private Sub SampleForm1_SessionSwitch(ByVal sender As System.Object, ByVal e As SessionSwitchEventArgs) If e.Reason = SessionSwitchReason.SessionLock Then ' Computer locked Console.WriteLine("Workstation locked at: " & Now) ElseIf e.Reason = SessionSwitchReason.SessionUnlock Then ' Computer unlocked Console.WriteLine("Workstation unlocked at: " & Now) End If End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|VB.net Is there code behind PowerPivot||2||70|
|0x800f081f cannot load .NET 2.0 and 3.5 framework on Windows 10 Creators Update (1703)||13||220|
|vb.net make textbox not visible after 1 minute elapsed||6||27|
|Need Help With GDI+ in VB.Net||8||41|
Join the community of 500,000 technology professionals and ask your questions.