Tema: Ayuda
Ver Mensaje Individual
  #2 (permalink)  
Antiguo 28/12/2007, 06:02
Insomnia
 
Fecha de Ingreso: noviembre-2005
Mensajes: 751
Antigüedad: 18 años, 6 meses
Puntos: 13
Re: Ayuda

Hola

A ver si este código te sirve para adaptarlo a tus necesidades:

Código:
Dim letra As String
letra = "A"

For i = 1 To 55
    Text1.Text = Text1.Text & " " & letra
    letra = Chr(Asc(letra) + 1)
    If letra = "[" Then letra = "A"
Next i
--Saludos--