StrComp函数:对两个指定字符串进行比较

StrComp函数:对两个指定字符串进行比较

作用：该函数对指定的字符串进行比较并且返回比较结果。

语法格式：StrComp(string1, string2[, compare])

其中，string1必选项。任意有效的字符串表达式。
string2必选项。任意有效的字符串表达式。
Compare可选项。指示在计算字符串时使用的比较类型的数值。如果省略，则执行二进制比较。

 

compare 参数可以有以下值：

常数	值	描述
vbBinaryCompare	0	执行二进制比较。
vbTextCompare	1	执行文本比较。

返回值

如果	StrComp 返回
string1 小于 string2	-1
string1 等于 string2	0
string1 大于 string2	1
string1 或 string2 为 Null	Null

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

23 24 25 26 27

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