StrComp 函数

返回一个指示字符串比较结果的值

语法

StrComp(string1, string2[, compare])

参数：

• string1：必需。任何有效的字符串表达式。
• string2：必需。任何有效的字符串表达式。
• Compare：可选。指示对字符串进行求值时要使用的比较类型的数值。如果省略，将执行二进制比较。有关值，请参阅设置部分。
• 设置：compare 参数可以具有以下值：

  表 11-21 比较常量和说明

  常量	值	说明
  vbBinaryCompare	0	执行二进制比较
  vbTextCompare	1	执行文本比较

返回值

StrComp 函数具有以下返回值：

注释

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

以下示例说明了 StrComp 函数的用法：

示例 1：

Dim MyStr1, MyStr2, MyComp
MyStr1 = "ABCD": MyStr2 = "abcd"   ' Define variables.
MyComp = StrComp(MyStr2, MyStr1)   
' Output: 1

MyComp = StrComp(MyStr1, MyStr2, 1)   
' Output: 0
MyComp = StrComp(MyStr1, MyStr2, 0)   
' Output: -1

示例 2：

Dim MyStr1, MyStr2, MyComp
MyStr1 = "ABCD"
MyStr2 = "XYZ"
MyComp = StrComp(MyStr1, MyStr2)   
' Output: -1

示例 3：

Dim MyStr1, MyStr2, MyComp
MyStr1 = "XYZ"
MyStr2 = "ABCD"
MyComp = StrComp(MyStr1, MyStr2)   
' Output: 1