语法:
Option Compare {Binary | Text | Database}
说明:
1,如果使用,则 Option Compare 语句必须写在模块的所有过程之前。
2,Option Compare 语句为模块指定字符串比较的方法(Binary、Text 或 Database)。如果模块中没有 Option Compare 语句,则缺省的文本比较方法是 Binary。
3,Option Compare Binary 是根据字符的内部二进制表示而导出的一种排序顺序来进行字符串比较。在 Microsoft Windows 中,排序顺序由代码页确定。典型的二进制排序顺序如下例所示:
A < B < E < Z < a < b < e < z
4,Option Compare Text 根据由系统国别确定的一种不区分大小写的文本排序级别来进行字符串比较。当使用 Option Compare Text 对相同字符排序时,会产生下述文本排序级别:
(A=a) < ( =) < (B=b) < (E=e) < (=) < (Z=z)
5,Option Compare Database 只能在 Microsoft Access 中使用。当需要字符串比较时,将根据数据库的国别 ID 确定的排序级别进行比较。
示例:
该示例使用 Option Compare 语句设置缺省的字符串比较方法。Option Compare 语句只能在模块级使用。
'将字符串比较方法设为 Binary。
Option compare Binary '这样,“AAA” 将小于 “aaa”。
'将字符串比较方法设为 Text。
Option compare Text '这样,“AAA” 将等于 “aaa”。
在模块级别使用Option Compare Text可以设置该模块中所有字符串比较的默认方式为不区分大小写。例如:
Option Compare Text
这样设置后,在该模块中进行字符串比较时,所有的字符串都会被视为不区分大小写。例如:
If "Hello" = "hello" Then
MsgBox "Strings are equal"
End If
这段代码会显示消息框“Strings are equal”,因为Option Compare Text使得比较时不区分大小写。