Hi! Today im going to show you how to keep those pesky hackers away

!!
(FOR MORE INFO READ THE DETAILS AFTER EVERY LINE OF CODE)
Picture:
[IMG]http://i647.photobucke*****m/albums/uu198/Vinnie_davis1337/Untitled-2-1.png[/IMG]
Ok first your gonna want to lay down some Dims!
(PUT THIS UNDER "Public Class Form1")
Code:
Dim Integer1 As Integer = 0 'The Base integer
Dim Integer2 As Integer = Integer1 * 2 'The Base integer Multiplied by 2 to make it harder to crack
Dim AllowChange As Boolean = False 'if True you will be free to change the number
Dim oldNumber As Integer = 0 'The Number that the hacker is trying to change.
Dim RandomNumbers As New Random() 'This Will be the base for generating a random number!
Ok Now if you ever wanted to change the Base integer this is what you will need to do so your program doesn't detect a force change.
(YOU CAN ADD THIS TO A BUTTON TO MAKE A RANDOM NUMBER)
Code:
oldNumber = Integer1 'So We know what to change the number back to
allowChange = True 'Allow us to change the variable
Integer1 = RandomNumbers.Next(0, 100) 'Change the number (Minumum random, Max Random)
allowChange = False 'Stop anybody from changing the integer
Integer2 = Integer1 * 2 'Set the Multiplied Variable
Now for the Detection, your going to want to make a timer for this and set the interval to 1 milisecond.
(ALWAYS HAVE THE TIMER ENABLED FOR FULL PROTECTION)
Code:
Label2.Text = Integer1 'Refresh the number
If Integer1 = Integer2 / 2 = False Then 'If the number is changed then...
If allowChange = False Then 'If it is forced then...
Integer1 = oldNumber 'Change the number back to the original
Integer2 = Integer1 * 2 'Reset integer2 back to the original * 2
MsgBox("Stop Trying...") 'Give them a message xD
End If 'End the second If statement
End If 'End the first If statement
And your done! I've provided the EXE file in the atachment
Scans:
1:
cant hack me.exe - Jotti's malware scan
2:
VirusTotal - Free Online Virus, Malware and URL Scanner