El post que buscas se encuentra eliminado, pero este también te puede interesar

Generar letras y N° aleatorios con Visual Basic [VB.NET]

Anuncios

Generar letras aleatorias en VB.NET 2008, 2010 en adelante..

Controles necesarios:

1 Boton
1 TextBox


Código para generar letras (explicado)

Private Function GenerarCadena(ByVal numeroCaracteres As Integer) As String

' Dimensionamos un array para almacenar tanto las
' letras mayúsculas como minúsculas (52 letras).
'
Dim letras(51) As String

' Rellenamos el array.
'
Dim n As Integer
For item As Int32 = 65 To 90
letras(n) = Chr(item)
letras(n + 1) = letras(n).ToLower
n += 2
Next

Dim cadenaAleatoria As String = String.Empty

' Iniciamos el generador de números aleatorios
'
Dim rnd As New Random(DateTime.Now.Millisecond)

For n = 0 To numeroCaracteres

Dim numero As Integer = rnd.Next(0, 51)

cadenaAleatoria &= letras(numero)

Next

Return cadenaAleatoria

End Function


En el boton ponemos el siguiente codigo:

TextBox1.Text = GenerarCadena(24)


Vamos a explicar este ultimo codigo..

TextBox1.Text = GenerarCadena(24)


24 es la cantidad de números y letras aleatorias que queremos generar si queremos generar solo 3 le ponemos 4 siempre sumando un numero mas al que queremos.

Anuncios

0 comentarios - Generar letras y N° aleatorios con Visual Basic [VB.NET]

Los comentarios se encuentran cerrados