内容正文:
《VB字符串加密与解密》学习任务单
(
Private Sub JieM1_Click()
Dim miwen As String
Dim t As String, ch As String
miwen = Text1.Text
For i = _____To ___________
ch=___________________
t = t+__________________
Next i
Text2.Text = _________________
End Sub
End Sub
)上机实践:任务一【破译密文1(限ASCII字符)】
任务描述:先根据密文在下表中填写出你破解的明文,
在任务单中补写代码,最后上机实践验证你破译出的
明文是否正确。
【破译要点:恺撒加密法思想(字符简单移位加密)】
密文1
kxlihqjEdqn
解密密钥
ASCII字符依次向前移3位进行解密(-3)
明文1
上机实践:任务二【破译密文2(限ASCII字符)】
任务描述:根据解密密钥和流程图,说说你的解密思路,补写流程图待填写部分,并在任务单中补写代码,最后上机实践验证你破译出的明文是否正确。
【破译要点:恺撒加密法思想(字符循环移位加密)】
密文2
82,Pbzqlo5,Bumobpp abifsbov@Qeb qefoa txo wlkb
解密密钥
使字符串一个范围内首尾相连,对ASCII字符依次向后移3位。(+3)
(1)英文字母向后移3位,那么A→D,B→E……X→A,Y→B,Z→C,小写字母也是依循相同的解密规则。
(2)数字向后移3位,那么0→3,1→4……7→0,8→1,9→2
(3)其他字符则将其替换为下划线 "_" 。
明文2
【补写流程图内容】
(
请填写出流程图中的(1)、(2)、(3)处的内容
_________________________________________________________________________
__________________________________________________________________________
____________________________________________________________