这篇文章给大家介绍如何在VBS中使用CBool函数，内容非常详细，感兴趣的小伙伴们可以参考借鉴，希望对大家能有所帮助。

创新互联服务项目包括麒麟网站建设、麒麟网站制作、麒麟网页制作以及麒麟网络营销策划等。多年来，我们专注于互联网行业，利用自身积累的技术优势、行业经验、深度合作伙伴关系等，向广大中小型企业、政府机构等提供互联网行业的解决方案，麒麟网站推广取得了明显的社会效益与经济效益。目前，我们服务的客户以成都为中心已经辐射到麒麟省份的部分城市，未来相信会继续扩大服务区域并继续获得客户的支持与信任！

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 。

关于如何在VBS中使用CBool函数就分享到这里了，希望以上内容可以对大家有一定的帮助，可以学到更多知识。如果觉得文章不错，可以把它分享出去让更多的人看到。

分享标题：如何在VBS中使用CBool函数-创新互联
文章来源：http://cdweb.net/article/cesgsg.html