MPGHThe Dark Arts
RegisterLog in

Password Generator "EASY"

Posts 1–7 of 7 · Page 1 of 1
Password Generator "EASY"
This is a "EASY" Tutorial, Meaning Ill let you make everything and then copy paste the code. This is literally for all you people who only know the basics of visual basic. Something i wrote myself, didn't take too long, like around 10 minuets cause I thought u could use OR's And i got a crap load of errors. Please Make this better and do everything you want with it! IT WAS EASY TO MAKE AND YOU DON'T HAVE TO ADD ME TO ANY CREDITS

Things Needed :
1xTextbox "Text will be auto"
1xButton "Name = Generate Password"
10xTimer

Double Click form and paste this Code"

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
        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
        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
        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

        Timer10.Stop()
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        TextBox1.Text = "Credits : Lucasheer715 - MPGH"
        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
        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
    End Sub
End Class
If this Helped please click the "Thanks" button and i will do more in the future.[COLOR="Silver"]

I didn't use any harder methods cause those are harder and are harder to understand
#1 · edited ·
thx bro u helped me so much
#2 ·
No problem I knew people were having trouble with this cause all the other tutorials like flame's are something alot of people don't get. Simple i "easied" it down.
#3 ·
good job
#4 ·
Thanks Someone like you could do a much better job though
#5 ·
Ya but its a source code right? So does that count?
#7 ·
Posts 1–7 of 7 · Page 1 of 1

Post a Reply

Similar Threads

Open Source Releases[Visual Basic] Password GeneratorNextGen1NextGen1 22 Visual Basic ProgrammingPassword Generator, Saver, and En/DecrypterLollandLolland 3 C++/C Programming[C/C++] Simple Password Generatorscimmyboy 15 Visual Basic Programming[Release] Password Generator Source Codeflameswor10flameswor10 14

Tags for this Thread

None

Talk with us