Ersetzen

Gibt eine Zeichenkette zurück, in der eine angegebene Teilzeichenkette eine bestimmte Anzahl von Malen durch eine andere Teilzeichenkette ersetzt wurde.

Aufbau

Ersetzen(Ausdruck, Suchbegriff, Ersetzungstext[, Startposition[, Anzahl[, Vergleichskriterium]]])

Parameter

Ausdruck – Erforderlich. Zeichenfolgenausdruck, der die zu ersetzende Teilzeichenfolge enthält.

find – Erforderlich. Gesuchtes Teilzeichen.

replacewith – Erforderlich. Zu ersetzende Teilzeichenfolge.

start – Optional. Position innerhalb des Ausdrucks, an der die Suche nach der Teilzeichenfolge beginnen soll. Wird dieser Wert weggelassen, wird der Wert 1 angenommen. Muss in Verbindung mit „count“ verwendet werden.

Anzahl – Optional. Anzahl der durchzuführenden Teilzeichenfolgenersetzungen. Wird dieser Wert weggelassen, ist der Standardwert -1, was bedeutet, dass alle möglichen Ersetzungen vorgenommen werden. Muss in Verbindung mit „start“ verwendet werden.

vergleichen – Optional. Ein numerischer Wert, der angibt, welche Art von Vergleich bei der Auswertung von Teilzeichenfolgen verwendet werden soll. Die Werte finden Sie im Abschnitt „Einstellungen“. Wird dieser Wert weggelassen, ist der Standardwert 0, was bedeutet, dass ein binärer Vergleich durchgeführt wird.

Parameterwerte

Das Argument „compare“ kann folgende Werte annehmen:

Konstante Beschreibung

vbBinaryCompare 0 Führt einen binären Vergleich durch.

vbTextCompare 1 Einen Textvergleich durchführen.

Rückgabewert

Die Funktion „Replace“ gibt folgende Werte zurück:

Wenn „Replace“ den Ausdruck „

“ zurückgibt, ist die Zeichenfolge leer ('').

Der Ausdruck ist null. Ein Fehler.

find ist eine Kopie von expression ohne Länge.

„replacewith“ ist eine Kopie des Ausdrucks ohne Länge, aus der alle Vorkommen von „find“ entfernt wurden.

start > Len(Ausdruck) Zeichenkette der Länge Null.

Zählwert ist 0 Kopie des Ausdrucks.

Beschreibung

Der Rückgabewert der Funktion „Replace“ ist eine Zeichenkette, in der die Ersetzungen vorgenommen wurden; sie beginnt an der durch „start“ angegebenen Position und endet am Ende der Ausdruckszeichenkette. Es handelt sich nicht um eine vollständige Kopie der ursprünglichen Zeichenfolge.

Beispiel

Im folgenden Beispiel wird die Funktion „Replace“ verwendet, um eine Zeichenfolge zurückzugeben:

Dim MyString

Ein binärer Vergleich, der am Anfang der Zeichenkette beginnt.

MyString = Replace("XXpXXPXXp", "p", "Y") ' Gibt 'XXYXXPXXY' zurück.

Ein Textvergleich, beginnend an Position 3.

MyString = Replace("XXpXXPXXp", "p", "Y", 3, -1, 1) ' Gibt 'YXXYXXY' zurück. |