请问在QB中如何对“文字和英文”作一个简单的加密程序呢？（急） --谢了

Question

请问在QB中如何对“文字和英文”作一个简单的加密程序呢？（急） --谢了
是否可以写一段示例程序。
如：
DIM str,len% ,jm%,asc
str="holle word"
len%=LEN$(str)
for i=1 to len%
jm%=MID$(str,(len%-1),1)
asc=ASC$(jm%)

..........................
(这 只是一段示例，可能有不少错误）

Answer 1

得到字符的ascii代码，进行简单的运算，再转换位字符就可以了
比如
"人"的ascii是-14133，+4得-14129，将他转换为字符就是"认"
看加密好不好就是看那个运算的复杂度，最好为可逆算法