ReplaceText

Top  Previous  Next

function ReplaceText(sSource As String, sSearchStr As String, sReplaceStr As String) As String

 

Gibt einen String zurück, in dem alle Vorkommen von sSearchStr durch sReplaceStr ersetzt werden.

 

ReplaceText ist case-insensitive.

 

Parameter

 

sSource ... String-Ausdruck, in dem ein Substring ersetzt werden soll.
sSearchStr ... Substring, der ersetzt werden soll.
sReplaceStr ... Substring, der sSearchStr ersetzen soll.

 

Beispiel:

Dim s

 

= "This is a TEXT"

= ReplaceText(s, "text", "number")

' returns s = "This is a number"