VB基础类
这段加密算法还可以反成明码吗？
墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年，写一次发全网
我也要 关注 + 加入社区Function mistake(preString)
Dim texts
Dim seed As Integer
Dim i, length
preString = Trim(preString)
length = Len(preString)
seed = length
Randomize (length)
texts = ""
For i = 1 To length
seed = Int(94 * Rnd(-Asc(Mid(preString, i, 1)) - seed * Asc(Right(preString, 1))) + 32)
texts = texts & Chr(seed) & Chr(Int(94 * Rnd(-seed) + 32))
Next
Dim dist
dist = texts
For i = 1 To Len(texts)
If Mid(texts, i, 1) <> "'" Then
dist = dist + Mid(texts, i, 1)
End If
Next
mistake = dist
End Function
先发10分。
解决了，加100分！！！！！！！
Dim texts
Dim seed As Integer
Dim i, length
preString = Trim(preString)
length = Len(preString)
seed = length
Randomize (length)
texts = ""
For i = 1 To length
seed = Int(94 * Rnd(-Asc(Mid(preString, i, 1)) - seed * Asc(Right(preString, 1))) + 32)
texts = texts & Chr(seed) & Chr(Int(94 * Rnd(-seed) + 32))
Next
Dim dist
dist = texts
For i = 1 To Len(texts)
If Mid(texts, i, 1) <> "'" Then
dist = dist + Mid(texts, i, 1)
End If
Next
mistake = dist
End Function
先发10分。
解决了，加100分！！！！！！！
...全文
相关推荐
维吉尼亚加密算法的JAVA实现
运行环境：Windows + eclipse + JAVA 维吉尼亚密码（又译维热纳尔密码）是使用一系列凯撒密码组成密码字母表的加密算法，属于多表密码的一种简单形式。
维吉尼亚算法_维吉尼亚加密算法_back_源码.zip
维吉尼亚算法_维吉尼亚加密算法_back_源码.zip
维吉尼亚加密算法
维吉尼亚加密算法，已在cFree上运行通过..
维吉尼亚密码与AES加密解密及爆破实现项目_包含维吉尼亚密码的加密算法实现维吉尼亚密码的解密算法实现维吉尼亚密码的已知密文和部分明文或密钥长度情况下的爆破攻击实现高级加密标准.zip
维吉尼亚密码与AES加密解密及爆破实现项目_包含维吉尼亚密码的加密算法实现维吉尼亚密码的解密算法实现维吉尼亚密码的已知密文和部分明文或密钥长度情况下的爆破攻击实现高级加密标准.zip
基于Java语言的维吉尼亚加密算法实现加解密程序设计源码
该项目是一个基于Java语言的维吉尼亚加密算法实现，包含20个文件，包括6个XML配置文件、2个Git忽略文件、2个Markdown文件、2个Java源文件、2个class文件、1个LICENSE文件、1个PNG图片文件、1个属性文件和1个JAR包文件。该程序专注于维吉尼亚加密的加解密功能。
