VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



Ctrl+Alt+Del & Alt+Tab Method (Enable/Disable)

by iNfO (3 Submissions)
Category: Miscellaneous
Compatability: Visual Basic 3.0
Difficulty: Beginner
Date Added: Wed 3rd February 2021
Rating: (6 Votes)

This coding will let you ENABLE and DISABLE the Ctrl + Alt + Del Method and also the Alt + Tab Method. Have Fun. Please Vote for Me.

API Declarations
'- Made By: iNfO
'- About: These 2 functions let you enable and
'- disable the Ctrl+ Alt + Del Method and the
'- Alt + Tab Method
Public Declare Function SystemParametersInfo2 Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, lpvParam As Any, ByVal fuWinIni As Long) As Long
Public Const SPI_SCREENSAVERRUNNING = 97
Public Sub CtrlAltDel_Disable()
'in a button or anywhere,
'put this: ctrlaltdel_disable
Dim syssend As Long
syssend& = SystemParametersInfo2(SPI_SCREENSAVERRUNNING, True, False, 0)
End Sub
Public Sub CtrlAltDel_Enable()
'in a button or anywhere,
'put this: ctrlaltdel_enable
Dim syssend As Long
syssend& = SystemParametersInfo2(SPI_SCREENSAVERRUNNING, False, True, 0)
End Sub

Rate Ctrl+Alt+Del & Alt+Tab Method (Enable/Disable)

'- You will need:
'-        2 Command Buttons
Private Sub Form_Load()
'- Sets the Captions for the Buttons
Command1.Caption = "Disable"
Command2.Caption = "Enable"
End Sub
Private Sub Command1_Click()
'- This disables the Ctrl + Alt + Del Method
'- and the Alt + Tab Method
CtrlAltDel_Disable
End Sub
Private Sub Command2_Click()
'This enables the Ctrl + Alt + Del Method
'- and the Alt + Tab Method
CtrlAltDel_Enable
End Sub

Download this snippet    Add to My Saved Code

Ctrl+Alt+Del & Alt+Tab Method (Enable/Disable) Comments

No comments have been posted about Ctrl+Alt+Del & Alt+Tab Method (Enable/Disable). Why not be the first to post a comment about Ctrl+Alt+Del & Alt+Tab Method (Enable/Disable).

Post your comment

Subject:
Message:
0/1000 characters