Replace

Replace

La función Replace reemplaza una parte especificada de una cadena con una cadena específica un número específico de veces.

Sintaxis

Replace(string,find,replacewith[,start[,count[,compare]]]) 

Parametro	Tipo de parametro	Descripción
string	Requerido	La cadena de entrada desde la que se buscará el reemplazo.
find	Requerido	La parte de la cadena que se reemplazará.
replace with	Requerido	La cadena de reemplazo, que se reemplazaría con el parámetro de búsqueda.
start	Opcional	Especifica la posición de inicio desde donde se debe buscar y reemplazar la cadena. El valor predeterminado es 1.
count	Opcional	Especifica el número de veces que se debe realizar el reemplazo.
compare	Opcional	Especifica el método de comparación que se utilizará. El valor predeterminado es 0. 0 = vbBinaryCompare: realiza una comparación binaria 1 = vbTextCompare: realiza una comparación textual

Ejemplo

Dim var
var = "This is VBScript Programming"

'VBScript to be replaced by MS VBScript
Print "Line 1: " & Replace(var,"VBScript","MS VBScript")

'VB to be replaced by vb
Print "Line 2: " & Replace(var,"VB","vb")

''is' replaced by ##
Print "Line 3: " & Replace(var,"is","##")

''is' replaced by ## ignores the characters before the first occurence
Print "Line 4: " & Replace(var,"is","##",5)

''s' is replaced by ## for the next 2 occurences.
Print "Line 5: " & Replace(var,"s","##",1,2)

''r' is replaced by ## for all occurences textual comparison.
Print "Line 6: " & Replace(var,"r","##",1,-1,1)

''t' is replaced by ## for all occurences Binary comparison
Print "Line 7: " & Replace(var,"t","##",1,-1,0)

Resultado

Line 1: This is MS VBScript Programming
Line 2: This is vbScript Programming
Line 3: Th## ## VBScript Programming
Line 4: ## VBScript Programming
Line 5: Thi## i## VBScript Programming
Line 6: This is VBSc##ipt P##og##amming
Line 7: This is VBScrip## Programming