Поделиться через


StrComp Function

Returns a value indicating the result of a string comparison.

                      StrComp(string1, string2[, compare])

Arguments

  • string1
    Required. Any valid string expression.

  • string2
    Required. Any valid string expression.

  • compare
    Optional. Numeric value indicating the kind of comparison to use when evaluating strings. If omitted, a binary comparison is performed. See Settings section for values.

Settings

The compare argument can have the following values:

Constant

Value

Description

vbBinaryCompare

0

Perform a binary comparison.

vbTextCompare

1

Perform a textual comparison.

Return Value

The StrComp function has the following return values:

If

StrComp returns

string1 is less than string2

-1

string1 is equal to string2

0

string1 is greater than string2

1

string1 or string2 is Null

Null

Remarks

The following example uses the StrComp function to return the results of a string comparison. If the third argument is 1, a textual comparison is performed; if the third argument is 0 or omitted, a binary comparison is performed.

Dim MyStr1, MyStr2, MyComp

MyStr1 = "ABCD"
MyStr2 = "abcd"

' This is a textual comparison, so the comparison
' is case-insensitive.
' Returns 0.
MyComp = StrComp(MyStr1, MyStr2, 1)

' This is a binary comparison.
' Returns -1.
MyComp = StrComp(MyStr1, MyStr2, 0)

' This is a binary comparison because the last
' argument is omitted.
' Returns 1.
MyComp = StrComp(MyStr2, MyStr1)

Requirements

Version 1

See Also

Reference

IsNull Function

Change History

Date

History

Reason

August 2009

Added comments to example.

Information enhancement.