crear un progama

uego al timer lo abres dándole un click y en la parte donde dice Interval ponen la velocidad en que desean su autoclick. Después de haber hecho todo eso clickeas dos veces en Form1 y aparecerá el formato de códigos, en donde ahora debes poner algunos códigos.

Dirígete en donde dice ‘Public Class’ Copias y pegas estos códigos o si lo deceas los escribes; Private Declare Sub mouse_event Lib "user32" (ByVal dwflags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cbuttons As Long, ByVal dwExtraInfo As Long)
Private Const mouseclickup = 4
Private Const mouseclickdown = 2

Despues de haber puesto esto vuelves al diseño del Form1 y le das dobleclick al Timer y escribes o pegas esto:

Luego vuelves nuevamente al diseño del Autoclick y le das dobleclick al Boton1 y escribes o pegas esto:

Timer1.Start()

Despues de haber hecho esto vuelves al Form1 y le das dobleclick ahora al Boton2 y escribes o pegas esto:

Timer1.Stop()

Ahora para probar tu autoclick vas a la parte superior del programa y le das al icono Verde con forma de triangulo invertido. Si has hecho todo bien se te abrirá tu autoclick y estará listo para que lo uses.

*Aviso: Si quieres mayor velocidad en tu autoclick dale click en el timer y ve la parte derecha del programa en donde dice "Interval" y ahy cambia el numero al que decees segun la velocidad que quieras (Mientras menor sea, mas rapido)*               

Codigos:
Boton Start: Timer1.Start

Boton Stop: Timer1.Stop

Boton TestClick: Textbox1.Text = Textbox1.Text + 1

Radio Button Normal: Timer1.Interval = (100)

Radio Button Rapido: Timer1.Interval = (10)

Radio Button Mas Rapido: TImer1.Interval = (1)

Timer1:Windows.Forms.Cursor.Position = New System.Drawing.Point(Windows.Forms.Cursor.Position)
mouse_event(&H2, 0, 0, 0, 1)
mouse_event(&H4, 0, 0, 0, 1)

Boton Test Click: Textbox1.Text = Textbox1.Text + 1

Declaracion:Declare Sub mouse_event Lib "user32" Alias "mouse_event" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)

Timer2:hora clicais en timer2 i pegais esto:

Dim hotkey As Boolean
  hotkey = GetAsyncKeyState(Keys.F1)
If hotkey = True Then Timer1.Start()
Dim hotkey1 As Boolean
  hotkey1 = GetAsyncKeyState(Keys.F2)
If hotkey1 = True Then Timer1.Stop()