by Saeed J.Ghanim (5 Submissions)
Category: Windows System Services
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Tue 1st March 2005
Date Added: Mon 8th February 2021
Rating: (1 Votes)
THIS CODE WILL MAKE YOU TURN OFF/RESTART/STAND BY YOUR COMPUTER
API Declarations
'DECLARE
Private Declare Function SDialog Lib "shell32" Alias "#60" (ByVal YourGuess As Long) As Long
App.TaskVisible = False
End Sub
Private Sub lbl1_Change()
If Me.lbl1.Caption = 2 Then
SDialog 0
End If
If Me.lbl1.Caption = 2 Then
Me.lbl1.Caption = 0
End If
End Sub
Private Sub Timer1_Timer()
Me.lbl1.Caption = Val(Me.lbl1.Caption) + 1
End Sub
No comments have been posted about THIS CODE WILL MAKE YOU TURN OFF/RESTART/STAND BY YOUR COMPUTER. Why not be the first to post a comment about THIS CODE WILL MAKE YOU TURN OFF/RESTART/STAND BY YOUR COMPUTER.