StrComp 函数
返回一个表明字符串比较结果的值。
StrComp(string1, string2[, compare])
参数
string1
必选项。任意有效的字符串表达式。
string2
必选项。任意有效的字符串表达式。
Compare
可选项。指示在计算字符串时使用的比较类型的数值。如果省略，则执行二进制比较。有关数值，请参阅“设置”部分。
设置
compare 参数可以有以下值：
|
常数 |
值 |
描述 |
|---|---|---|
|
vbBinaryCompare |
0 |
执行二进制比较。 |
|
vbTextCompare |
1 |
执行文本比较。 |
返回值
StrComp 函数有以下返回值：
|
如果 |
StrComp 返回 |
|---|---|
|
string1 小于 string2 |
-1 |
|
string1 等于 string2 |
0 |
|
string1 大于 string2 |
1 |
|
string1 或 string2 为 Null |
Null |
说明
下面的示例利用 StrComp 函数返回字符串比较的结果。如果第三个参数为 1 执行文本比较；如果第三个参数为 0 或者省略执行二进制比较。
Dim MyStr1, MyStr2, MyCompMyStr1 = "ABCD": MyStr2 = "abcd" '定义变量。MyComp = StrComp(MyStr1, MyStr2, 1) ' 返回 0。MyComp = StrComp(MyStr1, MyStr2, 0) ' 返回 -1。MyComp = StrComp(MyStr2, MyStr1) ' 返回 1。