Reemplaza el texto encontrado en la búsqueda de una expresión normal.

objeto.Replace(cadena1, cadena2)

Argumentos

objeto

Necesario. Siempre el nombre de un objeto RegExp.

cadena1

Necesario. Cadena1 es la cadena de texto en la que se producirá el reemplazo de texto.

cadena2

Necesario. Cadena2 es la cadena de texto de reemplazo.

Observaciones

El modelo actual para el texto que se reemplaza se configura con la propiedad Pattern del objeto RegExp.

El método Replace devuelve una copia de la cadena1 con el texto de RegExp.Pattern reemplazado con la cadena2. Si no se encuentra ninguna coincidencia, se devuelve una copia de la cadena1 inalterada.

La siguiente porción de código ilustra el uso del método Replace.

Function ReplaceTest(patrn, replStr)
   Dim regEx, str1               ' Crea algunas variables.
   str1 = "El veloz murciélago hindú comía feliz cardillo y kiwi."
   Set regEx = New RegExp            ' Crea una expresión regular.
   regEx.Pattern = patrn            ' Establece el modelo.
   regEx.IgnoreCase = True            ' Hace distinción entre mayúsculas y minúsculas.
  ReplaceTest = regEx.Replace(str1, replStr)   ' Realiza el reemplazo.
End Function

MsgBox(ReplaceTest("murciélago", "gato"))      ' Reemplaza 'murciélago' por 'gato'.

Además, el método Replace puede reemplazar subexpresiones en el modelo. La siguiente llamada a la función mostrada en el ejemplo anterior intercambia cada pareja de palabras en la cadena original:

MsgBox(ReplaceText("(\S+)(\s+)(\S+)", "$3$2$1"))   ' Intercambia parejas de palabras.

Requisitos

Versión 5

Consulte también

Método Execute | Método Test

Se aplica a: Objeto Regular Expression (RegExp)