返回指示字符串表达式结果 (整数) 的变体。
语法
StrComp (string1, string2 [, compare ] )
StrComp 函数语法具有以下参数:
| 参数 | 说明 |
|---|---|
| string1 | 必需。 任何有效的字符串表达式。 |
| string2 | 必需。 任何有效的字符串表达式。 |
| 比较 | 可选。 指定字符串比较的类型。 如果比较参数为 Null,则会出现错误。 如果省略比较,则选项比较设置确定比较的类型。 |
“设置”
比较参数设置包括:
| 常量 | 值 | 说明 |
|---|---|---|
| vbBinaryCompare | 0 | 执行二进制比较。 |
| vbTextCompare | 1 | 执行文本比较。 |
返回值
StrComp 函数具有以下返回值:
| 如果 | StrComp 返回 |
|---|---|
| string1 小于 string2 | 来执行此操作 |
| string1 等于 string2 | 0 |
| string1 大于 string2 | 1 |
| string1 或 string2 为 Null | Null |
查询示例
| Expression | 结果 |
|---|---|
| SELECT ProductSales.ProductID, StrComp (ProductID,“PRO_XYZ10”) AS ComparisonResult FROM ProductSales; | 返回字段“ProductID”中的值,将“ProductID”中的值与“PRO_XYZ1”中的值进行比较,并在列 ComparisonResult 中返回结果。 “ProductID”等于“PRO_XYZ10”,则 StrComp 函数将返回 0。 如果“ProductID”小于“PRO_XYZ10”,则 StrComp 函数将返回 -1。 如果“ProductID”大于“PRO_XYZ10”,则 StrComp 函数将返回 1。 如果“ProductID”或“PRO_XYZ10”为 NULL,则 StrComp 函数将返回 NULL。 |
VBA 示例
注意
下面的示例演示了在Visual Basic for Applications (VBA) 模块中使用此函数。
此示例使用 StrComp 函数返回字符串比较的结果。 如果第三个参数为 1,则执行文本比较;如果第三个参数为 0 或被忽略,则执行二进制比较。
Dim MyStr1, MyStr2, MyComp
MyStr1 = "ABCD": MyStr2 = "abcd" ' Define variables.
MyComp = StrComp(MyStr1, MyStr2, 1) ' Returns 0.
MyComp = StrComp(MyStr1, MyStr2, 0) ' Returns -1.
MyComp = StrComp(MyStr2, MyStr1) ' Returns 1.