StrComp 函数

返回指示字符串比较的结果的 Variant (Integer)。

语法

StrComp (string1， string2， [ compare ])

StrComp 函数语法包含以下命名参数：

Part	说明
string1	必需。 任何有效的字符串表达式。
string2	必需。 任何有效的字符串表达式。
compare	可选。 指定字符串比较的类型。 如果 比较参数 为 Null，则会发生错误。 如果省略 compare，则 Option Compare 设置将决定比较的类型。

设置

compare 参数设置为：

常量	值	说明
vbUseCompareOption	-1	使用 Option Compare 语句的设置来执行比较。
vbBinaryCompare	0	执行二进制比较。
vbTextCompare	1	执行文本比较。
vbDatabaseCompare	2	仅用于 Microsoft Access。 根据数据库中的信息执行比较。

返回值

StrComp 函数包含以下返回值：

If	则 StrComp 返回
string1 小于 string2	-1
string1 等于 string2	0
string1 大于 string2	1
string1 或 string2 为 Null	Null

示例

此示例使用 StrComp 函数返回字符串比较的结果。 如果第三个参数为 1，则执行文本比较；如果第三个参数为 0 或被省略，则执行二进制比较。

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.

另请参阅

• 函数 (Visual Basic for Applications)

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。