文件名称：vb设计的加密解密程序
文件大小：6KB
文件格式：ZIP
更新时间：2014-06-04 14:41:44
vb
For i = 1 To n s = Mid(Text1.Text, i, 1) If s >= "a" And s <= "z" Then s = Chr(Asc(s) + 5) If s > "z" Then s = Chr(Asc(s) - 26) ElseIf s >= "A" And s <= "Z" Then
【文件预览】：
加密解密
----加密解密.exe(20KB)
----vblt4-16.frm(3KB)
----工程1.vbp(639B)
----MSSCCPRJ.SCC(190B)
----工程1.vbw(50B)