Haciendo un Flooder con Visual Basic

Hoy quería enseñar un poco el tema de los sendkeys para quien sabe jaja uso personal... y pues que mejor manera que empesar con un flooder...


Bueno primero que todo habran su visual basic 6 y pongan lo siguiente:

Private Declare Function GetKeyPress Lib "user32" Alias "GetAsyncKeyState" (ByVal key As Long) As Integer

no hagan caso al code jaja solo ponganlo...


ahora pues les voy a enseñar la parte importante... vamos a poner en el form un timer y vamos a poner en el form_load lo siguiente:

Timer1.Interval = "100"

tambien lo pueden hacer desde las propiedades del timer si gustan...

Ahora dentro del Timer1_Timer pondrán:

If GetKeyPress(vbKeyF1) Then
SendKeys (Text1.Text) + ("{enter}")
End If

y ya tenemos listo casi todo...

con este code al apretar F1 pues haran que envie multiples veces lo que tengan escrito en el textbox1, ustedes lo pueden cambiar, puede ser control alt lo que quieran solo investiguen un poco mas del tema y podrán hacer maravillas...



Saludos
Dr.White