password program

[brjames]

I am creating a password program for use in windows and I was wondering if there is any way of disabling the Ctrl ALT DEL checking in windows?
Thanks!

My code is below:

Private Sub cmdEnter_Click()
If Text1.Text = "letmein" Then
End
Do While Text1.Text <> "letmein"
Loop
End If
End Sub

Private Sub cmdRetry_Click()
Text1.Text = ""
End Sub

[HarryW]

I don't know how to do what you said, but if that's your code, you'll get stuck in a loop if the user doesn't get it right first time.

Ctrl Alt Del might be the ONLY way of getting out of it then

[Fox]

Yes, you should really update your code...

Anyway here's how to disable CTRL-ALT-DEL:

'Into Module
Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByVal lpvParam As Any, ByVal fuWinIni As Long) As Long

Sub DisableCtrlAltDelete(bDisabled As Boolean)
Dim Temp As Long
Temp = SystemParametersInfo(97, bDisabled, CStr(1), 0)
End Sub

'While Form_Load
DisableCtrlAltDelete True

------------------
[email protected]
...
Every program can be reduced to one instruction which doesn't work.