急求解PB程序 ASCII码结果 转回成字符??? 详细问题如下：

问题：将字符转换成ASCII码后，如何将转换的ASCII码反转回字符?
如 string a = 5e2sc
string b， c
b= wf_ASCIi (a) //wf_ASCIi() 是ASCII码生成函数，
//假如结果 b=123456
//---------------wf_ASCII函数如下------------
long ll_len, ll_i, ll_gs
string ls_asc, ls_str_single, ls_asc_b

ll_len = len(as_str)
for ll_i = 1 to ll_len
ls_str_single = mid(as_str, ll_i, 1)
ls_asc = ls_asc + string(asc(ls_str_single))
next
//-----在没个字符取整数加当前的长度位置和的个为数字
ll_len = len(ls_asc)
for ll_i = 1 to ll_len
ls_str_single = right(string((long(mid(ls_asc, ll_i, 1)) + ll_i)), 1)
ls_asc_b = ls_asc_b + ls_str_single
next
return ls_asc_b

如何将“b=123456 ASCII码 ，再转换成 a=5e2sc 的字符？？根据上边wf_ASCII码函数,如何写转回字符的反算函数？？？？？
c = xxxxx(b) // xxxxx代表反算函数名 c的结果等于a也就是c=5e2sc

char(整型ASC码)，可以反解出来这个ASC码代表的字符

如何在pb中使用ascii码为0的字符？ 解决方案： 1、如何向注册表中写二进制，要求最后显示为“00” blob{1} k li_sysdir=registryset('hkey_current_user oftware\odbc\odbc.ini za\engines\xbase','statistics',regbinary!,k) 2、如何向注册表中写二进制，要求最后显示为“01” blob lb_v lb_v=blob(char(1)) li_sysdir=registryset('hkey_current_user oftware\odbc\odbc.ini za\engines\xbase','statistics',regbinary!,lb_v)