Reemplazar los 4 ultimas palabras

hola
podrias hacer

Dim cadena As String = "HOLA1234"

Dim resultado As String = String.Format("{0}****", cadena.Substring(0,
cadena.Length - 4))

por supuesto en ese cado deberas validar que la cadena tenga mas de 4
caracteres, sino fallara

If cadena.Length > 4 Then
Dim resultado As String = String.Format("{0}****",
cadena.Substring(0, cadena.Length - 4))
End If

saludos

Juan:
Si lo que quieres hacer es reemplazar las última cuatro palabras
te recomiendo utilizar Regular Expressions para
encontrarlas(http://msdn.microsoft.com/es-ar/library/2k3te2cs(VS.80).asp
x), pero si lo que quieres es reemplazar los últimos cuatro caracteres
te puede servir esto:

Dim cadena As String = "Hola1234"
If Not String.IsNullOrEmpty(cadena) Then
cadena = cadena.Substring(0, Math.Max(0, cadena.Length - 4)) & _
Strings.StrDup(Math.Min(4, cadena.Length), "*")
End If

Suerte!

Gustavo A. Cantero
Scientia® Soluciones Informáticas
MCP - MCSD - MCTS - MCPD
http://www.scientia.com.ar
http://www.programandoamedianoche.com
http://foro.scientia.com.ar


From: Juan live com> [mailto:efer<arrobapunto]
Posted At: viernes, 16 de abril de 2010 05:29 p.m.
Posted To: microsoft.public.es.dotnet.vb
Conversation: Reemplazar los 4 ultimas palabras
Subject: Reemplazar los 4 ultimas palabras

HOla quisiera saber como puedo hacer para reemplazar las 4 ultimas
palabras
por *

Por ejemplo

HOLA1234 a HOLA****

Gracias