-
MS-DOS.
User deleted
BuonaSera a tutti. Dato che in questa Sezione non si accenna alla parola Flood, ho intenzione di postarvi una guida su come creare un Flooder con variatore di velocità.
Prerequisiti Fondamentali :
- Visual Basic 2008 Express Edition, scaricabile da qui :http://www.microsoft.com/express/vb/Default.aspx
- Un Pc (AsD)
- Un pò di pazienza.
Svolgimento :
Scaricate (selezionando ovviamente la lingua italiana), ed installate Visual Basic 2008 Express Edition. Appena finita l'installazione riavviate il PC. Riavviato il PC aprite il Programma, e cliccate tu >File >Nuovo Progetto. Adesso vi verranno elencati i vari modelli del Windows Form, voi lasciate "Applicazione Windows Form". Successivamente cliccate su Ok.
Bene, avete creato il Windows Form. Se volete personalizzarlo, cioè anzichè avere in alto la scritta "Form1", cliccate direttamente sulla barra dove c'è la scritta, e a sinistra dove ci sono elencate tutte le proprietà del Form, andate nella prima, dove c'è scritto : (Name). Accanto c'è la scritta Form1. Cancellatela e scrivete quello che volete, ad esempio : "Creato da PincoPallino".
Adesso vediamo quali strumenti inserire nel Form :
- 1 TextBox
- 1 TrackBack
- 2 Button
- 2 Timer
Posizionateli nel Form in questo modo :
Al solito, se volete modificare il titolo dei Bottoni cliccateci sopra una volta, ma stavolta andrete a cercare la voce : Text.
Nella TextBox non scrivete niente, lasciatela in bianco.
Cliccate 1 volta sul primo Timer, e assicuratevi che abbia queste caratteristiche :
Enabled : False
e
Interval = 100
Fate lo stesso nel secondo Timer. Adesso cliccate due volte sul primo Bottone ed inserite il seguente codice :CODICETrackBar1.Maximum = 10
TrackBar1.Minimum = 0
If TrackBar1.Value = 1 Then
Timer1.Interval = 20000
Timer1.Enabled = True
ElseIf TrackBar1.Value = 2 Then
Timer1.Interval = 1700
Timer1.Enabled = True
ElseIf TrackBar1.Value = 3 Then
Timer1.Interval = 1500
Timer1.Enabled = True
ElseIf TrackBar1.Value = 4 Then
Timer1.Interval = 1200
Timer1.Enabled = True
ElseIf TrackBar1.Value = 5 Then
Timer1.Interval = 1000
Timer1.Enabled = True
ElseIf TrackBar1.Value = 6 Then
Timer1.Interval = 800
Timer1.Enabled = True
ElseIf TrackBar1.Value = 7 Then
Timer1.Interval = 500
Timer1.Enabled = True
ElseIf TrackBar1.Value = 8 Then
Timer1.Interval = 200
Timer1.Enabled = True
ElseIf TrackBar1.Value = 9 Then
Timer1.Interval = 100
Timer1.Enabled = True
ElseIf TrackBar1.Value = 10 Then
Timer1.Interval = 1
Timer1.Enabled = True
End If
Adesso cliccate 2 volte sul secondo Bottone, ed inserite questo codice :CODICETimer2.Enabled = False
Fonte : Ovviamente Mia.
Ps : Spero vi sia utile
Edited by MS-DOS - 29/12/2009, 01:48.