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: Psyke1 en 24 Mayo 2010, 11:10 AM

Título: [Ayuda] Reemplazar caracter en cadena de texto
Publicado por: Psyke1 en 24 Mayo 2010, 11:10 AM
Hola, necesito vuestra ayda para una duda muy simple... :silbar:
Tengo que quitar el caracter "e" de una cadena, para ello actualmente hago esto:

Código (vb) [Seleccionar]

Dim cadena As String
Cadena = "estoy cansado"
Cadena = Replace(Cadena, "e", "")


Queria saber si hay otra forma de hacerlo... ;)

Gracias! :)
Título: Re: [Ayuda] Reemplazar caracter en cadena de texto
Publicado por: Shell Root en 24 Mayo 2010, 21:00 PM
Supongo que con Expresiones Regulares, pero no se...
Título: Re: [Ayuda] Reemplazar caracter en cadena de texto
Publicado por: seba123neo en 25 Mayo 2010, 03:41 AM
si, hay, tenes un modulo de Cobein que publico aca mismo...y sino esta pagina:

Replace (http://www.xbeat.net/vbspeed/c_Replace.htm)

saludos.
Título: Re: [Ayuda] Reemplazar caracter en cadena de texto
Publicado por: .:BlackCoder:. en 25 Mayo 2010, 05:02 AM
No entiendo bien ese link... sera que me das el link del "modulo que publico cubein" o el nombre del "modulo"?

Saludos...
Título: Re: [Ayuda] Reemplazar caracter en cadena de texto
Publicado por: Psyke1 en 25 Mayo 2010, 09:04 AM
Gracias seba123neo, me sirvio! ;)

Cita de: El_nuevo_HH en 25 Mayo 2010, 05:02 AM
No entiendo bien ese link... sera que me das el link del "modulo que publico cubein" o el nombre del "modulo"?

Saludos...
:¬¬ :¬¬ :¬¬ :¬¬ :¬¬ :¬¬ :¬¬ :¬¬
Título: Re: [Ayuda] Reemplazar caracter en cadena de texto
Publicado por: Dreamaker en 26 Mayo 2010, 11:43 AM
Todas las "e" de una cadena o sólo 1 quieres remover?

Pensandolo, en tal caso podrías hacer un for x=1 to Len(cadena) que vaya recorriendo hasta el largo de la cadena y que si el Mid de (cadena, x, 1) es distinto de "e" entonces que guarde la cadena en una variable contenedora o acumulador, luego podrías hacer un contador para controlar si quieres sacar todas las "e" o tan sólo 1 ;)

Te muestro un ejemplo que acabo de hacer:
Código (vb) [Seleccionar]
Private Sub cmdQuitar_Click()

'Declaracion de variables

Dim strCadena As String, strAux As String

'Asignacion de valor

strCadena = LCase(txtValor1.Text)

'Busqueda de "e"'s y eliminacion

For x = 1 To Len(strCadena)
    If Mid(strCadena, x, 1) <> "e" Then
        strAux = strAux + Mid(strCadena, x, 1)
    End If
Next x

'Asignacion de resultado final

lblResultado.Caption = strAux

End Sub


El proyecto por si lo quieres ver y/o probar mejor:
http://www.mediafire.com/?h0cyh53jmgv

;)

Título: Re: [Ayuda] Reemplazar caracter en cadena de texto
Publicado por: Psyke1 en 26 Mayo 2010, 11:58 AM
Gracias Dreamaker!! :)
Muy sencillo y eficaz! ;-)

Salu2! ;)
Título: Re: [Ayuda] Reemplazar caracter en cadena de texto
Publicado por: Dreamaker en 26 Mayo 2010, 12:02 PM
De nada, gracias a que este año estoy aprendiendo vb en el colegio :xD

Se me ocurre hasta podrías hacer otro textbox dándole al usuario la chance de elegir que letra quitar y que el for verifique si es distinto(<>) a esa letra, y así cuando la encuentre, que le deje quitar cualquier caracter que elija de la cadena

Veo que le estás poniendo empeño y vb es bastante bueno a mi parecer, yo el próximo año tengo C/C++ y el otro java :¬¬