信息技术奥林匹克竞赛_VB程序设计的常用算法(11)

当加序数后的字母超过"Z"或"z"则 c=Chr(Asc(c)+k -26) 例如：You are good→ Dtz fwj ltti 解密为加密的逆过程

将每个字母C减（或加）一序数K，即 c=chr(Asc(c)-k), 例如序数k为5，这时 "Z"→"U"， "z"→"u"，"Y"→"T"… 当加序数后的字母小于"A"或"a"则 c=Chr(Asc(c)-k +26) 下段程序是加密处理：

i = 1: strp = ""

nL = Len(RTrim(strI))

Do While (i <= nL)

strT = Mid$(strI, i, 1) '取第i个字符

If (strT >= "A" And strT <= "Z") Then

iA = Asc(strT) + 5

If iA > Asc("Z") Then iA = iA - 26

搜索“diyifanwen.net”或“第一范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，第一范文网，提供最新IT计算机信息技术奥林匹克竞赛_VB程序设计的常用算法(11)全文阅读和word下载服务。