小林發給小周一串密文“VghpcyBpcyBhbiBleGFtcGxl”并告訴小周，這串密文由明文字符串（僅包含ASCII字符，且字節數為3的倍數）經以下規則加密而成：
（1）將明文ASCII碼分成3個字節一組，順次連接后得到24位二進制數；
（2）將得到的24位二進制數字按每6位一組分成4組，每組6個位；
（3）在（2）中得到的6個位前補上兩個0，得到4個字節的二進制數；
（4）將（3）中得到的四個二進制數分別轉換為十進制數；
（5）將每個十進制數轉換為1個加密字符，對應的“密碼表”按數值由0到63依次為“ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/”小周按照上述規則，設計了一個解密VB程序，功能如下：單擊“解密”按鈕Command1，程序依次將文本框Text1中每4個密文字符按加密規則轉換為3個明文字符，連接這些明文字符，最后在文本框Text2中輸出結果。程序運行效果如圖所示。
實現解密功能的VB程序如下，請回答下列問題：
（1）若密文字符串的長度是120，則解密后明文字符串的長度是

90

90

。
（2）請在橫線處填入合適代碼。
Function Char2Int（c As String） As Integer
If c＞=“A“And c＜=“Z“Then’字母“A”的 ASCII碼是65
Char2Int=Asc（c）-65
Elself c＞=“a“And c＜=“z“Then’字母“a”的ASCII碼是 97
Char2Int=Asc（c）-71
ElseIf c＞=“0“And c＜=“9“Then’數字“0”的ASCII碼是48

①

①

ElseIf c=“+“Then
Char2Int=62
Else
Char2Int=63
End If
End Function
Private Sub Command1_Click （　?。饷苓^程
Dim n As Integer,s As String,i As Integer,ss As String
Dim a（0 To 3）As Integer’依次存儲一組四個密文按密碼表換算出的數值
Dim b（0 To 2）As Integer’依次存儲一組三個明文字符的ASCII值
s=Text1．Text
n=Len（s）
ss=““
For i=1 To n Step 4
For j=i To i+3
a（

②

②

）=Char2Int（Mid（s,j,1））
Next j
b（0）=a（0）*4+a（1）\16

③

③

b（2）=（a（2）Mod 4）*64+a（3）
For j=0 To 2
ss=ss+Chr（b（j））
Next j
Next i
Text2．Text=ss
End Sub