Befehlsreferenz - Zeichenketten: StrComp-Funktion

VB-Versionen:    VB4   |    VB5   |    VB6

Beschreibung:
Die StrComp-Funktion gibt das Ergebnis eines Zeichenfolgenvergleichs zurück.

Syntax:

StrComp (Zeichenfolge1, Zeichenfolge2,  [Vergleich] )

Parameter:

Zeichenfolge1	(String) beliebige Zeichenfolge.
Zeichenfolge2	(String) beliebige Zeichenfolge.
Vergleich	Optional. (Integer) Legt fest, wie verglichen werden soll.

Einstellungen für Vergleich

Konstante	Wert	Beschreibung
vbUseCompareOption	-1	Führt einen Vergleich mit Hilfe der Option Compare-Anweisung durch.
vbBinaryCompare	0	Führt einen binären Vergleich durch.
vbTextCompare	1	Führt einen reinen Textvergleich durch.
vbDatabaseCompare	2	Nur Microsoft Access. Führt einen Vergleich durch, der auf Informationen in einer Datenbank basiert.

Rückgabewerte von StrComp

Fall	Rückgabewert
Zeichenfolge1 liegt im Alphabet vor Zeichenfolge2	-1
Zeichenfolge1 entspricht Zeichenfolge2	0
Zeichenfolge1 liegt im Alphabet hinter Zeichenfolge2	1
Zeichenfolge1 oder Zeichenfolge2 ist Null	Null

Beispiel:

Private Sub Command1_Click()
    Dim Text1, Text2, Vergleich
    Text1 = "VB@RCHIV"
    Text2 = "vb@rchiv"
 
    Vergleich = StrComp(Text1, Text2, 1)    ' liefert 0
    MsgBox Vergleich
 
    Vergleich = StrComp(Text1, Text2, 0)    ' liefert -1
    MsgBox Vergleich
 
    Vergleich = StrComp(Text2, Text1)       ' liefert 1
    MsgBox Vergleich
End Sub

Siehe auch:

InStr-Funktion  InStrRev-Funktion