我知道在 vba 中可以进行以下操作：
If Len(str) Then
如果Len(str) 为0，Len(str) 将评估为false，否则为true。
vba 的具体转换规则是什么？如果可能，请提供官方文档的链接。
【问题讨论】：
Len() 返回一个整数值，而不是布尔值。是的，VBA 中的False 是零，但以这种方式编码并不好。
标签： vba type-conversion coercion type-coercion
boolean 变量只能有两种状态，True 和 False。在所有编程语言中都是如此（除非存在可为空的数据类型，例如 C# 中的 bool?，其中变量也可以具有值 null，表示它未定义）。
在 VBA 中，布尔值存储为 16 位整数。 False 定义为 0，True 定义为 -1。这在其他语言中也是类似的，只是因为 0 将所有位设置为 0，而 -1 将所有位设置为 1。但这是一个实现细节，您的编程不应该关心它。您使用AND、OR 和NOT 处理True 和False 和布尔代数。
隐式转换规则直截了当：如果数值数据类型为 0，则将其转换为布尔值 False，在所有其他情况下（即，如果值具有 any 位，则转换为 True设置为 1)。将布尔值转换为数字会分别得到 0。 -1.
Dim i As Integer
Dim b As Boolean
i = 3
b = i ' Implicit conversion from 3 to TRUE
i = b ' Implicit conversion from TRUE to -1
首先将字符串转换为数字，如果失败，则会出现运行时错误。日期在 VBA 中实现为数字（双精度），因此每个日期/时间都是 True，除了表示为 0 的日期+时间（即 1899 年 12 月 30 日 00:00）
但从我的观点（以及 >30 年的编程经验）来看，隐式转换是邪恶的，应该避免。它们是许多错误的来源，它们导致代码更难阅读 - 根本没有理由依赖隐式对话。没有理由写If len(str) Then。你想检查一个字符串的长度是否大于0，所以写成：If len(str) > 0 Then。总是。
看看下面的例子：显然，VBA运行时需要执行一个隐式转换，但你能告诉结果吗？
Dim i As Integer
Dim b As Boolean
i = 3
b = i
If b = i Then Debug.Print "B=I"
你可以在这里找到微软官方文档：https://docs.microsoft.com/en-US/office/vba/language/reference/user-interface-help/boolean-data-type
【讨论】：
1 写入布尔变量 - 这与它的定义背道而驰。跨度>
我在最近阅读的一本关于 C++ 的教科书中遇到了这个问题——我将在最后添加一个链接。虽然语言不同，但在某种程度上都有相似之处。这些相似之处之一就是您所说的“隐式类型转换”，或者更专业地说，类型转换。
当您编译 VBA 项目（调试 > 编译 VBAProject）时，对于项目中的任何布尔表达式，任何非零值都将被视为值 true，并将值 0 视为 false。本质上，这归结为编译器如何处理这些语句以及运算符优先级规则和布尔表达式规则。
如需进一步阅读，请参阅以下链接：
在 C++ 中（据我所知），这个术语称为复制初始化，您可以在此处阅读更多内容：
最近引发这种深刻思考的书：
Problem Solving with C++: The Object of Programming
我知道这不一定能回答您的问题，但希望一些参考资料有所帮助。
【讨论】：