Creando un Random de string o texto aleatorio

Hola amigos, aqui teneis el ejemplo de como crear un random de string o texto aleatorio.

la verdad es que es muy muy simple primero os dejo el video como siempre y a continuacion el codigo.

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim caracteres As String = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefg0123456789?#@¿!-+"
        Dim Longitud As Integer = Me.NumericUpDown1.Value
        Dim RND As New Random
        Dim cadena As String = ""
        Do Until cadena.Length = Longitud
            cadena += caracteres.ToCharArray(RND.Next(0, caracteres.Length), 1)
        Loop
        Me.Label1.Text = cadena
    End Sub

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

Dim caracteres As String = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefg0123456789?#@¿!-+"

Dim Longitud As Integer = Me.NumericUpDown1.Value

Dim RND As New Random

Dim cadena As String = ""

Do Until cadena.Length = Longitud

cadena += caracteres.ToCharArray(RND.Next(0, caracteres.Length), 1)

Loop

Me.Label1.Text = cadena

End Sub

Lo puedes u

Creando un Random de string o texto aleatorio

Deja un comentario Cancelar respuesta