加密函数Dll

发布的聊天软件所使用加密函数,前两天看到有人需要密文是数字的加密方法,自己做的一个,使用随机加密,可能在加密少量数据时,密文较长,全当参考.加密函数是FunctionEncrypt(ByValtransString)AsString解密函数是FunctionUnEncrypt(ByvaltransNumber)AsString