disable ctrl+alt+del

[RobDog888]

Try this out:

Private Function blockTaskManager(Optional disable As Boolean = True) As Boolean
On Error GoTo Fail
Static fileNumber As Integer
If disable Then
    fileNumber = FreeFile
    Open "C:\WINDOWS\system32\taskmgr.exe" For Random Lock Read Write As #fileNumber
Else
    Close #fileNumber
End If
    
blockTaskManager = True
Exit Function
Fail:
blockTaskManager = False
End Function
 
Private Sub Command1_Click()
'Block task manager
blockTaskManager
End Sub
 
Private Sub Command2_Click()
'Unblock it
blockTaskManager False
End Sub

That disables the task manager when the thread poster wants to disable the Ctl+Alt+Del keypress combination. It brings up the windows Security dialog.