小婷编写了一个VB程序，实现如下功能，在文本框text1中输入一个4位整数zs，单击解密按钮后，在list1列表框中显示当前zs值降序开始的10位相邻整数“解密前”和“解密后”的信息，运行界面如第图所示。
解密规则：将整数中各个位中的每一位值乘以5，然后除以8所得余数即为该位的值，然后将所得数的首末位进行交换。如数字9357，解密后的值为 3715。

（1）观察程序代码，可知“解密”按钮的对象名是     。
（单选，填字母：

A．Command1

B．List1

C．Decryp_Click( )

D．Decryp

E．解密）

（2）实现上述功能，请在划线处填入合适的代码。
Private Sub Decryp_Click( )
Dim zs As Long, g As Integer, s As Integer, b As Integer, q As Integer
Dim jmh As String, m As Integer
zs = Val(Text1.Text)
For m = zs To ①   
q = (m \ 1000) * 5 Mod 8
b = ((m \ 100) Mod 10) * 5 Mod 8
s = ((m \ 10) Mod 10) * 5 Mod 8
g = (m Mod 10) * 5 Mod 8
jmh =  ②  
List1.AddItem Str(m) + "  " + jmh
Next m
End Sub
（3）由上述算法可知，四位数“6124”对应的解密数值是 。

下列结果为True的逻辑表达式是（   ）。

A．(5＜13)or(6＞9)	B．Int(3.1)＞Sqr(9)
C．(3＜＞5) And (5=10)	D．Len（"0"）=0

为了实现两个变量A和B的值交换，我们可以借助第三变量C。正确步骤为_________。
①A←B  ②A←C  ③B←A  ④B←C  ⑤C←A  ⑥C←B

填空题：（共8分，每小题2分）。
（1）  本程序中，变量a、b 的数据类型都是___________（填写中、英文均可）。

（2）以上代码中，表示输出语句的是第____行。
（3）本程序中，代码a=a+b的含义是_____（选填Ⅰ或Ⅱ）。
选项:Ⅰ.把a的值赋给a+b
Ⅱ.把a加b的和赋给a
（4）若输入的两个数分别是10和20，则程序执行完毕，变量a的值是____，变量b的值是____。

下列流程图描述的是判断任意3个正数A、B、C是否能构成勾股数，请按此算法功能，把流程图填写完整。

A．A^2="B^2+C^2" or B^2="A^2+C^2" and C^2=A^2+B^2

B．A^2="B^2+C^2" and B^2="A^2+C^2" or C^2=A^2+B^2

C．A^2="B^2+C^2" and B^2="A^2+C^2" and C^2=A^2+B^2

D．A^2="B^2+C^2" or B^2="A^2+C^2" or C^2=A^2+B^2