Come creare un Flood

Questo Flood può essere usato in qualsiasi chat ma MSN è sempre la preferita… Mi auguro che nessuno di voi faccia Lamerate …
PER POTER FARE CIO’ BISOGNA SEMPRE APRIRE UNA FINESTRA DI MSN PER FAR SCRIVERE IL CODICE!!
Per Poter creare questo Programma bisogna inserire nella form 1 CommandButton,2 TextBox,2 Label e 2 Timer
In Un label scrivete Testo Flood e lo posizionate sopra al Text1 che conterra il testo del flood
Nell’altro Label scrivete Numero Flood e lo posizionate sopra al Text2 il quale conterrà il numero di volte che dovrà essere mandato lo stesso messaggio.
Nel CommandButton scrivete Flooda
In Timer1 mettete Enabled : False e interval: 1
In Timer2 mettete Enabled : False e interval: 5000
CODE:

Dim i As Integer

Private Sub Command1_Click()
Timer2.Enabled = True
End Sub

Private Sub Form_Load()
i = 0
End Sub

Private Sub Timer1_Timer()
i = i + 1
SendKeys (Text1.Text)
SendKeys (“{ENTER}”)
If i = Text2.Text Then
Timer1.Enabled = False
i = 0
End If
End Sub
Private Sub Timer2_Timer()
Timer1.Enabled = True
Timer2.Enabled = False
End Sub
download

2 Risposte to “Come creare un Flood”

  1. ago1980's fan Says:

    nel command1_click mettici anche
    Me.windowstate = 1
    in questo modo la funestra si riduce a icona, altrimenti il flood nn funziona😛

  2. DANIELE Says:

    Me.windowstate = 1

Lascia un commento

Inserisci i tuoi dati qui sotto o clicca su un'icona per effettuare l'accesso:

Logo WordPress.com

Stai commentando usando il tuo account WordPress.com. Chiudi sessione / Modifica )

Foto Twitter

Stai commentando usando il tuo account Twitter. Chiudi sessione / Modifica )

Foto di Facebook

Stai commentando usando il tuo account Facebook. Chiudi sessione / Modifica )

Google+ photo

Stai commentando usando il tuo account Google+. Chiudi sessione / Modifica )

Connessione a %s...

%d blogger cliccano Mi Piace per questo: