Visual Basic.NET - generar letras en listbox

        'Agregar de la A a la Z

        For i As Integer = Asc("A") To Asc("Z")

            ListBox.Items.Add(Chr(i))

        Next

        'Agregar de la A a la Z al azar

        Randomize()

        For i As Integer = 1 To 100

            ListBox.Items.Add(Chr(CInt(Rnd() * (Asc("Z") - Asc("A"))) + Asc("A")))

        Next

        'Agregar de la A a la Z en un orden especifico

        Dim Letras As String = "PLIKOJUMNHYTGBVFREDCXWSZAQ"

        For Each L As Char In Letras

            ListBox.Items.Add(L)

        Next