809
社区成员
- 主页
- API 调用
- 基础类
- 控件与界面
- 数据库相关
- DataWindow
- 项目管理
- Web 应用
- 脚本语言
各位大虾，怎样把十进制转换成十六进制啊？
怎样把十进制转换成十六进制啊？例如：怎样把十进制的146转换成十六进制的92？
有没有函数啊？
有没有函数啊？
...全文
请发表友善的回复…
发表回复
dotnba 2003-01-20
long ll_X16,Temp
String ls_X16,ls_X16A[16] = {"0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F"}
Temp = ll_X16
Do While Temp > 0
ls_X16 = ls_X16A[Mod(Temp,16) + 1] & ls_X16
Temp = Temp / 16
Loop
spoky 2003-01-20
string dec2hex(ulong a_ulong){
long i ,n
string s,c
do while a_ulong > 0
n=mod(a_ulong,16)
a_ulong = long(a_ulong/16)
if n<10 then
c=string(char(asc('0') + n))
else
c=string(char(asc('A') + n - 10))
end if
s=c+s
loop
return s
}
long i ,n
string s,c
do while a_ulong > 0
n=mod(a_ulong,16)
a_ulong = long(a_ulong/16)
if n<10 then
c=string(char(asc('0') + n))
else
c=string(char(asc('A') + n - 10))
end if
s=c+s
loop
return s
}
iamxia 2003-01-20
PB 中好象没有，学习