Results 1 to 6 of 6
  1. 08-31-2012 #1
    lucasheer715
    lucasheer715 is offline
    Banned
    BANNED!
    lucasheer715's Avatar
    Join Date
    Jul 2012
    Gender
    male
    Posts
    648
    Reputation
    10
    Thanks
    497
    My Mood
    Bored
    Send a message via Birdie™ to lucasheer715 United States

    Better Password Gen "Easy"

    This time make:

    12 timers "JUST A CRAPLOAD OF TIMERS"
    1 textbox "Generating box" TEXTBOX1 DEFUALT
    1 listbox "Used for alot of passwords." LISTBOX1 DEFUALT
    1 button "Button name = Generate Passwords" BUTTON 1 DEFUALT NAME

    Now double click the form, then delete everything in it and paste this

    Code:
    Public Class Form1
    Dim mainbase As Integer = 0
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Timer3.Start()
    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        mainbase = mainbase + 1
    End Sub

    Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
        If mainbase = 26 Then
            mainbase = mainbase - 26
        End If
    End Sub

    Private Sub Timer3_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer3.Tick
        TextBox1.Text = ""
        If mainbase = 0 Then
            TextBox1.Text = TextBox1.Text + ""
        ElseIf mainbase = 1 Then
            TextBox1.Text = TextBox1.Text + "A"
        ElseIf mainbase = 2 Then
            TextBox1.Text = TextBox1.Text + "B"
        ElseIf mainbase = 3 Then
            TextBox1.Text = TextBox1.Text + "C"
        ElseIf mainbase = 4 Then
            TextBox1.Text = TextBox1.Text + "D"
        ElseIf mainbase = 5 Then
            TextBox1.Text = TextBox1.Text + "E"
        ElseIf mainbase = 6 Then
            TextBox1.Text = TextBox1.Text + "F"
        ElseIf mainbase = 7 Then
            TextBox1.Text = TextBox1.Text + "G"
        ElseIf mainbase = 8 Then
            TextBox1.Text = TextBox1.Text + "H"
        ElseIf mainbase = 9 Then
            TextBox1.Text = TextBox1.Text + "I"
        ElseIf mainbase = 10 Then
            TextBox1.Text = TextBox1.Text + "J"
        ElseIf mainbase = 11 Then
            TextBox1.Text = TextBox1.Text + "K"
        ElseIf mainbase = 12 Then
            TextBox1.Text = TextBox1.Text + "L"
        ElseIf mainbase = 13 Then
            TextBox1.Text = TextBox1.Text + "M"
        ElseIf mainbase = 14 Then
            TextBox1.Text = TextBox1.Text + "N"
        ElseIf mainbase = 15 Then
            TextBox1.Text = TextBox1.Text + "O"
        ElseIf mainbase = 16 Then
            TextBox1.Text = TextBox1.Text + "P"
        ElseIf mainbase = 17 Then
            TextBox1.Text = TextBox1.Text + "Q"
        ElseIf mainbase = 18 Then
            TextBox1.Text = TextBox1.Text + "R"
        ElseIf mainbase = 19 Then
            TextBox1.Text = TextBox1.Text + "S"
        ElseIf mainbase = 20 Then
            TextBox1.Text = TextBox1.Text + "T"
        ElseIf mainbase = 21 Then
            TextBox1.Text = TextBox1.Text + "U"
        ElseIf mainbase = 22 Then
            TextBox1.Text = TextBox1.Text + "V"
        ElseIf mainbase = 23 Then
            TextBox1.Text = TextBox1.Text + "W"
        ElseIf mainbase = 24 Then
            TextBox1.Text = TextBox1.Text + "X"
        ElseIf mainbase = 25 Then
            TextBox1.Text = TextBox1.Text + "Y"
        ElseIf mainbase = 26 Then
            TextBox1.Text = TextBox1.Text + "Z"
        End If

        Timer4.Start()
        Timer3.Stop()
    End Sub

    Private Sub Timer4_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer4.Tick
        If mainbase = 0 Then
            TextBox1.Text = TextBox1.Text + ""
        ElseIf mainbase = 1 Then
            TextBox1.Text = TextBox1.Text + "A"
        ElseIf mainbase = 2 Then
            TextBox1.Text = TextBox1.Text + "B"
        ElseIf mainbase = 3 Then
            TextBox1.Text = TextBox1.Text + "C"
        ElseIf mainbase = 4 Then
            TextBox1.Text = TextBox1.Text + "D"
        ElseIf mainbase = 5 Then
            TextBox1.Text = TextBox1.Text + "E"
        ElseIf mainbase = 6 Then
            TextBox1.Text = TextBox1.Text + "F"
        ElseIf mainbase = 7 Then
            TextBox1.Text = TextBox1.Text + "G"
        ElseIf mainbase = 8 Then
            TextBox1.Text = TextBox1.Text + "H"
        ElseIf mainbase = 9 Then
            TextBox1.Text = TextBox1.Text + "I"
        ElseIf mainbase = 10 Then
            TextBox1.Text = TextBox1.Text + "J"
        ElseIf mainbase = 11 Then
            TextBox1.Text = TextBox1.Text + "K"
        ElseIf mainbase = 12 Then
            TextBox1.Text = TextBox1.Text + "L"
        ElseIf mainbase = 13 Then
            TextBox1.Text = TextBox1.Text + "M"
        ElseIf mainbase = 14 Then
            TextBox1.Text = TextBox1.Text + "N"
        ElseIf mainbase = 15 Then
            TextBox1.Text = TextBox1.Text + "O"
        ElseIf mainbase = 16 Then
            TextBox1.Text = TextBox1.Text + "P"
        ElseIf mainbase = 17 Then
            TextBox1.Text = TextBox1.Text + "Q"
        ElseIf mainbase = 18 Then
            TextBox1.Text = TextBox1.Text + "R"
        ElseIf mainbase = 19 Then
            TextBox1.Text = TextBox1.Text + "S"
        ElseIf mainbase = 20 Then
            TextBox1.Text = TextBox1.Text + "T"
        ElseIf mainbase = 21 Then
            TextBox1.Text = TextBox1.Text + "U"
        ElseIf mainbase = 22 Then
            TextBox1.Text = TextBox1.Text + "V"
        ElseIf mainbase = 23 Then
            TextBox1.Text = TextBox1.Text + "W"
        ElseIf mainbase = 24 Then
            TextBox1.Text = TextBox1.Text + "X"
        ElseIf mainbase = 25 Then
            TextBox1.Text = TextBox1.Text + "Y"
        ElseIf mainbase = 26 Then
            TextBox1.Text = TextBox1.Text + "Z"
        End If
        Timer5.Start()
        Timer4.Stop()
    End Sub

    Private Sub Timer5_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer5.Tick
        If mainbase = 0 Then
            TextBox1.Text = TextBox1.Text + ""
        ElseIf mainbase = 1 Then
            TextBox1.Text = TextBox1.Text + "A"
        ElseIf mainbase = 2 Then
            TextBox1.Text = TextBox1.Text + "B"
        ElseIf mainbase = 3 Then
            TextBox1.Text = TextBox1.Text + "C"
        ElseIf mainbase = 4 Then
            TextBox1.Text = TextBox1.Text + "D"
        ElseIf mainbase = 5 Then
            TextBox1.Text = TextBox1.Text + "E"
        ElseIf mainbase = 6 Then
            TextBox1.Text = TextBox1.Text + "F"
        ElseIf mainbase = 7 Then
            TextBox1.Text = TextBox1.Text + "G"
        ElseIf mainbase = 8 Then
            TextBox1.Text = TextBox1.Text + "H"
        ElseIf mainbase = 9 Then
            TextBox1.Text = TextBox1.Text + "I"
        ElseIf mainbase = 10 Then
            TextBox1.Text = TextBox1.Text + "J"
        ElseIf mainbase = 11 Then
            TextBox1.Text = TextBox1.Text + "K"
        ElseIf mainbase = 12 Then
            TextBox1.Text = TextBox1.Text + "L"
        ElseIf mainbase = 13 Then
            TextBox1.Text = TextBox1.Text + "M"
        ElseIf mainbase = 14 Then
            TextBox1.Text = TextBox1.Text + "N"
        ElseIf mainbase = 15 Then
            TextBox1.Text = TextBox1.Text + "O"
        ElseIf mainbase = 16 Then
            TextBox1.Text = TextBox1.Text + "P"
        ElseIf mainbase = 17 Then
            TextBox1.Text = TextBox1.Text + "Q"
        ElseIf mainbase = 18 Then
            TextBox1.Text = TextBox1.Text + "R"
        ElseIf mainbase = 19 Then
            TextBox1.Text = TextBox1.Text + "S"
        ElseIf mainbase = 20 Then
            TextBox1.Text = TextBox1.Text + "T"
        ElseIf mainbase = 21 Then
            TextBox1.Text = TextBox1.Text + "U"
        ElseIf mainbase = 22 Then
            TextBox1.Text = TextBox1.Text + "V"
        ElseIf mainbase = 23 Then
            TextBox1.Text = TextBox1.Text + "W"
        ElseIf mainbase = 24 Then
            TextBox1.Text = TextBox1.Text + "X"
        ElseIf mainbase = 25 Then
            TextBox1.Text = TextBox1.Text + "Y"
        ElseIf mainbase = 26 Then
            TextBox1.Text = TextBox1.Text + "Z"
        End If
        Timer6.Start()
        Timer5.Stop()
    End Sub

    Private Sub Timer6_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer6.Tick
        If mainbase = 0 Then
            TextBox1.Text = TextBox1.Text + ""
        ElseIf mainbase = 1 Then
            TextBox1.Text = TextBox1.Text + "A"
        ElseIf mainbase = 2 Then
            TextBox1.Text = TextBox1.Text + "B"
        ElseIf mainbase = 3 Then
            TextBox1.Text = TextBox1.Text + "C"
        ElseIf mainbase = 4 Then
            TextBox1.Text = TextBox1.Text + "D"
        ElseIf mainbase = 5 Then
            TextBox1.Text = TextBox1.Text + "E"
        ElseIf mainbase = 6 Then
            TextBox1.Text = TextBox1.Text + "F"
        ElseIf mainbase = 7 Then
            TextBox1.Text = TextBox1.Text + "G"
        ElseIf mainbase = 8 Then
            TextBox1.Text = TextBox1.Text + "H"
        ElseIf mainbase = 9 Then
            TextBox1.Text = TextBox1.Text + "I"
        ElseIf mainbase = 10 Then
            TextBox1.Text = TextBox1.Text + "J"
        ElseIf mainbase = 11 Then
            TextBox1.Text = TextBox1.Text + "K"
        ElseIf mainbase = 12 Then
            TextBox1.Text = TextBox1.Text + "L"
        ElseIf mainbase = 13 Then
            TextBox1.Text = TextBox1.Text + "M"
        ElseIf mainbase = 14 Then
            TextBox1.Text = TextBox1.Text + "N"
        ElseIf mainbase = 15 Then
            TextBox1.Text = TextBox1.Text + "O"
        ElseIf mainbase = 16 Then
            TextBox1.Text = TextBox1.Text + "P"
        ElseIf mainbase = 17 Then
            TextBox1.Text = TextBox1.Text + "Q"
        ElseIf mainbase = 18 Then
            TextBox1.Text = TextBox1.Text + "R"
        ElseIf mainbase = 19 Then
            TextBox1.Text = TextBox1.Text + "S"
        ElseIf mainbase = 20 Then
            TextBox1.Text = TextBox1.Text + "T"
        ElseIf mainbase = 21 Then
            TextBox1.Text = TextBox1.Text + "U"
        ElseIf mainbase = 22 Then
            TextBox1.Text = TextBox1.Text + "V"
        ElseIf mainbase = 23 Then
            TextBox1.Text = TextBox1.Text + "W"
        ElseIf mainbase = 24 Then
            TextBox1.Text = TextBox1.Text + "X"
        ElseIf mainbase = 25 Then
            TextBox1.Text = TextBox1.Text + "Y"
        ElseIf mainbase = 26 Then
            TextBox1.Text = TextBox1.Text + "Z"
        End If
        Timer7.Start()
        Timer6.Stop()
    End Sub

    Private Sub Timer7_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer7.Tick
        If mainbase = 0 Then
            TextBox1.Text = TextBox1.Text + ""
        ElseIf mainbase = 1 Then
            TextBox1.Text = TextBox1.Text + "1"
        ElseIf mainbase = 2 Then
            TextBox1.Text = TextBox1.Text + "2"
        ElseIf mainbase = 3 Then
            TextBox1.Text = TextBox1.Text + "3"
        ElseIf mainbase = 4 Then
            TextBox1.Text = TextBox1.Text + "4"
        ElseIf mainbase = 5 Then
            TextBox1.Text = TextBox1.Text + "5"
        ElseIf mainbase = 6 Then
            TextBox1.Text = TextBox1.Text + "6"
        ElseIf mainbase = 7 Then
            TextBox1.Text = TextBox1.Text + "7"
        ElseIf mainbase = 8 Then
            TextBox1.Text = TextBox1.Text + "8"
        ElseIf mainbase = 9 Then
            TextBox1.Text = TextBox1.Text + "9"
        ElseIf mainbase = 10 Then
            TextBox1.Text = TextBox1.Text + "10"
        ElseIf mainbase = 11 Then
            TextBox1.Text = TextBox1.Text + "11"
        ElseIf mainbase = 12 Then
            TextBox1.Text = TextBox1.Text + "12"
        ElseIf mainbase = 13 Then
            TextBox1.Text = TextBox1.Text + "13"
        ElseIf mainbase = 14 Then
            TextBox1.Text = TextBox1.Text + "14"
        ElseIf mainbase = 15 Then
            TextBox1.Text = TextBox1.Text + "15"
        ElseIf mainbase = 16 Then
            TextBox1.Text = TextBox1.Text + "16"
        ElseIf mainbase = 17 Then
            TextBox1.Text = TextBox1.Text + "17"
        ElseIf mainbase = 18 Then
            TextBox1.Text = TextBox1.Text + "18"
        ElseIf mainbase = 19 Then
            TextBox1.Text = TextBox1.Text + "19"
        ElseIf mainbase = 20 Then
            TextBox1.Text = TextBox1.Text + "20"
        ElseIf mainbase = 21 Then
            TextBox1.Text = TextBox1.Text + "21"
        ElseIf mainbase = 22 Then
            TextBox1.Text = TextBox1.Text + "22"
        ElseIf mainbase = 23 Then
            TextBox1.Text = TextBox1.Text + "23"
        ElseIf mainbase = 24 Then
            TextBox1.Text = TextBox1.Text + "24"
        ElseIf mainbase = 25 Then
            TextBox1.Text = TextBox1.Text + "25"
        ElseIf mainbase = 26 Then
            TextBox1.Text = TextBox1.Text + "26"
        End If
        Timer8.Start()
        Timer7.Stop()
    End Sub

    Private Sub Timer8_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer8.Tick
        If mainbase = 0 Then
            TextBox1.Text = TextBox1.Text + ""
        ElseIf mainbase = 1 Then
            TextBox1.Text = TextBox1.Text + "1"
        ElseIf mainbase = 2 Then
            TextBox1.Text = TextBox1.Text + "2"
        ElseIf mainbase = 3 Then
            TextBox1.Text = TextBox1.Text + "3"
        ElseIf mainbase = 4 Then
            TextBox1.Text = TextBox1.Text + "4"
        ElseIf mainbase = 5 Then
            TextBox1.Text = TextBox1.Text + "5"
        ElseIf mainbase = 6 Then
            TextBox1.Text = TextBox1.Text + "6"
        ElseIf mainbase = 7 Then
            TextBox1.Text = TextBox1.Text + "7"
        ElseIf mainbase = 8 Then
            TextBox1.Text = TextBox1.Text + "8"
        ElseIf mainbase = 9 Then
            TextBox1.Text = TextBox1.Text + "9"
        ElseIf mainbase = 10 Then
            TextBox1.Text = TextBox1.Text + "10"
        ElseIf mainbase = 11 Then
            TextBox1.Text = TextBox1.Text + "11"
        ElseIf mainbase = 12 Then
            TextBox1.Text = TextBox1.Text + "12"
        ElseIf mainbase = 13 Then
            TextBox1.Text = TextBox1.Text + "13"
        ElseIf mainbase = 14 Then
            TextBox1.Text = TextBox1.Text + "14"
        ElseIf mainbase = 15 Then
            TextBox1.Text = TextBox1.Text + "15"
        ElseIf mainbase = 16 Then
            TextBox1.Text = TextBox1.Text + "16"
        ElseIf mainbase = 17 Then
            TextBox1.Text = TextBox1.Text + "17"
        ElseIf mainbase = 18 Then
            TextBox1.Text = TextBox1.Text + "18"
        ElseIf mainbase = 19 Then
            TextBox1.Text = TextBox1.Text + "19"
        ElseIf mainbase = 20 Then
            TextBox1.Text = TextBox1.Text + "20"
        ElseIf mainbase = 21 Then
            TextBox1.Text = TextBox1.Text + "21"
        ElseIf mainbase = 22 Then
            TextBox1.Text = TextBox1.Text + "22"
        ElseIf mainbase = 23 Then
            TextBox1.Text = TextBox1.Text + "23"
        ElseIf mainbase = 24 Then
            TextBox1.Text = TextBox1.Text + "24"
        ElseIf mainbase = 25 Then
            TextBox1.Text = TextBox1.Text + "25"
        ElseIf mainbase = 26 Then
            TextBox1.Text = TextBox1.Text + "26"
        End If

        Timer9.Start()
        Timer8.Stop()
    End Sub

    Private Sub Timer9_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer9.Tick
        If mainbase = 0 Then
            TextBox1.Text = TextBox1.Text + ""
        ElseIf mainbase = 1 Then
            TextBox1.Text = TextBox1.Text + "1"
        ElseIf mainbase = 2 Then
            TextBox1.Text = TextBox1.Text + "2"
        ElseIf mainbase = 3 Then
            TextBox1.Text = TextBox1.Text + "3"
        ElseIf mainbase = 4 Then
            TextBox1.Text = TextBox1.Text + "4"
        ElseIf mainbase = 5 Then
            TextBox1.Text = TextBox1.Text + "5"
        ElseIf mainbase = 6 Then
            TextBox1.Text = TextBox1.Text + "6"
        ElseIf mainbase = 7 Then
            TextBox1.Text = TextBox1.Text + "7"
        ElseIf mainbase = 8 Then
            TextBox1.Text = TextBox1.Text + "8"
        ElseIf mainbase = 9 Then
            TextBox1.Text = TextBox1.Text + "9"
        ElseIf mainbase = 10 Then
            TextBox1.Text = TextBox1.Text + "10"
        ElseIf mainbase = 11 Then
            TextBox1.Text = TextBox1.Text + "11"
        ElseIf mainbase = 12 Then
            TextBox1.Text = TextBox1.Text + "12"
        ElseIf mainbase = 13 Then
            TextBox1.Text = TextBox1.Text + "13"
        ElseIf mainbase = 14 Then
            TextBox1.Text = TextBox1.Text + "14"
        ElseIf mainbase = 15 Then
            TextBox1.Text = TextBox1.Text + "15"
        ElseIf mainbase = 16 Then
            TextBox1.Text = TextBox1.Text + "16"
        ElseIf mainbase = 17 Then
            TextBox1.Text = TextBox1.Text + "17"
        ElseIf mainbase = 18 Then
            TextBox1.Text = TextBox1.Text + "18"
        ElseIf mainbase = 19 Then
            TextBox1.Text = TextBox1.Text + "19"
        ElseIf mainbase = 20 Then
            TextBox1.Text = TextBox1.Text + "20"
        ElseIf mainbase = 21 Then
            TextBox1.Text = TextBox1.Text + "21"
        ElseIf mainbase = 22 Then
            TextBox1.Text = TextBox1.Text + "22"
        ElseIf mainbase = 23 Then
            TextBox1.Text = TextBox1.Text + "23"
        ElseIf mainbase = 24 Then
            TextBox1.Text = TextBox1.Text + "24"
        ElseIf mainbase = 25 Then
            TextBox1.Text = TextBox1.Text + "25"
        ElseIf mainbase = 26 Then
            TextBox1.Text = TextBox1.Text + "26"
        End If

        Timer10.Start()
        Timer9.Stop()
    End Sub

    Private Sub Timer10_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer10.Tick
        If mainbase = 0 Then
            TextBox1.Text = TextBox1.Text + ""
        ElseIf mainbase = 1 Then
            TextBox1.Text = TextBox1.Text + "A"
        ElseIf mainbase = 2 Then
            TextBox1.Text = TextBox1.Text + "B"
        ElseIf mainbase = 3 Then
            TextBox1.Text = TextBox1.Text + "C"
        ElseIf mainbase = 4 Then
            TextBox1.Text = TextBox1.Text + "D"
        ElseIf mainbase = 5 Then
            TextBox1.Text = TextBox1.Text + "E"
        ElseIf mainbase = 6 Then
            TextBox1.Text = TextBox1.Text + "F"
        ElseIf mainbase = 7 Then
            TextBox1.Text = TextBox1.Text + "G"
        ElseIf mainbase = 8 Then
            TextBox1.Text = TextBox1.Text + "H"
        ElseIf mainbase = 9 Then
            TextBox1.Text = TextBox1.Text + "I"
        ElseIf mainbase = 10 Then
            TextBox1.Text = TextBox1.Text + "J"
        ElseIf mainbase = 11 Then
            TextBox1.Text = TextBox1.Text + "K"
        ElseIf mainbase = 12 Then
            TextBox1.Text = TextBox1.Text + "L"
        ElseIf mainbase = 13 Then
            TextBox1.Text = TextBox1.Text + "M"
        ElseIf mainbase = 14 Then
            TextBox1.Text = TextBox1.Text + "N"
        ElseIf mainbase = 15 Then
            TextBox1.Text = TextBox1.Text + "O"
        ElseIf mainbase = 16 Then
            TextBox1.Text = TextBox1.Text + "P"
        ElseIf mainbase = 17 Then
            TextBox1.Text = TextBox1.Text + "Q"
        ElseIf mainbase = 18 Then
            TextBox1.Text = TextBox1.Text + "R"
        ElseIf mainbase = 19 Then
            TextBox1.Text = TextBox1.Text + "S"
        ElseIf mainbase = 20 Then
            TextBox1.Text = TextBox1.Text + "T"
        ElseIf mainbase = 21 Then
            TextBox1.Text = TextBox1.Text + "U"
        ElseIf mainbase = 22 Then
            TextBox1.Text = TextBox1.Text + "V"
        ElseIf mainbase = 23 Then
            TextBox1.Text = TextBox1.Text + "W"
        ElseIf mainbase = 24 Then
            TextBox1.Text = TextBox1.Text + "X"
        ElseIf mainbase = 25 Then
            TextBox1.Text = TextBox1.Text + "Y"
        ElseIf mainbase = 26 Then
            TextBox1.Text = TextBox1.Text + "Z"
        End If
        Timer11.Start()
        Timer10.Stop()
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Timer1.Interval = 10
        Timer2.Interval = 1
        Timer3.Interval = 100
        Timer4.Interval = 100
        Timer5.Interval = 100
        Timer6.Interval = 100
        Timer7.Interval = 100
        Timer8.Interval = 100
        Timer9.Interval = 100
        Timer10.Interval = 100
        Timer11.Interval = 100
        Timer12.Interval = 20600
        Timer1.Enabled = True
        Timer2.Enabled = True
        Timer3.Enabled = False
        Timer4.Enabled = False
        Timer5.Enabled = False
        Timer6.Enabled = False
        Timer7.Enabled = False
        Timer8.Enabled = False
        Timer9.Enabled = False
        Timer10.Enabled = False
        Timer11.Enabled = False
        Timer12.Enabled = False
    End Sub

    Private Sub Timer11_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer11.Tick
        ListBox1.Items.Add(TextBox1.Text)
        TextBox1.Text = ""
        Timer12.Start()
        Timer3.Start()
        Timer11.Stop()
    End Sub

    Private Sub Timer12_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer12.Tick
        Timer3.Enabled = False
        Timer4.Enabled = False
        Timer5.Enabled = False
        Timer6.Enabled = False
        Timer7.Enabled = False
        Timer8.Enabled = False
        Timer9.Enabled = False
        Timer10.Enabled = False
        Timer11.Enabled = False
        ListBox1.Items.Add(TextBox1.Text)
        TextBox1.Text = ""
        Timer12.Enabled = False
    End Sub
End Class
    Hope you like and "Don't add me to credits, i don't rlly need it ". "If you want to u can "
    Reply With Quote Reply With Quote

  2. The Following 3 Users Say Thank You to lucasheer715 For This Useful Post:

    3D (08-31-2012),itsmebadman (08-31-2012),Rory (08-31-2012)
  3. 08-31-2012 #2
    itsmebadman
    itsmebadman is offline
    Banned
    BANNED!
    itsmebadman's Avatar
    Join Date
    Mar 2011
    Gender
    male
    Location
    In your mums bed!
    Posts
    929
    Reputation
    32
    Thanks
    2,388
    My Mood
    Buzzed
    Send a message via Birdie™ to itsmebadman United Kingdom PheoniX-aS1 Fuck I aint Got One Shit WII zRedline
    Your one is kind of long init ! My one is kind of short lol. But you will get a THANKS!
    Reply With Quote Reply With Quote
  4. 08-31-2012 #3
    lucasheer715
    lucasheer715 is offline
    Threadstarter
    Banned
    BANNED!
    lucasheer715's Avatar
    Join Date
    Jul 2012
    Gender
    male
    Posts
    648
    Reputation
    10
    Thanks
    497
    My Mood
    Bored
    Send a message via Birdie™ to lucasheer715 United States
    Ya the big code makes the file bigger I like my files big . Well anyway i use you'res and i like it soo much! How do u make ghost design i love it!

    ---------- Post added at 08:13 PM ---------- Previous post was at 08:11 PM ----------

    Mine is just bootlegged lol
    Reply With Quote Reply With Quote
  5. 08-31-2012 #4
    itsmebadman
    itsmebadman is offline
    Banned
    BANNED!
    itsmebadman's Avatar
    Join Date
    Mar 2011
    Gender
    male
    Location
    In your mums bed!
    Posts
    929
    Reputation
    32
    Thanks
    2,388
    My Mood
    Buzzed
    Send a message via Birdie™ to itsmebadman United Kingdom PheoniX-aS1 Fuck I aint Got One Shit WII zRedline
    Ill make one for you : and i will give you the ghost file and everything init
    Reply With Quote Reply With Quote
  6. 08-31-2012 #5
    Rory
    Rory is offline
    Banned
    BANNED!
    Rory's Avatar
    Join Date
    Aug 2012
    Gender
    male
    Location
    IN MPGH
    Posts
    1,872
    Reputation
    10
    Thanks
    181
    My Mood
    Cold
    Send a message via Birdie™ to Rory Qatar memoz1999
    Thanks Going To Relase Mine 2morrow Credits Goes To U OFC
    Reply With Quote Reply With Quote
  7. 08-31-2012 #6
    itsmebadman
    itsmebadman is offline
    Banned
    BANNED!
    itsmebadman's Avatar
    Join Date
    Mar 2011
    Gender
    male
    Location
    In your mums bed!
    Posts
    929
    Reputation
    32
    Thanks
    2,388
    My Mood
    Buzzed
    Send a message via Birdie™ to itsmebadman United Kingdom PheoniX-aS1 Fuck I aint Got One Shit WII zRedline
    DW you will get my thanks
    Reply With Quote Reply With Quote
« Previous Thread | Next Thread »

Similar Threads

  1. Favorite Quote
    By EleMentX in forum Spammers Corner
    Replies: 13
    Last Post: 01-04-2020, 04:36 PM
  2. MPGH PM Chat Quote Thread
    By arunforce in forum Entertainment
    Replies: 39
    Last Post: 05-12-2013, 08:24 PM
  3. MPGH AIM Chat Quote Thread
    By ace76543 in forum Entertainment
    Replies: 30
    Last Post: 09-25-2011, 12:14 PM
  4. MPGH IRC Chat Quote Thread
    By i eat trees in forum Entertainment
    Replies: 746
    Last Post: 07-02-2011, 10:07 PM
  5. Quote my login pls waht have i to do better
    By jany in forum CrossFire Mods & Rez Modding
    Replies: 5
    Last Post: 10-07-2010, 09:48 AM