[已解决]VBA中，TRUE代表为-1吗？

一剑惊心

sub AA

MsgBox (1 = 1) * 10

end sub

上述代码运行后为什么显示-10

最佳答案

月排行榜 / 总排行榜

枯禅

2010-3-10 21:39

真没注意过，一直以为是1，查了帮助，转换成其他数据类型时是-1

帮助原文：

当转换 Boolean 值为其他的数据类型时，False 成为 0，而 True 成为 -1。

跳转到最佳答案楼层

枯禅

真没注意过，一直以为是1，查了帮助，转换成其他数据类型时是-1

帮助原文：

当转换 Boolean 值为其他的数据类型时，False 成为 0，而 True 成为 -1。

一剑惊心

微软怎么能这样胡搞？[em06]

djyjysxxs

逻辑值转化为数值：true=-1，false=0

数值转化为逻辑值：非0=true,0=false

爱疯

Sub a()
    Dim x
    
    x = 3
    MsgBox CBool(x) '返回 True
    MsgBox CInt(CBool(x)) '返回-1
End Sub

真是个大发现呀，学习了！我去看了下帮助：

 

 

Boolean 数据类型
请参阅     示例     特性

Boolean 变量存储为 16 位（2 个字节）的数值形式，但只能是 True 或是 False。Boolean 变量的值显示为 True 或 False（在使用 Print 的时候），或者 #TRUE# 或 #FALSE#（在使用 Write # 的时候）。使用关键字 True 与 False 可将 Boolean 变量赋值为这两个状态中的一个。

当转换其他的数值类型为 Boolean 值时，0 会转成 False，而其他的值则变成 True。当转换 Boolean 值为其他的数据类型时，False 成为 0，而 True 成为 -1。

djyjysxxs

就是，所以才有：当要根据单元格有没有内容来执行某段代码时，就写成了 if len(单元格.value) then，这比其他写法速度要快点点(不多次读单元格哈，要将单元格.value先读入变量，len(变量))

[此贴子已经被作者于2010-3-10 22:34:00编辑过]

开辆小富康

是这样的啦