VBA基础函数：比较两个字符串

您所在的位置：网站首页 › 怎样比较两个单元格内容是不是一样 › VBA基础函数：比较两个字符串

VBA基础函数：比较两个字符串

2024-01-18 01:49| 来源: 网络整理| 查看: 265

StrComp 函数

返回 Variant (Integer)，为字符串比较的结果。

语法

StrComp(string1, string2[, compare])

StrComp 函数的语法有下面的命名参数：

部分说明string1必要参数。任何有效的字符串表达式。string2必要参数。任何有效的字符串表达式。Compare可选参数。指定字符串比较的类型。如果 compare 参数是 Null，将发生错误。如果省略 compare，Option Compare 的设置将决定比较的类型。

设置

compare 参数设置为：

常数值描述vbUseCompareOption-1使用Option Compare语句设置执行一个比较。vbBinaryCompare0执行一个二进制比较。vbTextCompare1执行一个按照原文的比较。vbDatabaseCompare2仅适用于Microsoft Access，执行一个基于数据库信息的比较。

返回值

StrComp 函数有下列返回值：

如果StrComp 返回string1 小于 string2-1string1 等于 string20string1 大于 string21string1 或 string 2为 NullNull StrComp 函数示例

本示例使用 StrComp 函数来比较两个字符串。如果第三个参数值为 1，字符串是以文本比较的方式进行比较；如果第三个参数值为 0 或是缺省，则以二进制比较的方式进行比较。

文本比较方式会将大小写字母视为一样，但二进制比较方式则视为不同。

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。

source:VBA Help

【本文地址】

VBA基础函数：比较两个字符串

VBA基础函数：比较两个字符串

今日新闻

推荐新闻