字符串加密解密，用VB写的加密，要用java解密（附VB解密源代码)。会VB与java的请进！

Question

可生成密钥文件一份，编写加密算法，用密钥对其加密。
java读取密钥文件，依据加密因子用相同的算法就可以解密。

Answer 1

看这个能不能帮上忙：
http://www.china-askpro.com/msg45/qa97.shtml摘录一部分：一般的伪随机数都是按下面的公式计算的： 
    r(i) = (A * r(i-1) + B ) Mod m, i = 1, 2, ... 
    p(i) = r / m 
    这里A、B、m。例如，你可以选A = 2053、B=13849、m=2^16。虽然VB没有说明Rnd函数使用的是什么算法，但我估计也是采用的是上面的公式，只是A、B和m的取值不同罢了。而Randomize实际指定的是公式中的r(0)。 

Answer 2

当然，用java重新写一个加密解密的程序并不难,主要的是原来的程序和客户端都是用VB写的
加密方法。现在服务端要升级，要用java写解密方法，如果推翻重来，把两边的加密算法统一的话，那将是一个不小的升级工程。
所以：现在关键的是，有没有办法写一个解密的方法(用java）....
急。。
如果不行，真是麻烦死我了。

Answer 3

看这个能不能帮上忙：
http://www.china-askpro.com/msg45/qa97.shtml摘录一部分：一般的伪随机数都是按下面的公式计算的： 
    r(i) = (A * r(i-1) + B ) Mod m, i = 1, 2, ... 
    p(i) = r / m 
    这里A、B、m。例如，你可以选A = 2053、B=13849、m=2^16。虽然VB没有说明Rnd函数使用的是什么算法，但我估计也是采用的是上面的公式，只是A、B和m的取值不同罢了。而Randomize实际指定的是公式中的r(0)。 

Answer 4

不是随机数。是用的随机数序列。 每次得到的随机数序列是一样的。因为Rnd-1 ,所以每次得到的是同样的随机数序列。