Funktion Replace

Ersetzt eine Zeichenkette durch eine andere.

Syntax:


       Replace (Expression As String, Find As String, Replace As String [, Start = 1 [, Count = -1 [, Compare = True]]]) As String
    

Wenn Sie weniger Parameter ├╝bergeben m├╝ssen, verwenden Sie Schl├╝sselwort-Argumente. Das ├ťbergeben von Werten f├╝r weniger Parameter nach Position erfordert, dass Werte f├╝r alle Parameter vor ihnen angegeben werden, ob optional oder nicht. Dadurch wird sichergestellt, dass sich die Werte an den richtigen Positionen befinden. Wenn Sie die Parameter nach Namen ├╝bergeben ÔÇô mit Schl├╝sselwort-Argumenten ÔÇô k├Ânnen Sie alle anderen Zwischenargumente weglassen.

R├╝ckgabewert:

Zeichenkette

Parameter:

Expression: Any string expression that you want to modify.

Find: Any string expression that shall be searched for.

Replace: Any string expression that shall replace the found search string.

Start: Optional numeric expression that indicates the character position where the search starts and also the start of the substring to be returned.

Count: Optional maximum number of times the replace shall be performed. When set to -1, all possible replacements are performed.

Compare: Optional boolean expression that defines the type of comparison. The value of this parameter can be True or False. The default value of True specifies a text comparison that is not case-sensitive. The value of False specifies a binary comparison that is case-sensitive. You can as well use 0 instead of False or 1 instead of True.

Fehlercodes:

5 Ung├╝ltiger Prozeduraufruf

Beispiel:


        MsgBox Replace ("aBbcnnbnn", "b", "$", 1, 1, False)  'returns "aB$cnnbnn"
        REM Bedeutung: "b" soll ersetzt werden, aber
        REM * only when lowercase (compare=False), hence second occurrence of "b"
        REM * only first (respecting case) occurrence (count=1)
        MsgBox Replace ("ABCDEFGHI", "E", "*", 4)
        REM gibt D*FGHI zur├╝ck, da die Suche bei Position 4 beginnt, die auch der Anfang der zur├╝ckgegebenen Zeichenkette ist.
        MsgBox Replace("aBbcnnbnn", "b", "$£", compare:=False)  'returns "aB$£cnn$£nn"
        REM Replace all (count = -1) "b" with "$£" respecting casing (compare=False) starting from first letter (start=1)
    

Bitte unterst├╝tzen Sie uns!