VB加密解密字符串 DimoDimstrasstringSeto=CreateObject("MyEncrypt.DES")str=o.Encrypt("加密的明文","8位数密匙(记住要用于解密)")str=o.Decrypt("解密的密文","8位数密匙(加密时的密匙)")
VB6.0加密解密 COM组件注册使用cmd进入以下路径调用RegAsm.exe使用以下的命令\Microsoft.NET\Framework\v4.0.30319下面的命令将注册myTest.dll中包含的所有公共类。regasmmyTest.dll下面的命令生成包含所有必要的注册表项的myTest.reg文件。此命