CBool 函数

返回表达式，此表达式已转换为

Boolean 子类型的

Variant。

CBool(expression

)

expression 是任意有效的表达式。

说明

如果

expression 是零，则返回

False；否则返回

True。如果

expression 不能解释为数值，则将发生运行时错误。

下面的示例使用

CBool 函数将一个表达式转变成

Boolean 类型。如果表达式所计算的值非零，则

CBool 函数返回

True；否则返回

False。

Dim A, B, CheckA = 5: B = 5 ' 初始化变量。Check =

CBool(A = B

) '复选框设为 True 。A = 0 '定义变量。 Check =

CBool(A

) '复选框设为 False 。