Question

PB中数值转换的问题

例如-34.567转换为34567这样的格式,即去掉-号,去掉小数点
0.356转换为00356这样的格式
实际上问题前几天已经解决了.

replace(string(abs( abs(compute_0003) /10-compute_6 *99.999),"00.000"),3,1,'')

基本上跟一楼说的方法是一样的,只是把它合并起来用了.

Answer 1

(1):
string ls_num
ls_num = string(abs(-34.567))
if pos(ls_num,".") > 0 then
ls_num = Replace(ls_num,pos(ls_num,"."),1,"")
end if
messagebox("",ls_num)//ls_num 就是第一种转换后格式

(2):
string ls_num
ls_num = string(0.356)
if pos(ls_num,".") > 0 then
ls_num = string(Replace(ls_num,pos(ls_num,"."),1,""),"00000")
end if
messagebox("",ls_num)//ls_num 就是第二种转换后格式