CBool 函数

返回表达式，此表达式已转换为 Boolean 子类型的 Variant。

CBool(expression)

expression 是任意有效的表达式。

说明

如果 expression 是零，则返回 False；否则返回 True。如果 expression 不能解释为数值，则将发生运行时错误。

下面的示例使用 CBool 函数将一个表达式转变成 Boolean 类型。如果表达式所计算的值非零，则 CBool 函数返回 True；否则返回 False。

Dim A, B, Check
A = 5: B = 5            ' 初始化变量。
Check = CBool(A = B)    '复选框设为 True 。
A = 0                   '定义变量。 
Check = CBool(A)        '复选框设为 False 。