题型：综合题 题类：常考题 难易度：困难
浙江省东阳中学2015-2016学年高一下学期信息技术期中考试试卷
Private Sub Command1_Click()
Dim t1 As Integer, t2 As Integer
Dim i As Integer, t As Integer
Dim f As Single
List1.Clear
t1 = Val(Text1.Text)
t2 = Val(Text2.Text)
If①Then ' (选填字母,从下列ⅰ、Ⅱ、Ⅲ、Ⅳ中选取一项）
t = t1: t1 = t2: t2 = t
End If
i = t1
Do While②'(选填字母,从下列ⅰ、Ⅱ、Ⅲ、Ⅳ中选取一项）
f = i * 9 / 5 + 32 '摄氏温度转换为华氏温度
List1.AddItem Str(i) + " " + Str(f)
'（填程序代码）
Loop
End Sub
划线①、②处的选项: Ⅰ.i <= t2 Ⅱ.f <= t2 Ⅲ.t1 > t2 Ⅳ.i < f
⑴以字节为单位进行加密处理；
⑵将1个字节的8位二进制数分割成前4位与后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程序如下：
试题篮
