buenas...
soy nuevisimo en esto y me preguntaba como puedo hacer que si tengo en un textbox una letra... en el de abajo me salga otra cuando le doy crear...
gracias de antemano
salu2
Cuando le das a crear? Crear que cosa?
Esplicate mejor por favor.-
es q... inserto un texto cualquiera en un texbox... y cuando doy click en un boton (crear) en otro textbox quiero q me salga... si puse "A" en el primero en el de abajo q salga "as" por ejemplo, gracias
salu2
Private Sub command1_click()
text2.text= lcase(text1.text & "s")
end sub
Con la informacion que nos das es lo mas que te puedo ayudar
um... no creo q es lo que busco... lo voy a explicar mejor...
en text1 (llamemoslo asi) pongo "ast"
y quiero que cada uno de estos caracteres sean modificados y enviados al text2 (el otro textbox) suponiendo que "a" debe ser modificado a "%$" y "s" a "&/", "t" a "="
tons si pongo en el primero... "ast" en el segundo aparece "%$&/="
se entiende?, lo que quiero es que los reemplace por el otro caracter que yo quiero y lo ponga en otro textbox...
gracias por la paciencia xD
salu2
lo que tu kieres es cifrar el texto. puedes usar la funcion XOR o MD5 que son las mas usuales, puedes encontrar info de estas funciones en el msdn de visual
nah.. lo que yo quiero es simplemente pasar a otro caracter una letra que se escriba en el primer textbox... vi unos ejemplos que pueden ayudarme pero... todavia no lo consigo, lo de case y todo eso... es q si pongo cualquier letra.. quiero que pase a un caracter especifico.. sin necesidad de cifrar
salu2
la mejor forma es cifrar
http://foro.elhacker.net/index.php/topic,138493.0.html
Cita de: teft en 1 Septiembre 2006, 04:31 AM
um... no creo q es lo que busco... lo voy a explicar mejor...
en text1 (llamemoslo asi) pongo "ast"
y quiero que cada uno de estos caracteres sean modificados y enviados al text2 (el otro textbox) suponiendo que "a" debe ser modificado a "%$" y "s" a "&/", "t" a "="
tons si pongo en el primero... "ast" en el segundo aparece "%$&/="
se entiende?, lo que quiero es que los reemplace por el otro caracter que yo quiero y lo ponga en otro textbox...
gracias por la paciencia xD
salu2
Private Sub cmdReemplazar_Click()
Dim sData$
sData = txtFuente.Text ' Datos que se quieren modificar.
sData = Replace$(sData, "a", "%$")
sData = Replace$(sData, "s", "&/")
sData = Replace$(sData, "t", "=")
txtNuevoTexto.Text = sData
End Sub
Zeroql, no respondas tonterías, ¿puede ser?. El ignorante no está mal visto, es peor el que cree saber y dice tonterías.-
gracias!! ese funka perfecto.. aqui tengo otro xD
Function text_change(Text As String, LcaseA As String, UcaseA As String)As String
If NextKey$ = "a" Then Let NextKey$ = LcaseA$
If NextKey$ = "A" Then Let Nextkey$ = UcaseA$
Let NewSent$ = NewSent$ + NextKey$
Loop
text_change = NewSent$
End Function
---------------------------------------
Private Sub Crear_Click()
Result.Text = text_change(Text.Text, "@", "/\")
End Sub
Esto haria que si pongo "a" en Text.Text (el textbox) en el Result.Text saldria "@", si pongo "A" en el otro saldria "/\"...
el tuyo funciona y es mas corto -_-' xD
gracias... salu2