StrComp 函数
应用对象
Microsoft 365 专属 Access Access 2024 Access 2021 Access 2019 Access 2016
返回一个 Variant (Integer) 指示字符串表达式的结果。
语法
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.