ROI-13（回轉(zhuǎn)13位）是一種簡(jiǎn)易的替換式密碼，編碼解碼規(guī)則相同，針對(duì)英文字母，僅僅只需要檢查字母順序并用13位后的對(duì)應(yīng)字母取代它，超過時(shí)則重新繞回26個(gè)英文字母開頭即可。即A換成N、B換成O，以此類推到M換成Z，然后序列反轉(zhuǎn)；N換成A、O換成B……
       小明決定以ROT-13為基礎(chǔ)制定新的ROT-n,即每次回轉(zhuǎn)不是13位，而是n位。因此他引入了11位數(shù)字密鑰和字符位置來計(jì)算n的值，并擴(kuò)大加密范圍，使得大小寫字母和數(shù)字都能加密，從而達(dá)到加密效果增強(qiáng)的目標(biāo)。具體規(guī)則如下：
（1）字符在奇數(shù)位置上n的值即當(dāng)前對(duì)應(yīng)密鑰值，偶數(shù)位置上n的值為當(dāng)前段密鑰中已經(jīng)出現(xiàn)的所有數(shù)字之和。
（2）數(shù)字字符在“0”到“9”之間回轉(zhuǎn)，即超過“9”部分返回“0”開始繼續(xù)計(jì)算：大寫字母在“A”到“Z”范圍內(nèi)回轉(zhuǎn)，小寫字母在“a”到“z”范圍內(nèi)回轉(zhuǎn)，其它字符不變。

程序代碼如下
Private Sub Command1_Click）
Dim i,z,m,js As Integer
im s,c,h,t As String
Const my=“14159265358”
Text2．Text=“”
S=Text1．Text
z=1
For i=1 To Len（s）
     ①
If z=12 Then z=1：js=0
m=Val（Mid（my,z,1））
js=js+m
If       ②Then n=js Else n=m
If c＞=“0“And c＜=“9“Then
h=CStr（（Val（c）+n）Mod 10）
Elself c＞=“A“And c＜=“Z“Or c＞=“a”And c＜=“z“Then
t=Chr（Asc（c）+n Mod 26）
If c＞=“A“And c＜=“Z“Then
If Not （t＞=“A“And t＜=“Z“）Then h=Chr（Asc（t）-26）Else h=t
Else
If Asc（c）+n Mod 26＞122 Then h=Chr（（Asc（c）+n Mod 26）-26）Else h=t
End  If
Else
h=c
End If
Text2．Text=Text2．Text+h
      ③
Next i
End Sub
請(qǐng)回答下列問題
（1）解密過程為加密過程的逆運(yùn)算，即由密文字符向前推導(dǎo)n位尋找原字符，現(xiàn)已知密鑰為123，密文“WEjpq j”（無雙引號(hào)）對(duì)應(yīng)的原文是

VBgood

VBgood

。
（2）程序功能實(shí)現(xiàn)則代碼中劃線部分請(qǐng)?zhí)钊牒线m代碼
①處代碼

c=mid（s,i,1）

c=mid（s,i,1）

；②處代碼

i mod 2=0

i mod 2=0

；③處代碼

z=z+1

z=z+1

。