Visual Basic Cracking --> _PIRO

Now open the crackme in Smart Check and run it, then the crackme pop's up then fill in your name and serial i wrote this.
Name______Acid
Serial______2951
And check it. Now you will get the bad message but we don't care about that, close the crackme in Smart Check don't close THE Smart Check program. You can see "Command1_click" now un the code window, mark that line and go to View-->Show All Events and now you can click on the "+" sign infront og "command1_click" and woal, the VB code sea :)..
Let's start with the code here and there, I will only take the important lines..

Asc returns intenger: 65       			 <-- 65 are A in DEC numbers..
Asc returns intenger 99        			 <-- 99 are c in DEC numbers.
__vbaVarAdd (VARIANT Intenger:99 Variant 65).... <-- 99 + 65 =  164
Asc returns intenger 105       			 <-- 99 are i in DEC numbers.
__vbaVarAdd (VARIANT Intenger:105 Variant 164)...<-- 105 + 164 = 269
Asc returns intenger 100       			 <-- 100 are d in DEC numbers.
__vbaVarAdd (VARIANT Intenger:105 Variant 164)...<-- 100 + 269 = 369
__vbaVarAdd (VARIANT Intenger:4242424 Variant 164)...<-- 4242424 + 369 = 4242793
__vbaVarCat(VARIANT:String:4242793, VARIANT:String:31337) <-- 424279331337

And replace the old code with 424279331337 and check the code. Bingo, it are cracked :] Now we now how this crackme are working..

It takes all og the charaters and are addinf the first char with the seccong and the result of that with the next charater, and so are it looping to there are no charaters left. In the ned it are taking the string "31337" and are putting that in the end of the code..

LaZaRuS, Wajid, Borna Janes, ManKind, Eddie Van Camper, ACiD BuRN, KoRnFLeX, Eternal_Bliss, Potsmoke, DiABLO. Torn@do, ^AlX^ , AC|D, Dark Wolf, Marton and all the other i have forgotten