StrComp-Funktion (StrVgl)

Gibt einen Variant-Datentyp (ganze Zahl) zurück, der das Ergebnis eines Zeichenfolgenausdruck kennzeichnet.

Syntax

StrComp(Zeichenfolge1, Zeichenfolge2 [, Vergleichen ] )

Die Syntax der StrComp-Funktion weist die folgenden Argument auf:

Argument

Beschreibung

Zeichenfolge1

Erforderlich. Beliebiger gültiger Zeichenfolgenausdruck.

Zeichenfolge2

Erforderlich. Beliebiger gültiger Zeichenfolgenausdruck.

Vergleichen

Optional. Gibt die Art des Zeichenfolgevergleichs an. Wenn das Vergleichen-Argument den Wert Null aufweist, tritt ein Fehler auf. Wenn für Vergleichen kein Wert angegeben wird, bestimmt die Einstellung von Option Compare die Art des Vergleichs.


Einstellungen

Das Argument Vergleichen kann die folgenden Einstellungen aufweisen:

Konstante

Wert

Beschreibung

vbUseCompareOption

-1

Führt einen Vergleich mithilfe der Einstellung der Option Compare-Anweisung aus.

vbBinaryCompare

0

Führt einen binären Vergleich aus.

vbTextCompare

1

Führt einen Textvergleich aus.

vbDatabaseCompare

2

Nur Microsoft Office Access 2007. Führt einen Vergleich aus, der auf Informationen in der Datenbank basiert.


Rückgabewerte

Die StrComp-Funktion kann folgende Werte zurückgeben:

Bedingung

StrComp-Rückgabewert

Zeichenfolge1 ist kleiner als Zeichenfolge2

-1

Zeichenfolge1 ist gleich Zeichenfolge2

0

Zeichenfolge1 ist größer als Zeichenfolge2

1

Zeichenfolge1 oder Zeichenfolge2 ist Null

Null


Beispiel

Hinweis : Die folgenden Beispiele zeigen die Verwendung dieser Funktion in einem VBA-Modul (Visual Basic für Applikationen). Wenn Sie weitere Informationen zum Arbeiten mit VBA wünschen, wählen Sie Entwicklerhilfe in der Dropdownliste neben Suchen, und geben Sie einen oder mehrere Begriffe in das Suchfeld ein.

In diesem Beispiel wird die StrComp-Funktion verwendet, um die Ergebnisse eines Zeichenfolgenvergleichs zurückzugeben. Wenn das dritte Argument 1 ist, wird ein Textvergleich ausgeführt. Wenn das dritte Argument 0 ist oder nicht angegeben wird, wird ein binärer Vergleich ausgeführt.

Dim MyStr1, MyStr2, MyComp
MyStr1 = "ABCD": MyStr2 = "abcd" ' Define variables.
MyComp = StrComp(MyStr1, MyStr2, 1) ' Returns 0.
MyComp = StrComp(MyStr1, MyStr2, 0) ' Returns -1.
MyComp = StrComp(MyStr2, MyStr1) ' Returns 1.
Teilen Facebook Facebook Twitter Twitter E-Mail E-Mail

War diese Information hilfreich?

Sehr gut. Noch anderes Feedback?

Was können wir verbessern?

Vielen Dank für Ihr Feedback!

×