ascii码转化问题

[kd805fxz]

ls_wrk1=ls_wrk1+wf_dec_hex(asc(mid(ls_data,li_base,1)))

wf_dec_hex是自编的ascii码转换为字符的函数，数据ls_data 中，当数据为“0102030507”不含字母字符时，读数正确，当含有字母字符时。如“d1d2d3d4d5d6d7”时，读数为隔一个，读数为“d1d3d5d7”,这是什么原因，请各位大虾指教。

[klbt]

只能认为函数wf_dec_hex有问题，能贴出吗？

[kd805fxz]

wf_dec_hex(integer dnum)
///////////////
string ls_hh,ls_hl,ls_hnum
ls_hh=string(int(dnum/16))
ls_hl=string(mod(dnum,16))
choose case ls_hl
case "10"
ls_hl="A"
case "11"
ls_hl="B"
case "12"
ls_hl="C"
case "13"
ls_hl="D"
case "14"
ls_hl="E"
case "15"
ls_hl="F"
end choose
choose case ls_hh
case "10"
ls_hh="A"
case "11"
ls_hh="B"
case "12"
ls_hh="C"
case "13"
ls_hh="D"
case "14"
ls_hh="E"
case "15"
ls_hh="F"
end choose
ls_hnum=ls_hh+ls_hl
return ls_hnum