|
|
|
|
|
Encriptador de mensajes Visual Basic |
|
| Hola, soy novato en Visual Basic (2010 Express), estoy haciendo una especie de "encriptador" de mensajes sencillo.
La idea es que sustituya las letras del abecedario por números, por ejemplo: a=1, b=2, c=3, etc. Y también al revéz: 1=a, 2=b, 3=c, etc. El programa que hice me convierte letras a números perfectamente, pero tengo un pequeño problema al hacer la operación contraria, cuando intento convertir números en letras, el programa toma los dígitos por separado, ejemplo: Encriptando: Escribo la letra "L" y me la convierte en un "12" (Hasta ahí todo bien) Desencriptando: Cuando escribo "12" no me devuelve la "L" sino que toma el 1 y 2 por separado y escribe "AB" ¿Cómo puedo solucionar esto? Espero puedan ayudarme, gracias. |
#1   Godmol (44.456 Posts) - 11/04/2012 09:46:15 | ||
| Hola genkidan, evidentemente no te funciona porque no lo haces de manera correcta,si te transforma la \ "L\ " en 12, ese 12 debes tratarlo como valor numérico ya que si lo tratas como cadena de caracteres te tomará el 1 y el 2 por separado.
Te comentaré que no conozco Visual Basic, pero si he trabajado bastante con las versiones de Basic antiguas (GWBasic QBasic, Basica, etc), y cuando he tenido que hacer ese tipo de historias lo he realizado usando vectores de tal manera que la letra en cuestión está asociado a una posición en el vector de tal forma que la trasnformación es bastante más rápida SAlu2 | ||
| Bajar - Subir | ||
#2  genkidan (20 Posts) - 12/04/2012 03:27:24 | ||
| Gracias por responder, entiendo que son dos tipos de valores distintos. Yo estoy utilizando la instrucción \ "Replace\ " para reemplazar una letra por un número, sería esto:
Text1.Text = Replace(Text1.Text, \ "L\ ", \ "12\ ") Y para la operación contraria, escribí: Text1.Text = Replace(Text1.Text, \ "12\ ", \ "L\ ") ¿Cómo hay que indicarle a la instrucción \ "Replace\ " que tome el 12 como un único valor numérico en lugar de una cadena de dos caracteres? | ||
| Bajar - Subir |
Temas relacionados: |
| Sin usar vb(visual basic) quisiera mandar mensajes con el comando net send | |
| Windows XP (5.1) 32b, Chrome 18.0 en el trabajo, nesesito mandar mensajes de manera rapida a otra computadora ,ya voy, bueno lo que quisiera hacer es en mi escritorio poner un acceso directo del cmd con el ip de la computador a ya programado es decir abrir el acceso directo y textear y mandar y ya, como le hago ... | |
| Visual basic | |
| Como se personaliza visual basic paso a paso. como se programa en visual basic? Windows 7 (6.1) 32b, Firefox 37.0. ... | |
| Visual basic 6.0 | |
| S.O. Windows 7 Ultimate Hola a todos estoy tratando de instalar Visual Basic en mi ordenador, pero al tener windows 7 como S.O. no puedo instalar dicho lenguaje. Necesitaria que me recomienden alguna version para instalar me han dicho que Visual Basic 6.0 puede llegar a ser compatible con Windows 7, de ser así pasenme algun link de descarga se los agradeceria. Desde ya mucas gracias!!! ... | |
| Visual basic 2008 | |
| De donde me podria descargar el visual basic 2008. Gracias por sus respuestas. ... | |
| Pregunta Visual Basic 6 | |
| Windows XP (5.1) 32b, Chrome 26.0 Hola, estoy comensando en el mundo de programacion, al principio use DFD para crear mis primeros programas, ahora estoy iniciando a trabajar con VB6, y me en cuantro pasando un programa de DFD a VB6, el programa recabe la cantidad de monedas de un tipo, y devuelve el dinero total que se posee. El problema esta en mi linea de codigos que me da el error \"Error de compilacion, el argumento no es opcional\" esto se ve asi: Private Sub CmdCalcular_Click() TxtboxResultado.Text = (Lect1 * 1000) + (Lect... | |
| Foros: Mensajes |
| Subir |
Foros: |
|