目录
索引 🔎︎

# CBool 函数

将字符串比较或数字比较的结果转换成布尔表达式，或者将单个数字表达式转换成布尔表达式。

## 语法:

    CBool (Expression1 {= | <> | < | > | <= | >=} Expression2) or CBool (Number)

## 返回值:

布尔

## 参数:

「Expression1、Expression2: 要比较的任意字符串或数字表达式。如果表达式匹配，「CBool 函数将返回 True」，否则将返回 False」。

「Number: 要转换的任意数字表达式。如果表达式等于 0，则返回「False」，否则返回 True」。

下面的示例使用「CBool」函数对「Instr」函数返回的值进行求值。函数将检查用户输入的句子中是否含有「and」。

## 错误代码:

5 无效的过程调用

## 示例:

    Sub ExampleCBool
    Dim sText As String
        sText = InputBox("请输入短句:")
        ' 验证句子中是否出现单词「and」。
        ' 未使用下面的命令行
        ' If Instr(Input, "and")<>0 Then...
        ' CBool 函数按如下方式使用:
        If CBool(Instr(sText, "and")) Then
            MsgBox "您输入的句子中出现了「and」!"
        EndIf
    End Sub