Step 1: Making the screen (part1)

Here I'm going to show you the first part of the screen lock ..
the first pic is the window that comes up when you run my screen lock.

on this you can set the password .. i made it so you have to set it every time so you could never forget it. Also so my program is only 1 file.

you also have the option to see it to see through .. this is just so the lock screen is slightly see through. So you can see your desktop pic faded out.

now here is how i did it:
for the password:

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
If TextBox1.Text = Form1.TextBox1.Text Then

Dim process As System.Diagnostics.Process = Nothing
Dim psi As New ProcessStartInfo
psi.UseShellExecute = True
psi.FileName = "taskkill.exe"
psi.Arguments = "/F /IM taskmgr.exe"
process = System.Diagnostics.Process.Start(psi)


End If
End Sub

what this does is checks to see if the text in textbox1 is equal to the text that you set on the first window. Then if it does it task kills task manager if it was running, And restarts explorer.exe.

here is the see through bit:

Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim process As System.Diagnostics.Process = Nothing
Dim psi As New ProcessStartInfo
psi.UseShellExecute = True
psi.FileName = "taskkill.exe"
psi.Arguments = "/F /IM explorer.exe"
process = System.Diagnostics.Process.Start(psi)

If Form1.CheckBox1.Checked = True Then
Me.Opacity = 0.5
End If
End Sub

This piece of script will task kill explorer.exe so even if someone gets past my screen lock they will not be able to do anything!
then it checks to see if the 'see through' box has been checked. If it has it sets opacity to 0.5.
If not then it shows the change background button.
<p>Hi. Good day! Thanks for the code, I actually copied a portion of it for my project. Already disabled the task manager, taskbar, and alt-tab. But do you have any idea how to make it in such a way that it would really look like all the keys are locked? Because when I press the windows key/Atl tab, something still pops up on the screen. Thank you :D</p>
<p>Thank you for sharing this.<br>I'm creating a system lock utility called Raptor with advanced features and your approach gave me some more ideas to add on it. </p>
thanks for your information..............
Would it be possible to make something similar in VBS?
sorry for a late reply, but not that i know of, as VB.NET lets you create forms and easily put in buttons etc, whereas VBS tends to be more background processes without as much visual.<br>Although my knowledge of plain VBS is limited compared to .NET.
Great job! Would you mind giving the whole code instead of code blocks? Thanks!
Five stars by the way!
I agree five stars all the way. But would be nice to see the straight script
Hi there,<br /> <br /> I got an error as below<br /> <br /> ObjectDisposedException was unhadled<br /> Cannot access a disposed object<br /> <br /> please help.....<br /> <br /> thoeun<br /> <br />
Thanks for your reply, But I already fix the problem. It's because I did only one form. However I got your concept and i am trying to update this to control clients by network. <br /> <br /> I appreciate if you got any idea to do that<br /> <br /> Bunthoeun<br />
Can you explain where the error comes up, or is it as you try to run the .exe ?<br />
That is really cool.. would it be difficult to make it so that both screens blank out?&nbsp; I am using dual monitors..<br />
im not sure =/&nbsp; .... because i use 2 monitors too. but when i did it i found the only real way to do that wold be to run it twice and have a separate pass for each screen ..... but im sure somewhere on the internet is an answer to this.<br />
i like i rules instructibles i is big fan i subsribed<br />
Great work! Is it possible to code it so it would not allow the use of the Log off or Shut Down buttons when ctrl+alt+del is hit?<br />
It might be but i tried to make it like that, by doing things like disabling ctrl or alt<br /> but windows has made it so ctrl+alt+del is always possible .. so if a program freezes you can end it.<br />
very nice thank you for making this ible!!!

About This Instructable


7 favorites


More by iRule: Screen Lock (VB.NET) VBS Tutorial - Basics Batch Maker
Tags: screen lock vb
Add instructable to: