Crosshair Code for VB?

Does anyone know a working crosshair code for visual basic? and not this:

Code:

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Integer

Code:

Dim Draw3D As Graphics = Graphics.FromHwnd(New IntPtr(FindWindow("CrossFire", "CrossFire"))) 
        Dim newImage As Image = My.Resources.crosshairs
        Dim ulCorner As New Point(775, 775)
        Draw3D.DrawImage(newImage, ulCorner)

something that doesn't require a resource and doesn't glich out

What i do for crosshairs

I do
If you use this Give Credit to me

Code:

 Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
        If CheckBox1.Checked = True Then
            Green.Show()
            Green2.Show()
        Else
            CheckBox1.Checked = False
            Green.Close()
            Green2.Close()
        End If
    End Sub
End Class

really? dude i alread know how to do that....

its just now the crosshairs dont work cause crossfire patched it...

Code:

Try
            Interaction.AppActivate("crossfire") 'example game process name without .exe
            Me.TopMost = True
        Catch
            Me.TopMost = True
        End Try

I use this here

the only problem with that is that is that the current code it uses a image and with a image u cant control the opacity. Get that?

I can tell u a manual way, male another form, make the background transparent, make an image of a crosshair how you want but with transparent background also, then go to the form propr. and make it topmost, true and make it always center, also remove the tool box you dont need it.

Then just look to crossfire process or how you want and make form2.show() , simple, but works

Ok, everyone doesnt get what i want... im wanting to draw it in the middle screen, not do it a jank way... lol

Originally Posted by lucasheer715

Ok, everyone doesnt get what i want... im wanting to draw it in the middle screen, not do it a jank way... lol

Well a lot of people do it form1.show() and ect. Much simpler

Originally Posted by lucasheer715

crosshairs dont work cause crossfire patched it

Z8 didn't patch it, I still use it

Crosshair Code for VB?

Post a Reply

Similar Threads

Tags for this Thread