vba中判断奇偶的简便方法

aoe1981

m_n_j001 发表于 2014-10-14 10:56
刚才用代码试了下，在64位的win8.1+office2013环境下，9999*9999次运算，mod比and稍快一点点
作为方法，多 ...

精彩纷呈，愈加热闹了……

aoe1981

jsxjd 发表于 2014-10-14 09:45
VBA 的解释器优化吗？
如果优化，下面的语句应该不执行：
for i=1 to 10000000:next

不太明白和楼主所说具体有何关联？

coby001

aoe1981 发表于 2014-10-14 11:14
不太明白和楼主所说具体有何关联？

解释器是不优化的，所以速度慢
编译器是优化的，所以较快

vba是解释执行
vb6有编译为exe的功能

香川群子

aoe1981 发表于 2014-10-13 22:59
“i And 1 ，此操作就是取出 i 的最后一位”
这一句还是不太懂，到底是怎么取的？

帮你扩展一下知识：

通用化的描述：【二进制位运算 Lng And 2^n-1 】

其中n为正整数，因此是下面序列：
1,3,7,15,31,63,127,255,511,1023,2047,4095,8191,16383,32767,65535,……
但对应于二进制则是：
00000000000001 = 1
00000000000011 = 3
00000000000111 = 7
00000000001111 = 15
00000000011111 = 31
00000000111111 = 63
00000001111111 = 127
00000011111111 = 255
00000111111111 = 511
00001111111111 = 1023
00011111111111 = 2047
00111111111111 = 4095
01111111111111 = 8191
…………

任意Lng 和它们的And位运算，结果为：截取末尾n位二进制数、舍去前面所有的二进制数(如果有的话)

此方法，实际有用的只有：
1. Lng And 1 …… 等效于 Lng Mod 2
2. Lng And 255 ……等效于截取 八位二进制数，或可理解为求Lng的二进制数对256求其二进制余数。
3. Lng And 65535 ……等效于截取 十六位二进制数，或可理解为求Lng的二进制数对65536求其二进制余数。

呵呵。
上述方法，在二进制运算中常有出现。比如用来表示三原色的RGB()函数中可以使用。

aoe1981

香川群子 发表于 2014-10-14 11:17
帮你扩展一下知识：

通用化的描述：【二进制位运算 Lng And 2^n-1 】

您可能知不知道，您的这组数字的前6个其实和八卦中的“十二消息卦”有点关联，是用来界定二十四节气的……呵呵

aoe1981

香川群子 发表于 2014-10-14 11:17
帮你扩展一下知识：

通用化的描述：【二进制位运算 Lng And 2^n-1 】

rgb()试了下不是工作表函数，是vba函数吗？再试试……

aoe1981

coby001 发表于 2014-10-14 11:17
解释器是不优化的，所以速度慢
编译器是优化的，所以较快

这倒是的，多谢指点，一直听说vba是依附开Excel的……

jsxjd

aoe1981 发表于 2014-10-14 11:14
不太明白和楼主所说具体有何关联？

存在优化的话，空循环应该被“优化”掉

aoe1981

jsxjd 发表于 2014-10-14 14:18
存在优化的话，空循环应该被“优化”掉

这类学问很高深，没有接触过……多谢指点！

水和米

好帖啊，必须留名