level 12
private myHex(byval code as currency) as string
dim a as long,b as long
a = fix(code / 4294967296) '高位
b = code - a * 4294967296 '低位
myHex = hex(a) & hex(b)
end function
这样也可以将就
2024年09月12日 16点09分
4
这样处理b会溢出的吧，如果真的需要转换大整数那就整体转就是，何必拆开
2024年09月13日 11点09分
