PB自定义全局函数

求热心的高手帮我这位想学PB的菜鸟回答一下.

建全局函数来实现对系统用户的加密

函数名：f_encrypt 参数名：a_ymm

// 功能加密//参数:字符串//返回值:字符串

integer i,li_kllen

string li_zmkl

li_kllen=len(a_ymm) 这句啥意思?

for i=1 to li_kllen 这句啥意思 ?

ls_zmkl=ls_zmkl+char(asc(mid(aymm,i,1)+i+li_kllen) 这句啥意思?

next

return ls_zmkl 还有这句, 为什么返回 这个ls_zmkl变量?

li_kllen=len(a_ymm) 求输入用户名a_ymm的长度

for i=1 to li_kllen 循环

ls_zmkl是加密后的密码

char(asc(mid(aymm,i,1)+i+li_kllen) 是加密算法

比如

a_ymm 为 user

li_kllen=4

在 for 循环里面 分别取得 u s e r 四个字母

通过

char(asc(mid(aymm,i,1)+i+li_kllen)

把这4个字母变成加密后的字符串

然后返回