例如，當偏移量是左移3的時候（解密時的密鑰就是3）：
復制代碼代碼如下:
明文字母表：ABCDEFGHIJKLMNOPQRSTUVWXYZ
密文字母表：DEFGHIJKLMNOPQRSTUVWXYZABC
以上都是廢話啦，最近在教一個小朋友VBS，給她出了一道題，讓她實現凱撒密碼算法，不過貌似有點難了。Google了一下凱撒密碼，出來的基本都是C和Java的實現，還是我自己寫吧。
復制代碼代碼如下:
Function Caesar(str,offset)
Dim length,char,i
Caesar = ""
length = Len(str)
For i = 1 To length
char = Mid(str,i,1)
If char >= "A" And char <= "Z" Then
char = Asc("A") + (Asc(char) - Asc("A") + offset) Mod 26
Caesar = Caesar & Chr(char)
ElseIf char >= "a" And char <= "z" Then
char = Asc("a") + (Asc(char) - Asc("a") + offset) Mod 26
Caesar = Caesar & Chr(char)
Else
Caesar = Caesar & char
End If
Next
End Function
WScript.Echo Caesar("ABCDEFGHIJKLMNOPQRSTUVWXYZ",3)
WordPress的默認主題真不好使，代碼竟然溢出了，將就著看吧，或者給我推薦一個好看點的主題也行。
