elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Curso de javascript por TickTack


  Mostrar Temas
Páginas: [1]
1  Programación / .NET (C#, VB.NET, ASP) / convertir numero a cadena alafabetica en: 20 Mayo 2013, 12:17 pm
Hola a todos!

Me ha surgido la necesidad den mi programa de convertir un numero sea el que sea a una cadena alfabética. es decir
1->a
2->b
.
.
.
555123->asakdads-> o la que le corresponda (he puesto un numero al azar)

Y la verdad es que llevo horas dándole duro a la función y no consigo nada bueno, lo único que e conseguido ahora es que genere bien hasta la ZZ, ya que cuando pasa a AAA solo avanza la primera y última letra, es decir nunca cambia la de en medio, ademas de que nunca pasa de esas 3 letras.

Os pongo lo que tengo por si podéis ayudarme o indicarme un poco por donde tirar

Saludos y gracias

Código:
  Private Function prueba(ByVal num As Integer) As String
        Dim listaLetrasArray As String() = {"a", "b", "c", "d", "e", "f", "g", "h", "i", "j", "k", "l", "m", "n", "o", "p", "q", "r", "s", "t", "u", "v", "w", "x", "y", "z"}

        If (num > 25) Then

            Dim numeroentero As Integer = (num \ 26) - 1
            If (numeroentero > 25) Then
                Dim chi As Integer = numeroentero \ 26
                chi = numeroentero / 26
                numeroentero = numeroentero - (26 * (numeroentero \ 26))
                num = num - (26 * ((num \ 26) - 1))
            Else
                num = num - (26 * (num \ 26))
            End If

            Return listaLetrasArray(numeroentero) & prueba(num)
        Else

            Return listaLetrasArray(num)

        End If

    End Function
Páginas: [1]
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines