浙江省绍兴市2022届高三4月信息技术高考科目考试适应性考试（二模）试卷

登录二一教育在线组卷平台 助您教考全无忧
浙江省绍兴市2022届高三4月信息技术高考科目考试适应性考试（二模）试卷
一、选择题(本大题共12小题，每小题2分，共24分。)
1．（2022·绍兴模拟）2022 年北京冬季奥运会的吉祥物“冰墩墩”，将熊猫形象与冰晶外壳相结合，整体形象酷似航天员。下列描述不正确的是（　　）
A．“冰墩墩”形象被人们熟知，体现了信息的共享性
B．“冰墩墩” 图像经过互联网社交媒体传播，没有经过数字化处理
C．“冰墩墩”整体形象的设计与创作，说明信息具有可加工处理性．
D．未经授权将“冰墩墩”做成表情包并在网上传播，属于网络侵权行为
【答案】B
【知识点】信息及其特征；知识产权
2．（2022·绍兴模拟）下列关于信息安全的说法，不正确的是（　　）
A．使用自己的生日作为密码既方便又安全
B．随意连接公共场所的Wi-Fi网络存在安全风险
C．随意扫描二维码安装手机APP存在安全风险
D．网上银行支付时通过U盾进行验证，可以提高安全性
【答案】A
【知识点】个人信息及安全防范
3．（2022·绍兴模拟）小明使用Access软件设计“水果进货”数据表，存储如下图所示的“水果进货单”。
水果编号 水果名称 单位 单价 入库数量 入库日期 审核
A001. 红富士苹果 箱 ￥75.00 50 2021/12/21 已审核
A002 阿克苏苹果 箱 ￥80.00 100 2021/12/26 未审核
A001 红富士苹果 箱 ￥75.00 100 2021/12/23 未审核
…… …… …… …… …… …… ……
下列关于“水果进货”数据表的描述，正确的是（　　）
A．“水果进货”数据表中的字段数量一定为7个
B．“审核”列对应数据表中的字段类型只能设置为“文本”型
C．“水果编号”列对应数据表中的字段可以设置为主键
D．修改“水果进货”数据表中字段的名称，不会影响字段的值
【答案】D
【知识点】数据表、字段、记录的编辑
4．（2022·绍兴模拟）下列关于计算机信息编码的描述，正确的是（　　）
A．汉字的输入码不是唯一的，常见的有音码、形码等
B．ASCII 码在计算机中存储时占8位，共有256个ASCII字符
C．用视频处理软件把AVI格式视频转为MPEG格式的过程是无损压缩
D．若两位十六进制数的首位不为“0”，末位为“0”，则其一定大于十进制数16
【答案】A
【知识点】字符编码；声音、图像、视频编码
5．（2022·绍兴模拟）使用Photoshop软件制作“丰收节”作品，部分编辑界面如图所示。
下列说法正确的是（　　）
A．“背景”图层被锁定，不能直接删除“背景”图层
B．当前状态下，可以用自由变换仅调整“文字”图层中部分文字的大小
C．当前状态下，可以对“枫叶”图层执行“拷贝图层样式”操作
D．将该文件直接保存为BMP格式图像，“农民”图层内容不可见
【答案】D
【知识点】图层及图层的基本操作
6．（2022·绍兴模拟）将一段时长为50秒，采样频率为44100Hz，量化位数为16bit的双声道声音存储为MP3格式，存储容量约为1.2MB，则压缩比约为(　　)
A．3.5：1 B．7：1 C．28：1 D．56：1
【答案】B
【知识点】声音、图像、视频编码
7．（2022·绍兴模拟）下列VB表达式的值为True的是(　　)
A．"9"< "10" B．2021 Mod 100\ 10= 2
C．Len("12" + "3")= 3 D．Int(-4．1)=-4
【答案】C
【知识点】运算符、基本运算与表达式
8．（2022·绍兴模拟）某算法的部分流程图如图所示。执行这部分流程，则输出s的值是(　　)
A．52 B．74 C．80 D．82
【答案】D
【知识点】流程图识读
9．（2022·绍兴模拟）一个序列经过一趟冒泡排序后的结果是：10，21，13，24，28，则原始序列不可能是(　　)
A．21，13，24，28，10 B．21，10，24，28，13
C．21，10，24，13，28 D．21，24，13，28，10
【答案】D
【知识点】排序算法及程序实现
10．（2022·绍兴模拟）某对分查找算法的VB程序段如下：
Key = Val(Text1．Text)
i= l：j= Key
Do While i<= j
m=(i+j)\2 '①
If Key=m*m Then Exit Do 'Exit Do表示退出循环
If Key>m* m Then i=m+ 1 Else j=m- 1
Loop
If i> j Then
Label1．Caption= Key & "不是完全平方数"
Else
Label1．Caption= Key & "是完全平方数"
End If
运行该程序段，在文本框Text1中输入15，运行后①处语句的执行次数是（　　）
A．3 B．4 C．5 D．6
【答案】B
【知识点】查找算法及程序实现
11．（2022·绍兴模拟）有如下VB程序段：
Dim a(0 To 10) As String
s= Text1.Text
a(0)= "": a(1)= Mid(s, 1, 1)：t= 1
For i= 2 To Len(s)
If t>= 1 And Mid(s, i, 1)= a(t) Then
t=t- 1
Else
t=t+ 1: a(t)= Mid(s, i, 1)
End If
Next i
运行程序段，在文本框Text1中输入以下字符串，运行后变量t的值与其它三项不同的是（　　）
A．AABAB B．AAABA C．BAABA D．BBABA
【答案】C
【知识点】分支结构语句及程序实现；循环结构语句及程序实现
12．（2022·绍兴模拟）无序数组元素a(1)到a(n)中存在一个出现次数过半的值，如数组a的值依次为3，1，2，2，2，其中出现次数过半的元素为2。查找该值的VB程序段如下：
c= a(1): cnt= 0
For i= 1 To
If Then c= a(i)
If Then cnt= cnt+ 1 Else cnt= cnt- 1
Next i
Text1.Text= "出现次数过半的值是： " &c
上述程序段3个方框处的代码分别为（　　）
A．①n②cnt=i ③c = a(cnt)
B．①n\2+ 1②cnt=0 ③c= a(i)
C．①n②cnt= 0③c= a(i)
D．①(n+ 1)\2 ②cnt=i ③c = a(cnt)
【答案】C
【知识点】分支结构语句及程序实现；循环结构语句及程序实现
二、非选择题(本题共4小题，4+8+7+7，共26分)
13．（2022·绍兴模拟）小李收集了2021 浙江GDP排名前20的区县(市)数据，并使用Excel软件对数据进行处理，如图a所示。
请回答下列问题：
（1）若将G3单元格中的公式复制粘贴到E3单元格，则E3单元格中显示 　 　(单选，填字母：A.0/B.#VALUE! /C.#DIV/0!)。
（2）区域K3：K9的数据是通过公式计算得到的，在K3单元格中输入公式　 　，再使用自动填充功能完成区域K4：K9的计算(提示：公式“=COUNTIF(B2：B5，J3)”统计区域B2：B5中值等于J3单元格值的单元格个数)。
（3）为了直观反映2021年各城市拥有GDP前20区县的个数，根据图a中的数据创作的图表如图b所示。综合图a和图b，下列说法正确的有 (多选，填字母)。
A．创建该图表的数据区域为J2：K10
B．2021年拥有GDP前20区县个数最多的城市是杭州市
C．选中图a中A2：H22区域按“2021 年GDP (亿元)”降序排序后，图b所示图表会随之发生变化
D．对图a中的数据按“所属城市”为“宁波市”，“2021年GDP (亿元)”为“最大的1项”进行筛选，筛选出的城市数为0
【答案】（1）B
（2）=COUNTIF(B$3：B$22，J3)或=COUNTIF($B$3：$B$22，J3)或其它等价答案
（3）B；D
【知识点】表格数据的处理与计算
14．（2022·绍兴模拟）小张使用Flash软件创作主题为“北京冬奥会”的多媒体作品，如第14题图所示。
请回答下列问题：
（1）下列属于应用需求分析的是　 　(多选，填字母：A .分析社会上对此类作品的需求程度/B .考虑创作作品需要的硬件和软件/C .分析作品的社会效益和经济效益/D .根据主题思想和内容，制定作品的脚本大纲/E .确定作品的发布方式)。
（2）测试场景，本场景动画播放完毕后停止，声音继续播放，则声音的同步方式是　 　(单选，填字母： A .事件/B .数据流)。“冰墩墩”图层的第1帧到第20帧的补间动画实现吉祥物“冰墩墩”跑动着从舞台外进入舞台内，则“冰墩墩”是由　 　(单选，填字母： A .位图/B .影片剪辑元件)创建的对象。
（3）测试影片时，单击“进入”按钮，停止声音播放并跳转到“main”场景第1帧继续播放，则“进入”按钮上的动作脚本为　 　。
（4）要使“按钮”图层的按钮在本场景开始时就出现，并持续至本场景结束，其它动画效果保持不变，则以下操作可行的是 (多选，填字母)。
A．选中“按钮”图层第1帧执行“清除关键帧"操作
B．选中“按钮”图层第60帧执行“复制帧”操作，再选中“按钮”图层第1帧执行“粘贴帧”操作，并删除第1帧上的脚本命令
C．选中“文字”图层第1~59帧执行“删除帧”操作，再选中“按钮”图层第60帧执行“插入帧”操作
D．选中库中相应按钮添加到“按钮”图层第1帧中，并设置相同的大小和位置，
E．选中“按钮”图层第60帧移动到“按钮”图层第1帧
【答案】（1）AC
（2）A；B
（3）on(release) {stopAllSounds()；gotoAndPlay("'main"，1)；} 或on(press){stopAllSounds()；gotoAndPlay("main"，1)；}
（4）B；D
【知识点】多媒体作品的规划和设计；时间轴、帧、图层、库的概念及基本操作；常用影片控制函数的应用；声音同步属性设置
15．（2022·绍兴模拟）使用如图a所示的九宫格键盘输入单词，每个单词对应一个按键组合，如“tree对应的按键组合为“8733”；而按键组合“8733”对应的单词有“tree”、“used”等。抽取n个英文单词(可重复)，使用九宫格键盘输入，统计最频繁使用的按键组合。
编写VB程序，实现上述功能。运行程序，在列表框List1中显示n个英文单词(单词仅由小写字母组成且字母个数至少为1)，单击“统计”按钮Command1，在列表框List2升序显示全部单词的按键组合，在文本框Text1中显示最频繁使用的按键组合，若有多个，则全部输出。程序运行界面如图b所示。
（1）下列类中生成的对象具有Text属性的是 　 　(单选，填字母： A . Label / B . TextBox/ C .
CommandButton )。
（2）实现上述功能的部分VB程序如下，请在划线处填入合适的代码。
'n为常量，代码略
Dim a(1 To n) As String '数组a存储所有单词
Dim b(1To2*n) As String '数组b存储转换后的按键组合
Private Sub Form_ Load()
'读取所有单词存入数组a，并显示在列表框List1中
'初始化数组b各元素为空字符串，代码略
End Sub
Private Sub Command1_Click()
Dim i As Integer, j As Integer,
k As Integer, p As Integer, max As Integer
Dim m As Integer, key As String,
t As String, s1 As String, s2 As String
key= 222334455566677889999 'key 表示a-z各个字母所对应的键盘数字
max=0
'以下代码实现将数组a中的每个单词转化成按键组合，并依次存入数组b中
For i= 1 To n
t= ""
For j= 1 To Len(a(i))
m = Asc(Mid(a(i), j,
1))- Asc("a")
t=
Next j
b(i)= t
Next i
'以下代码实现对数组元素b( 1)~b(n)升序排序
　 　
Do While i>=1
For j= 1 To i
If b(j+ 1)< b(j) Then
t=b(j+ 1): b(j+ 1)= b(j): b(j)=t
End If
Next j
i=i- 1
Loop
'将排序后数组元素b(1)~b(n)显示在列表框List2中，代码略
s1= b(1)
p=n+ 1
i= 1：j= 2
Do While j<= n '从数组元素b(n+1)开始存储最高频次的按键组合
s2 = b(j)
If s1 < s2 Then
If 　 　 Then
max=j-i
p=n+ 1
b(p)=s1
Else If max=j- i Then
p=p+ 1
b(p)= sl
End If
s1= s2
　 　
End If
j=j+ 1
Loop
t=""
If maxt= s1
Else
For k=n+ 1 To p
t=t+ b(k)+" "
Next k
If max=j- I Then t=t+" "+s1
End If
Text1.Text= "最频繁按键组合为: " &t
End Sub
（3）程序中加框处代码有错，请改正。
【答案】（1）B
（2）i=n- 1；max（3）t+ Mid(key, m+ 1, 1)
【知识点】类、对象、属性、方法、事件和事件处理的概念及应用；排序算法及程序实现
16．（2022·绍兴模拟）有n册图书已按图书编号升序排列(编号互不重复，用7位长度的字符串表示)。经过多次借阅归还之后，部分图书顺序被打乱，现要找出这部分图书进行调整，以使整体升序。算法思想：先找到首尾两个图书编号升序区间，再处理得到待调整区间，最后对该区间中的图书编号排序。
编写VB程序，实现上述功能。运行程序，在列表框List1中显示全部图书编号。单击“整理”按钮Command1，在标签Label1中显示待调整区间图书的册数，在文本框Text1中显示待调整区间图书的起止编号，并在列表框List2中显示排序后的图书编号。程序运行界面如图所示，其中①和②两处分别指向待调整区间图书的起始和截止编号。
（1）如图所示，若采用选择排序算法，仅将待调整区间图书进行升序排序，排序过程结束后，数组元素之间的比较次数为　 　(填数字)。
（2）实现上述功能的部分VB程序如下，请在划线处填入合适的代码。
'n是常量，代码略
Dim a(0 To n) As String
Private Sub Form_ Load()
a(0)= "”
'将n册图书的编号存入数组元素a(1)~a(n)，在List1中显示，代码略
End Sub
Private Sub Command1_ Click()
Dim i As Integer, k As Integer, left As Integer, right As Integer
Dim min As String, max As String
min= "： max= "： left= 1： right= 0
For i= 1 To n- 1
If a(i)> a(i + 1) Then
max = a(i)
left= i： Exit For
End If
Next i
For i=n To 2 Step-1
If 　 　 Then
min= a(i)
right= i: Exit For
End If
Next i
i= left
Do While i <= right
If a(i)> max Then
max = a(i)
ElseIf a(i) < min Then
min= a(i)
End If
i=i+ 1
Loop
k=0
If left < right Then
left = getPos(1, left, min)
　 　
k= right- left+ 1
Text1．Text= "待调整区间图书起始编号： " + a(left) + "-->截止编号： "+ a(right)
End If
Label1.Caption = "待调整区间图书共有:" + Str(k) + "册"
'对待调整区间的图书编号进行排序，在List2中输出整理结果，代码略
End Sub
Function getPos(head As Integer, tail As Integer, value As String) As Integer
Dim i As Integer
i= tai1
Do While 　 　
i=i- 1
Loop
getPos=i+ 1
End Function
【答案】（1）15
（2）a(i)= head And value < a(i)
【知识点】过程与自定义函数；排序算法及程序实现
二一教育在线组卷平台（zujuan.21cnjy.com）自动生成 1 / 1登录二一教育在线组卷平台 助您教考全无忧
浙江省绍兴市2022届高三4月信息技术高考科目考试适应性考试（二模）试卷
一、选择题(本大题共12小题，每小题2分，共24分。)
1．（2022·绍兴模拟）2022 年北京冬季奥运会的吉祥物“冰墩墩”，将熊猫形象与冰晶外壳相结合，整体形象酷似航天员。下列描述不正确的是（　　）
A．“冰墩墩”形象被人们熟知，体现了信息的共享性
B．“冰墩墩” 图像经过互联网社交媒体传播，没有经过数字化处理
C．“冰墩墩”整体形象的设计与创作，说明信息具有可加工处理性．
D．未经授权将“冰墩墩”做成表情包并在网上传播，属于网络侵权行为
2．（2022·绍兴模拟）下列关于信息安全的说法，不正确的是（　　）
A．使用自己的生日作为密码既方便又安全
B．随意连接公共场所的Wi-Fi网络存在安全风险
C．随意扫描二维码安装手机APP存在安全风险
D．网上银行支付时通过U盾进行验证，可以提高安全性
3．（2022·绍兴模拟）小明使用Access软件设计“水果进货”数据表，存储如下图所示的“水果进货单”。
水果编号 水果名称 单位 单价 入库数量 入库日期 审核
A001. 红富士苹果 箱 ￥75.00 50 2021/12/21 已审核
A002 阿克苏苹果 箱 ￥80.00 100 2021/12/26 未审核
A001 红富士苹果 箱 ￥75.00 100 2021/12/23 未审核
…… …… …… …… …… …… ……
下列关于“水果进货”数据表的描述，正确的是（　　）
A．“水果进货”数据表中的字段数量一定为7个
B．“审核”列对应数据表中的字段类型只能设置为“文本”型
C．“水果编号”列对应数据表中的字段可以设置为主键
D．修改“水果进货”数据表中字段的名称，不会影响字段的值
4．（2022·绍兴模拟）下列关于计算机信息编码的描述，正确的是（　　）
A．汉字的输入码不是唯一的，常见的有音码、形码等
B．ASCII 码在计算机中存储时占8位，共有256个ASCII字符
C．用视频处理软件把AVI格式视频转为MPEG格式的过程是无损压缩
D．若两位十六进制数的首位不为“0”，末位为“0”，则其一定大于十进制数16
5．（2022·绍兴模拟）使用Photoshop软件制作“丰收节”作品，部分编辑界面如图所示。
下列说法正确的是（　　）
A．“背景”图层被锁定，不能直接删除“背景”图层
B．当前状态下，可以用自由变换仅调整“文字”图层中部分文字的大小
C．当前状态下，可以对“枫叶”图层执行“拷贝图层样式”操作
D．将该文件直接保存为BMP格式图像，“农民”图层内容不可见
6．（2022·绍兴模拟）将一段时长为50秒，采样频率为44100Hz，量化位数为16bit的双声道声音存储为MP3格式，存储容量约为1.2MB，则压缩比约为(　　)
A．3.5：1 B．7：1 C．28：1 D．56：1
7．（2022·绍兴模拟）下列VB表达式的值为True的是(　　)
A．"9"< "10" B．2021 Mod 100\ 10= 2
C．Len("12" + "3")= 3 D．Int(-4．1)=-4
8．（2022·绍兴模拟）某算法的部分流程图如图所示。执行这部分流程，则输出s的值是(　　)
A．52 B．74 C．80 D．82
9．（2022·绍兴模拟）一个序列经过一趟冒泡排序后的结果是：10，21，13，24，28，则原始序列不可能是(　　)
A．21，13，24，28，10 B．21，10，24，28，13
C．21，10，24，13，28 D．21，24，13，28，10
10．（2022·绍兴模拟）某对分查找算法的VB程序段如下：
Key = Val(Text1．Text)
i= l：j= Key
Do While i<= j
m=(i+j)\2 '①
If Key=m*m Then Exit Do 'Exit Do表示退出循环
If Key>m* m Then i=m+ 1 Else j=m- 1
Loop
If i> j Then
Label1．Caption= Key & "不是完全平方数"
Else
Label1．Caption= Key & "是完全平方数"
End If
运行该程序段，在文本框Text1中输入15，运行后①处语句的执行次数是（　　）
A．3 B．4 C．5 D．6
11．（2022·绍兴模拟）有如下VB程序段：
Dim a(0 To 10) As String
s= Text1.Text
a(0)= "": a(1)= Mid(s, 1, 1)：t= 1
For i= 2 To Len(s)
If t>= 1 And Mid(s, i, 1)= a(t) Then
t=t- 1
Else
t=t+ 1: a(t)= Mid(s, i, 1)
End If
Next i
运行程序段，在文本框Text1中输入以下字符串，运行后变量t的值与其它三项不同的是（　　）
A．AABAB B．AAABA C．BAABA D．BBABA
12．（2022·绍兴模拟）无序数组元素a(1)到a(n)中存在一个出现次数过半的值，如数组a的值依次为3，1，2，2，2，其中出现次数过半的元素为2。查找该值的VB程序段如下：
c= a(1): cnt= 0
For i= 1 To
If Then c= a(i)
If Then cnt= cnt+ 1 Else cnt= cnt- 1
Next i
Text1.Text= "出现次数过半的值是： " &c
上述程序段3个方框处的代码分别为（　　）
A．①n②cnt=i ③c = a(cnt)
B．①n\2+ 1②cnt=0 ③c= a(i)
C．①n②cnt= 0③c= a(i)
D．①(n+ 1)\2 ②cnt=i ③c = a(cnt)
二、非选择题(本题共4小题，4+8+7+7，共26分)
13．（2022·绍兴模拟）小李收集了2021 浙江GDP排名前20的区县(市)数据，并使用Excel软件对数据进行处理，如图a所示。
请回答下列问题：
（1）若将G3单元格中的公式复制粘贴到E3单元格，则E3单元格中显示 　 　(单选，填字母：A.0/B.#VALUE! /C.#DIV/0!)。
（2）区域K3：K9的数据是通过公式计算得到的，在K3单元格中输入公式　 　，再使用自动填充功能完成区域K4：K9的计算(提示：公式“=COUNTIF(B2：B5，J3)”统计区域B2：B5中值等于J3单元格值的单元格个数)。
（3）为了直观反映2021年各城市拥有GDP前20区县的个数，根据图a中的数据创作的图表如图b所示。综合图a和图b，下列说法正确的有 (多选，填字母)。
A．创建该图表的数据区域为J2：K10
B．2021年拥有GDP前20区县个数最多的城市是杭州市
C．选中图a中A2：H22区域按“2021 年GDP (亿元)”降序排序后，图b所示图表会随之发生变化
D．对图a中的数据按“所属城市”为“宁波市”，“2021年GDP (亿元)”为“最大的1项”进行筛选，筛选出的城市数为0
14．（2022·绍兴模拟）小张使用Flash软件创作主题为“北京冬奥会”的多媒体作品，如第14题图所示。
请回答下列问题：
（1）下列属于应用需求分析的是　 　(多选，填字母：A .分析社会上对此类作品的需求程度/B .考虑创作作品需要的硬件和软件/C .分析作品的社会效益和经济效益/D .根据主题思想和内容，制定作品的脚本大纲/E .确定作品的发布方式)。
（2）测试场景，本场景动画播放完毕后停止，声音继续播放，则声音的同步方式是　 　(单选，填字母： A .事件/B .数据流)。“冰墩墩”图层的第1帧到第20帧的补间动画实现吉祥物“冰墩墩”跑动着从舞台外进入舞台内，则“冰墩墩”是由　 　(单选，填字母： A .位图/B .影片剪辑元件)创建的对象。
（3）测试影片时，单击“进入”按钮，停止声音播放并跳转到“main”场景第1帧继续播放，则“进入”按钮上的动作脚本为　 　。
（4）要使“按钮”图层的按钮在本场景开始时就出现，并持续至本场景结束，其它动画效果保持不变，则以下操作可行的是 (多选，填字母)。
A．选中“按钮”图层第1帧执行“清除关键帧"操作
B．选中“按钮”图层第60帧执行“复制帧”操作，再选中“按钮”图层第1帧执行“粘贴帧”操作，并删除第1帧上的脚本命令
C．选中“文字”图层第1~59帧执行“删除帧”操作，再选中“按钮”图层第60帧执行“插入帧”操作
D．选中库中相应按钮添加到“按钮”图层第1帧中，并设置相同的大小和位置，
E．选中“按钮”图层第60帧移动到“按钮”图层第1帧
15．（2022·绍兴模拟）使用如图a所示的九宫格键盘输入单词，每个单词对应一个按键组合，如“tree对应的按键组合为“8733”；而按键组合“8733”对应的单词有“tree”、“used”等。抽取n个英文单词(可重复)，使用九宫格键盘输入，统计最频繁使用的按键组合。
编写VB程序，实现上述功能。运行程序，在列表框List1中显示n个英文单词(单词仅由小写字母组成且字母个数至少为1)，单击“统计”按钮Command1，在列表框List2升序显示全部单词的按键组合，在文本框Text1中显示最频繁使用的按键组合，若有多个，则全部输出。程序运行界面如图b所示。
（1）下列类中生成的对象具有Text属性的是 　 　(单选，填字母： A . Label / B . TextBox/ C .
CommandButton )。
（2）实现上述功能的部分VB程序如下，请在划线处填入合适的代码。
'n为常量，代码略
Dim a(1 To n) As String '数组a存储所有单词
Dim b(1To2*n) As String '数组b存储转换后的按键组合
Private Sub Form_ Load()
'读取所有单词存入数组a，并显示在列表框List1中
'初始化数组b各元素为空字符串，代码略
End Sub
Private Sub Command1_Click()
Dim i As Integer, j As Integer,
k As Integer, p As Integer, max As Integer
Dim m As Integer, key As String,
t As String, s1 As String, s2 As String
key= 222334455566677889999 'key 表示a-z各个字母所对应的键盘数字
max=0
'以下代码实现将数组a中的每个单词转化成按键组合，并依次存入数组b中
For i= 1 To n
t= ""
For j= 1 To Len(a(i))
m = Asc(Mid(a(i), j,
1))- Asc("a")
t=
Next j
b(i)= t
Next i
'以下代码实现对数组元素b( 1)~b(n)升序排序
　 　
Do While i>=1
For j= 1 To i
If b(j+ 1)< b(j) Then
t=b(j+ 1): b(j+ 1)= b(j): b(j)=t
End If
Next j
i=i- 1
Loop
'将排序后数组元素b(1)~b(n)显示在列表框List2中，代码略
s1= b(1)
p=n+ 1
i= 1：j= 2
Do While j<= n '从数组元素b(n+1)开始存储最高频次的按键组合
s2 = b(j)
If s1 < s2 Then
If 　 　 Then
max=j-i
p=n+ 1
b(p)=s1
Else If max=j- i Then
p=p+ 1
b(p)= sl
End If
s1= s2
　 　
End If
j=j+ 1
Loop
t=""
If maxt= s1
Else
For k=n+ 1 To p
t=t+ b(k)+" "
Next k
If max=j- I Then t=t+" "+s1
End If
Text1.Text= "最频繁按键组合为: " &t
End Sub
（3）程序中加框处代码有错，请改正。
16．（2022·绍兴模拟）有n册图书已按图书编号升序排列(编号互不重复，用7位长度的字符串表示)。经过多次借阅归还之后，部分图书顺序被打乱，现要找出这部分图书进行调整，以使整体升序。算法思想：先找到首尾两个图书编号升序区间，再处理得到待调整区间，最后对该区间中的图书编号排序。
编写VB程序，实现上述功能。运行程序，在列表框List1中显示全部图书编号。单击“整理”按钮Command1，在标签Label1中显示待调整区间图书的册数，在文本框Text1中显示待调整区间图书的起止编号，并在列表框List2中显示排序后的图书编号。程序运行界面如图所示，其中①和②两处分别指向待调整区间图书的起始和截止编号。
（1）如图所示，若采用选择排序算法，仅将待调整区间图书进行升序排序，排序过程结束后，数组元素之间的比较次数为　 　(填数字)。
（2）实现上述功能的部分VB程序如下，请在划线处填入合适的代码。
'n是常量，代码略
Dim a(0 To n) As String
Private Sub Form_ Load()
a(0)= "”
'将n册图书的编号存入数组元素a(1)~a(n)，在List1中显示，代码略
End Sub
Private Sub Command1_ Click()
Dim i As Integer, k As Integer, left As Integer, right As Integer
Dim min As String, max As String
min= "： max= "： left= 1： right= 0
For i= 1 To n- 1
If a(i)> a(i + 1) Then
max = a(i)
left= i： Exit For
End If
Next i
For i=n To 2 Step-1
If 　 　 Then
min= a(i)
right= i: Exit For
End If
Next i
i= left
Do While i <= right
If a(i)> max Then
max = a(i)
ElseIf a(i) < min Then
min= a(i)
End If
i=i+ 1
Loop
k=0
If left < right Then
left = getPos(1, left, min)
　 　
k= right- left+ 1
Text1．Text= "待调整区间图书起始编号： " + a(left) + "-->截止编号： "+ a(right)
End If
Label1.Caption = "待调整区间图书共有:" + Str(k) + "册"
'对待调整区间的图书编号进行排序，在List2中输出整理结果，代码略
End Sub
Function getPos(head As Integer, tail As Integer, value As String) As Integer
Dim i As Integer
i= tai1
Do While 　 　
i=i- 1
Loop
getPos=i+ 1
End Function
答案解析部分
1．【答案】B
【知识点】信息及其特征；知识产权
2．【答案】A
【知识点】个人信息及安全防范
3．【答案】D
【知识点】数据表、字段、记录的编辑
4．【答案】A
【知识点】字符编码；声音、图像、视频编码
5．【答案】D
【知识点】图层及图层的基本操作
6．【答案】B
【知识点】声音、图像、视频编码
7．【答案】C
【知识点】运算符、基本运算与表达式
8．【答案】D
【知识点】流程图识读
9．【答案】D
【知识点】排序算法及程序实现
10．【答案】B
【知识点】查找算法及程序实现
11．【答案】C
【知识点】分支结构语句及程序实现；循环结构语句及程序实现
12．【答案】C
【知识点】分支结构语句及程序实现；循环结构语句及程序实现
13．【答案】（1）B
（2）=COUNTIF(B$3：B$22，J3)或=COUNTIF($B$3：$B$22，J3)或其它等价答案
（3）B；D
【知识点】表格数据的处理与计算
14．【答案】（1）AC
（2）A；B
（3）on(release) {stopAllSounds()；gotoAndPlay("'main"，1)；} 或on(press){stopAllSounds()；gotoAndPlay("main"，1)；}
（4）B；D
【知识点】多媒体作品的规划和设计；时间轴、帧、图层、库的概念及基本操作；常用影片控制函数的应用；声音同步属性设置
15．【答案】（1）B
（2）i=n- 1；max（3）t+ Mid(key, m+ 1, 1)
【知识点】类、对象、属性、方法、事件和事件处理的概念及应用；排序算法及程序实现
16．【答案】（1）15
（2）a(i)= head And value < a(i)
【知识点】过程与自定义函数；排序算法及程序实现
二一教育在线组卷平台（zujuan.21cnjy.com）自动生成 1 / 1