小明編寫了一個(gè)數(shù)據(jù)加密的VB程序功能如下：在文本框Text1中輸入明文，單擊“加密”按鈕Command1后在文本框Text2中顯示加密后的密文，運(yùn)行界面如圖所示。

其中加密算法如下：
①將明文中的ASCII碼每3個(gè)字節(jié)為一組（該明文字符串均為ASCII碼，且字節(jié)數(shù)為3的倍數(shù)），順次連接后得到24位二進(jìn)制數(shù)
②將①中的24位二進(jìn)制數(shù)每8位進(jìn)行一次翻轉(zhuǎn)操作，比如原來的“0101 0001”變?yōu)椤?000 1010”
③將②所得24位二進(jìn)制數(shù)逐位取反，比如原來的“1110”變?yōu)椤?001”
④將③中所得的24位二進(jìn)制數(shù)每6位一組轉(zhuǎn)換為相應(yīng)的十進(jìn)制數(shù)，即得到對(duì)應(yīng)的密文
⑤將所有密文順序連接并輸出
實(shí)現(xiàn)上述功能的VB程序如下，請(qǐng)回答下列問題：
（1）按照上述加密算法進(jìn)行加密，則“ABC”的密文是

31275261

31275261

（已知“A”的ASCII碼值為65）
（2）請(qǐng)?jiān)跈M線處填入合適代碼：
Dim a（1To 24）As Integer,k As Integer
Private Sub Command1_Click （　?。?br />Dim mw As String,ch1As Integer,ch2As String,ch3As String,s As String
Dim m As Integer,i As Integer,j As Integer
s=““
mw=Text1．Text‘mw存儲(chǔ)明文字符串
For i=1To Len（mw） Step 3
For j=1To 24‘初始化數(shù)組，用于存儲(chǔ)三個(gè)字節(jié)的二進(jìn)制數(shù)
a（j）=0
Next j
k=1
ch1=Asc（Mid（mw,i,1））
ch2=Asc（Mid（mw,i+1，1））
ch3=Asc（Mid（mw,i+2，1））
Convert （ch1）‘調(diào)用自定義過程Convert
Convert （ch2）
Convert （ch3）
For j=1To 24‘逐位取反
①

a（j）=a（j）xor 1

a（j）=a（j）xor 1

Next j
For j=1To 4
m=0
For p=②

p=6*（j-1）+1

p=6*（j-1）+1

 To j*6‘每6位一組進(jìn)行權(quán)值相加
m=m*2+a（p）
Next p
s=s & m
‘&連接運(yùn)算符，連接數(shù)字和字符串時(shí)，會(huì)將數(shù)字自動(dòng)轉(zhuǎn)換為字符串
Next j
Next i
Text2．Text=s
End Sub
Sub Convert（x As Integer）
Dim i As Integer,j As Integer
Do While x＞0
a（k）=x Mod 2
x=x\2
k=k+1
Loop
j=③

j=8-（k-1）

j=8-（k-1）

‘8位二進(jìn)制數(shù)，高位補(bǔ)“0”
k=k+j
End Sub