Help With Injector!!!!

I have the injector built
but i want to make it close when done injecting but i do not know how to do that so plz help!!!!

Simplest way

Use

Code:

End

or

Code:

Me.close

(depending if it's multiple forms or not)

At the end of the Sub "Inject" After Successful injection

or.. add a checkbox. Make the checkbox text "close after injection"

add this at the end of the injection sub

Code:

 If checkbox1.checked = true then 'change checkbox1 to name of checkbox
me.close
end if

If you don't know how to make an injector close after injecting, then you shouldn't be making an injector.

Well, by making he obviously means "borrowing"....

Well, by borrowing you obviously mean "stealing Ugleh's code that barely worked in the first place and claiming it as his own."....

Originally Posted by Lolland

Well, by borrowing you obviously mean "stealing Ugleh's code that barely worked in the first place and claiming it as his own."....

Well i altered this code with a litle bit of help from google so it is mine and
read my sig it is very accurate and thanks XGelite and NextGen1 for helping me out the other a-holes just need to stfu

Originally Posted by conndrst

Well i altered this code with a litle bit of help from google so it is mine and
read my sig it is very accurate and thanks XGelite and NextGen1 for helping me out the other a-holes just need to stfu

Code:

Imports System.Drawing

Imports System.Drawing.Drawing2D

Public Class Form2

    Public eventString As String

    Public pw As Integer

    'Public j As Integer

    'Public p As Integer

    'Public q As Integer

    Private Sub PictureBox1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseDown

        ' i = e.X

        ' j = e.Y

        ' p = e.X

        'q = e.Y

        pw = 4 ' you can use numeric updown for selecting pen-width

        Select Case e.Button

            Case MouseButtons.Left

                eventString = "L"

            Case MouseButtons.Right

                eventString = "R"

            Case MouseButtons.Middle

                eventString = "M"

            Case MouseButtons.XButton1

                eventString = "X1"

            Case MouseButtons.XButton2

                eventString = "X2"

            Case MouseButtons.None

                eventString = Nothing

        End Select

    End Sub

    Private Sub PictureBox1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseMove

        Dim yourArray As Point() = {New Point(e.X - pw, e.Y - pw), New Point(e.X, e.Y)}

        Dim cle As Graphics

        Dim myPath As New GraphicsPath

        Dim mykolor As Color

        cle = PictureBox1.CreateGraphics

        If eventString = "L" Then

            mykolor = Color.Blue 'here you can select color using colordialogbox

            myPath.StartFigure()

            myPath.AddLines(yourArray)

            myPath.CloseFigure()

            cle.DrawPath(New Pen(mykolor, pw), myPath)

        End If

        If eventString = Nothing Then

            myPath.Reset()

            cle.Flush()

        End If

    End Sub

    Private Sub PictureBox1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseUp

        eventString = Nothing

    End Sub

End Class

^^See that's my code because I found this one on google:

Code:

Imports System.Drawing

Imports System.Drawing.Drawing2D

Public Class Form1

    Public eventString As String

    Public pw As Integer

    'Public j As Integer

    'Public p As Integer

    'Public q As Integer

    Private Sub PictureBox1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseDown

        ' i = e.X

        ' j = e.Y

        ' p = e.X

        'q = e.Y

        pw = 4 ' you can use numeric updown for selecting pen-width

        Select Case e.Button

            Case MouseButtons.Left

                eventString = "L"

            Case MouseButtons.Right

                eventString = "R"

            Case MouseButtons.Middle

                eventString = "M"

            Case MouseButtons.XButton1

                eventString = "X1"

            Case MouseButtons.XButton2

                eventString = "X2"

            Case MouseButtons.None

                eventString = Nothing

        End Select

    End Sub

    Private Sub PictureBox1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseMove

        Dim yourArray As Point() = {New Point(e.X - pw, e.Y - pw), New Point(e.X, e.Y)}

        Dim cle As Graphics

        Dim myPath As New GraphicsPath

        Dim mykolor As Color

        cle = PictureBox1.CreateGraphics

        If eventString = "L" Then

            mykolor = Color.Blue 'here you can select color using colordialogbox

            myPath.StartFigure()

            myPath.AddLines(yourArray)

            myPath.CloseFigure()

            cle.DrawPath(New Pen(mykolor, pw), myPath)

        End If

        If eventString = Nothing Then

            myPath.Reset()

            cle.Flush()

        End If

    End Sub

    Private Sub PictureBox1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseUp

        eventString = Nothing

    End Sub

End Class

But you can easily notice that on my code it says FORM2 instead of form1 because I found a tutorial on how to change the "Public Class Form1" to "Public Class Form2", so that means the code is all mine.

my code is way different,mine uses form1 not form2 like yours does

edit:i have fixed my problem so no further nonsense is needed

Are you sure or are u going to QQ more?

Originally Posted by mnpeepno2

Are you sure or are u going to QQ more?

i said i fixed it

so stop the nonsense

there is no need for ppl to keep talking about nothing

Originally Posted by conndrst

i said i fixed it

so stop the nonsense

I'm just saying that it's not your code.

Originally Posted by Lolland

I'm just saying that it's not your code.

you just missed my edit lol

Well give some credit to the original programmers.

Originally Posted by Lolland

Well give some credit to the original programmers.

well thanks to the ppl i got this code from(altho i changed it)

Help With Injector!!!!

Similar Threads

Tags for this Thread