17、VBA函数使用指南：从内置到自定义

VBA函数使用指南：从内置到自定义

1. 字符串比较与StrComp函数

在VBA中进行字符串比较时，使用 = 运算符可能会遇到大小写匹配的问题。例如以下代码：

strPet = InputBox("What is your pet?", "Pet")
If strPet = "Dog" Then MsgBox "We do not accept dogs."

这段代码要求字符串的大小写必须完全匹配，否则条件不成立。为了解决这个问题，可以使用 Or 运算符列出所有可能的大小写组合，但这样的代码会变得很繁琐。更简单的方法是使用 StrComp 函数，其语法如下：

StrComp(string1, string2 [, compare])

其中， string1 和 string2 是必需的字符串参数， compare 是可选参数，可指定文本比较（ vbTextCompare ）或二进制比较（ vbBinaryCompare ）。示例代码如下：

If StrComp(Pet, "dog", vbTextCompare) = True Then _
    MsgBox "We do not