标题:[求助]如何取得一个Long型数的第30位的值?
只看楼主
redice
Rank: 3Rank: 3
等 级:新手上路
威 望:6
帖 子:902
专家分:0
注 册:2006-12-11
结帖率:72.73%
 问题点数:0 回复次数:8 
[求助]如何取得一个Long型数的第30位的值?
如何取得一个Long型数的第30位的值?

(即判断该位上是1还是0) 请问 如何实现 ?
搜索更多相关主题的帖子: Long 
2007-04-29 17:45
Joforn
Rank: 6Rank: 6
等 级:贵宾
威 望:23
帖 子:1242
专家分:122
注 册:2007-1-2
得分:0 
用And

VB QQ群:47715789
2007-04-29 19:21
Joforn
Rank: 6Rank: 6
等 级:贵宾
威 望:23
帖 子:1242
专家分:122
注 册:2007-1-2
得分:0 
dim I as long ,K as long
I=K and &H40000000&

VB QQ群:47715789
2007-04-29 19:22
redice
Rank: 3Rank: 3
等 级:新手上路
威 望:6
帖 子:902
专家分:0
注 册:2006-12-11
得分:0 
回复:(Joforn)dim I as long ,K as long I=K and &...
不理解 能不能详细解释一下

鲲鹏数据 - 专业Web数据采集服务提供者
http://www.
2007-04-30 21:03
zhulei1978
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:53
帖 子:1351
专家分:1200
注 册:2006-12-17
得分:0 
20000000的二进制就是
0010,0000,0000,0000,0000,0000,0000,0000
k与其相与后保留第30位,其余位均为0

[此贴子已经被作者于2007-4-30 21:36:19编辑过]


其实我就是改变社会风气,提高少女素质,刺激电影市道,提高年轻人内涵,玉树临风,风度翩翩的整蛊专家,我名叫古晶,英文名叫JingKoo!
2007-04-30 21:35
hyhhd
Rank: 2
等 级:论坛游民
威 望:1
帖 子:502
专家分:44
注 册:2006-5-12
得分:0 
还是不懂!

2007-05-01 00:16
VBBOY
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2007-5-1
得分:0 

有几个错误,
第一,LONG型的数据不可能到30位,它的有效取值是:-2147483648~2147483647
第二,可以直接将数据转为字符串取它的任一位

2007-05-01 00:37
Joforn
Rank: 6Rank: 6
等 级:贵宾
威 望:23
帖 子:1242
专家分:122
注 册:2007-1-2
得分:0 
以下是引用VBBOY在2007-5-1 0:37:02的发言:

有几个错误,
第一,LONG型的数据不可能到30位,它的有效取值是:-2147483648~2147483647
第二,可以直接将数据转为字符串取它的任一位

第一、Long型的数据是32位的,正数最大值为&H7FFFFFFF&,也就是你的2147483647
第二、我不知道你这样取出来的是什么数值?

第三、我想你弄错了“位”这个含义,位是用于二进制数据中的。
第四、位是从低到高(低从0开始),所以第一个Long型的位数是从0到31,第30位为1的,其它位为0的话这个数的十六进制值就是&H40000000&,十进制为1073741824。
第五、有符号Long的值(VB没有无符号类型的长整型、C中就有有符号长整和无符号长整)是最高位为1(最高位为符号位),其它位为数值的补码,所以&HFFFFFFFF为十进制的-1
第六、如果想取一个数据某一位的值用And是最直接的方法,K=IIf(I And &H40000000&,1,0)的意思为如果I(定义I为Long)第三十位1K=1,否则K=0,也就是将I的第三十位的值赋值给K

[此贴子已经被作者于2007-5-1 11:14:47编辑过]


VB QQ群:47715789
2007-05-01 11:06
redice
Rank: 3Rank: 3
等 级:新手上路
威 望:6
帖 子:902
专家分:0
注 册:2006-12-11
得分:0 
谢谢各位  我现在理解了

鲲鹏数据 - 专业Web数据采集服务提供者
http://www.
2007-05-01 18:14



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-136013-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 1.590315 second(s), 9 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved