Office中国论坛/Access中国论坛

标题: 快速实现　Integer 值　与 Byte 互换算，拓展思路 [打印本页]

作者: 海狸先生 时间: 2005-8-14 01:14
标题: 快速实现　Integer 值　与 Byte 互换算，拓展思路
先定义一个byte数组

dim bytI() as Byte

bytI=chrW(20520)

这样就把　20520　这个数值换算成 byte 了，

用 for i=lboung(bytI) to ubound(bytI)

debug.print bytI(i)

next

就可以查看出换算后的值了

[此贴子已经被作者于2005-8-13 19:07:10编辑过]

作者: 海狸先生 时间: 2005-8-14 03:03
同理　用 AscW(byti) 就可以把　byte 换算成　Integer

[此贴子已经被作者于2005-8-13 19:06:20编辑过]

作者: LucasLynn 时间: 2005-8-14 04:08
这里应该是没有考虑负数问题吧。

作者: 海狸先生 时间: 2005-8-14 04:42
你可以试一下哦

作者: LucasLynn 时间: 2005-8-14 17:06

以下是引用海狸先生在2005-8-13 20:42:00的发言：

你可以试一下哦

可是大小范围的限制太不爽了，我要转换的都是Long，一不小心就溢出了……

[em06]

作者: 海狸先生 时间: 2005-8-14 17:10
不过速度我没测试，你试试，另外long转换交给你了，呵呵

作者: eyewitnes 时间: 2005-8-14 17:45

以下是引用海狸先生在2005-8-14 9:10:00的发言：

不过速度我没测试，你试试，另外long转换交给你了，呵呵

太不负责任了吧？？啊？

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)