Test Foro de elhacker.net SMF 2.1

Programación => .NET (C#, VB.NET, ASP) => Programación General => Programación Visual Basic => Mensaje iniciado por: kakinets en 2 Julio 2005, 19:48 PM

Título: Como pasar de letras a numeros
Publicado por: kakinets en 2 Julio 2005, 19:48 PM
Hola a todos a ver q tal me explico...
esta es mi situasion.....
Tengo un tex llamado Text1 otro llamado Text2 y un boton llamado cmd

Lo q yo quiero es q cundo ponga en el tex1 la letra R y presione el boton pase al Text2 cun el numero 1 y hasi con todas las letras hasta terminar....

PD:seria como un codificasion

gracias a Todos ;)
Título: Re: Como pasar de letras a numeros
Publicado por: programatrix en 2 Julio 2005, 20:26 PM
No se mi bien lo que quieres hacer pero bueno.
dim r as string
r = "1"
if text1 = "r" then
text2 = r
end if

Creo que es esto lo que quieres hacer mas o menos, no??
Título: Re: Como pasar de letras a numeros
Publicado por: maxnet en 2 Julio 2005, 21:05 PM

hola
puedes usar el codigo ascii de cada letra





dim a as integer
text2.text=""
for a=1 to len(text1.text)
text2.text=text2.text & asc(mid(text1.text,a,1)) & ""
next a