Исходники для блокирования клавишь alt + F4,ctrl + alt+ del - VB

Формулировка задачи:

У кого нить есть исходники для блокирования клавишь alt + F4,ctrl + alt+ del ? И для защиты компьютера от несанкционированного пользования ?

Решение задачи: «Исходники для блокирования клавишь alt + F4,ctrl + alt+ del»

textual
                            Листинг программы 
                        
                            Declare Function SystemParametersInfo 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
 
Dim AyW As Integer
Dim TurFls As Boolean
AwY = SystemParametersInfo(SPI_SCREENSAVERRUNNING, True, TurFls, 0)