返回一个表明字符串比较结果的值。
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。
原文：http://www.jb51.net/article/4584.htm