现有等式：(1A)m - (10)n = (20)t , 式中1A、 10、20是三个不同进制的数，则m, n和t分别为：

A．16、10、7

B．16、7、10

C．16、8、10

D．16、10、8

（加试题）某数据解密方法描述如下：对输入的密文（由英文字母或阿拉伯数字组成的字符串）进行解密，解密后输出明文。解密时对密文中的每个字符进行如下处理：
（1）将该字符的ASCII码转换成对应的8位二进制；
（2）将对应的8位二进制数进行按位取反（1变0，0变1）；
（3）将产生的8位二进制数循环左移2次；

图a
（4）将最后产生的8位二进制数转换成对应的十六进制数。
例如，密文小写字母“d”通过上述解密算法解密后生成的明文是“6E”，信息加密过程如图b所示。

图b
实现上述功能的VB程序如下：在文本框Text1中输入密文，单击“解密”按钮Command1，程序对密文数据依次进行解密处理，在文本框Text2中显示解密后生成的明文。程序运行界面如图c所示。

图c
实现上述功能的VB程序如下，请问答下列问题：
（1）如果输入密文为小写字母“a”，则解密后得到的明文是 ______________。
（2）请在划线处填入合适代码。
Function jiemi(m As String) As String  '将4位二进制数转换成相应的十六进制数
Dim k As Integer, i As Integer
Dim str As String
str = "0123456789ABCDEF"
k = 0
For i = 1 To 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 s1 As String, s2 As String
Dim i As Integer, m As Integer, asc1 As Integer, n As Integer
s = Text1.Text
ans = ""
For i = 1 To Len(s)
ch = Mid(s, i, 1)     '取出第i个字符存入变量ch
asc1 = Asc(ch)
ret = ""
For m = 1 To 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个解密后的字符添加到变量ans的末尾
Next i
Text2.Text = ans
End Sub

十六进制数B3H转换成二进制数为（   ）

A．1111B

B．10100011B

C．10110011B

D．10111100B

某数据加密方法描述如下：
(1)以字节为单位进行加密处理；
(2)将1个字节的8位二进制数分割成前4位与后4位两个二进制数；
(3)分别将上述两个4位二进制数转换为十进制数；
(4)将每个十进制数转换为1个加密字符，对应的“密码表”如下：

值(十进制)	0	1	2	3	4	5	6	7	8	9	10	11	12	13	14	15
加密字符	I	l	i	k	e	C	H	N	P	0	s	t	c	a	r	d

 
小明按照上述方法，设计了一个字符串（仅包含ASCII字符）加密的VB程序，功能如下:单击“加密”按钮Commandl,程序依次将文本框Textl中每个字符的ASCII码值作为1个字节转换为两个加密字符，连接这些加密字符，最后在文本框Text2中输出加密结果。下表显示了字符串中一个字符的加密过程：

程序运行效果如图所示。

实现上述功能的VB程序如下：
（1）请在划线处填入合适代码。
Private Sub Command1_Click()
Dim n As Integer, s As String, i As Integer, ss As String
Dim a As Integer  '存储加密前字符的ASCII码
Dim b1 As Integer, b2 As Integer    '分别存储分割、转换后的两个十进制数
s = Text1.Text
①
For i =" 1" To n
a =" Asc(Mid(s," i, 1))
b1 =" a" \ 16
b2 =" a" Mod 16
ss =" ss" + Code2Char(b1) + Code2Char(b2)
Text2.Text = ss
Next i
End Sub
'十进制值转换为加密字符的函数
Function Code2Char(c As Integer) As String
Dim s As String
s = "IlikeCHNpostcard"
Code2Char = ②
End Function
（2）若将“密码表”中值为“0”对应的加密字符“I”改成“i”，加密后的密文可能无法解密，原因是

进制转换。将一个K进制数（K<=10）x转换成十进制数可采用如下方法：从右向左，依次取数x的各位数字，分别计算出该数从右边数起的第i位数字与k^(i-1)的积，再将其累加，直到所有的数字取完为止。例如，将二进制数1101转换成十进制数的方法如下：
（1101）₂=1×2⁰+0×2¹+1×2²+1×2³=（13）₁₀
下列Visual Basic程序的功能是将K进制数x转换成十进制数。程序运行界面如图所示，在文本框Text1中输入数制k，在文本框Text2中输入数x，单击"转换"按钮（Command1）后，在标签Label1中输出转换的结果。

（1）代码“Command1_Click()”中的Click是________（选填字母：

A．属性名/

B．事件名/

C．方法名/

D．事件处理过程）

（2）实现上述功能的VB程序如下，请在划线①处填入合适代码，②处代码有误，请修改。
Private Sub Command1_Click()
Dim b As Long, i As Integer, k As Integer, x As String, t As String
b = 0
k = Val(Text1.Text)
x = Text2.Text
n =  ①___________
i = 1
Do While i <= n
t = Val(Mid(x, n - i + 1, 1))
b = b + k ^ (i - 1) ‘②处修改___________________
i = i + 1
Loop
Label1.Caption = Str(k) + "进制数" + Text2.Text + "转换成十制数为" + Str(b)
End Sub
（3）运行该程序，在文本框Text1中输入5，文本框Text2中输入1423，单击“转换”按钮，则Label1中显示的值是_____________________。