The informatic 666

sábado, 8 de octubre de 2011

Aqui mi primer video tutorial sobre visual basic 2008 como hacer un keygen

Holaa!! amigos de youtube aqui el codigo:

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        TextBox1.Text = Int(Rnd() * 5) ' donde esta el 5 pueden cambiarlo por ejemplo yo no quiero se generen 5 textos quiero que se generen 10 entonces cambio el 5 por 10'
        Select Case TextBox1.Text
            Case 0
                TextBox1.Text = "123" 'Entre las comillas ponen los texto que quieren que se generen al azar' 
            Case 1
                TextBox1.Text = "456"
            Case 2
                TextBox1.Text = "789"
            Case 3
                TextBox1.Text = "12367"
            Case 4
                TextBox1.Text = "121323"

        End Select
    End Sub
End Class