某數(shù)據(jù)解密方法描述如下：對(duì)輸入的密文（由英文字母或阿拉伯?dāng)?shù)字組成的字符串）進(jìn)行解密，解密后輸出明文。解密時(shí)對(duì)密文中的每個(gè)字符進(jìn)行如下處理：
（1）將該字符的ASCII碼轉(zhuǎn)換成對(duì)應(yīng)的8位二進(jìn)制；
（2）將對(duì)應(yīng)的8位二進(jìn)制數(shù)進(jìn)行按位取反（1變0，0變1）；
（3）將產(chǎn)生的8位二進(jìn)制數(shù)循環(huán)左移2次；

（4）將最后產(chǎn)生的8位二進(jìn)制數(shù)轉(zhuǎn)換成對(duì)應(yīng)的十六進(jìn)制數(shù)。
例如，密文小寫字母“d”通過(guò)上述解密算法解密后生成的明文是“6E”，信息加密過(guò)程如圖b所示。
實(shí)現(xiàn)上述功能的VB程序如下：在文本框Text1中輸入密文，單擊“解密”按鈕Command1，程序?qū)γ芪臄?shù)據(jù)依次進(jìn)行解密處理，在文本框Text2中顯示解密后生成的明文。程序運(yùn)行界面如圖c所示。
實(shí)現(xiàn)上述功能的VB程序如下，請(qǐng)回答下列問(wèn)題：
（1）如果輸入密文為小寫字母“a”，則解密后得到的明文是

7A

7A

。
（2）請(qǐng)?jiān)跈M線處填入合適代碼。
Function jiemi（m As String） As String'將4位二進(jìn)制數(shù)轉(zhuǎn)換成相應(yīng)的十六進(jìn)制數(shù)
Dim k As Integer,i As Integer
Dim str As String
str=“0123456789ABCDEF“
k=0
For i=1To 4
k=k*2+Val（Mid（m,i,1））
Next i

①

①

End Function
Private Sub Command1_Click （　　）
Dim ans As String,s As String,ch As String,ret As String
Dim s1As String,s2As String
Dim i As Integer,m As Integer,asc1As Integer,n As Integer
s=Text1．Text
ans=““
For i=1To Len（s）
ch=Mid（s,i,1）'取出第i個(gè)字符存入變量ch
asc1=Asc（ch）
ret=““
For m=1To 8'完成解密步驟（1）和步驟（2）

②

②

ret=n & ret
asc1=asc1\2
Next m
ret=Mid（ret,3，6）+Mid（ret,1，2）'完成解密步驟（3）
s1=jiemi（Mid（ret,1，4））

③

③

ans=ans& s1 & s2'將第i個(gè)解密后的字符添加到變量ans的末尾
Next i
Text2．Text=ans
End Sub