28,390
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
blueboymin 2003-05-07
- 打赏
- 举报
有函数的
CLng("&h" & hex_value)
如：
Clng("&h" & 64)
则返回结果是100
CLng("&h" & hex_value)
如：
Clng("&h" & 64)
则返回结果是100
750906 2003-05-07
- 打赏
- 举报
没有函数
960379 2003-05-07
- 打赏
- 举报
for j=1 to len(hcode)-i
呵呵
呵呵
960379 2003-05-07
- 打赏
- 举报
给你写一个：
hcode为十六进制的数。
for i=1 to len(hcode)
nn=1
m=mid(hcode,i,1)
if m="a" then m=10
else if m="b" then m=11
else if m="c" then m=12
......
else if m="f" then m=16
else
m=m
end if
for j=1 to 8-i '将16进制的hcode化成十进制的i1。
nn=16*nn
next
i1=i1+m*nn
next
hcode为十六进制的数。
for i=1 to len(hcode)
nn=1
m=mid(hcode,i,1)
if m="a" then m=10
else if m="b" then m=11
else if m="c" then m=12
......
else if m="f" then m=16
else
m=m
end if
for j=1 to 8-i '将16进制的hcode化成十进制的i1。
nn=16*nn
next
i1=i1+m*nn
next
youbest 2003-05-06
- 打赏
- 举报
没有直接使用的函数
opolmzy 2003-05-06
- 打赏
- 举报
下载winhex
helloma 2003-05-06
- 打赏
- 举报
帮帮忙
