返回一个表明字符串比较结果的值。
StrComp(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, MyComp MyStr1 = "ABCD": MyStr2 = "abcd" '定义变量。 MyComp =StrComp(
MyStr1,
MyStr2,
1)
' 返回 0。 MyComp =StrComp(
MyStr1,
MyStr2,
0)
' 返回 -1。 MyComp =StrComp(
MyStr2,
MyStr1)
' 返回 1。