您的位置：程序门 -> vb -> 基础类

请问在vb有没有一个函数实现这样的功能：

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

请问在vb有没有一个函数实现这样的功能：[已结贴,结贴人:realseek]

发表于：2007-03-30 08:10:57 楼主

比如数据m=&h67,hex（m)得到字符串67；而对于&h6,用hex函数返回得到字符6，事实上是前面还有一个0省略了吧。因为我需要返回字符串06。
所以我每次总是要判断这个数是不是小于&h10,如果小于，那么字符串s=hex（0)+hex（m);否则s=hex（m);
请问有没有这样的函数直接返回两个字符的，谢谢

发表于：2007-03-30 08:16:191楼得分:10

一般采用这样的方法:
right（ "000 " + hex（m), 4)
^ ^转换之后的十六进制数的位数
此处字符0的个数不少于转换之后的十六进制数的位数-1

发表于：2007-03-30 08:18:172楼得分:0

当然, 可以自己写个函数, 例如:

option explicit

function hexex（byval ivalue as long, byval ibit as integer) as string
hexex = right（string（ibit, "0 ") & hex（ivalue), ibit)
end function

private sub form_load（)
debug.print hexex（9, 2)
debug.print hexex（100, 4)
end
end sub

其他资讯