function ReplaceWildcard(sSource As String, sSearchWildcard As String, sReplaceStr As String) As String
|
Gibt einen String zurück, in dem alle Vorkommen von sSearchWildcard durch sReplaceStr ersetzt werden. sFindWildcard ist ein Wildcard-Ausdruck mit einem Start-Text, einem Stern-Zeichen und einem Ende-Text mit folgender Syntax:
StartText*EndText
ReplaceWildcard ist case-sensitive.
Parameter
| • | sSource ... String-Ausdruck, in dem ein Substring ersetzt werden soll. |
| • | sSearchWildcard ... Wildcard Ausdruck, der ersetzt werden soll. |
| • | sReplaceStr ... Substring, der sSearchWildcard ersetzen soll. |
Beispiel:
Dim s
s = "<table><tr><td>354</td></tr></table>"
s = ReplaceWildcard(s, "</td>*</td>", "</td>-</td>")
' returns s = "<table><tr><td>-</td></tr></table>"
|
|