登录二一教育在线组卷平台 助您教考全无忧
浙江省名校协作体2020-2021学年高三下学期信息技术开学联考试卷
一、选择题
1．（2021高三下·浙江开学考）下列关于信息的说法正确的是（ ）
A．信息只有转换成二进制代码才能被处理
B．同一信息可以通过不同的载体被保存和传播
C．通过搜索引擎检索到的信息都是真实可信的
D．在信息评价中个人推荐属于较可靠的一种方式
2．（2021高三下·浙江开学考）下列关于信息的表达与交流，说法正确的是（ ）
A．哑语和肢体动作是常用的信息表达技术
B．HTTP又称超文本传输协议，主要用于浏览器和Web服务器之间的信息传输
C．POP3协议出错，则通过浏览器登录电子邮箱时无法发送新的邮件
D．为了方便下载网页中的图片，可以把网页以“网页，仅html”类型保存
3．（2021高三下·浙江开学考）使用Access软件设计的博物馆文物信息数据表，需存储如图所示的数据。
序号 文物名称 文物编号 距今时间 收藏日期 来源
1 晚清七色釉盘 Q4877111854510 208年 2001-3-1 捐赠
2 明官窑矮罐 M6877111665125 531年 1998-6-8 馆有
3 汉青铜短剑 H7877111783721 2000年 1978-9-16 租借
… … … … … …
下列表结构设计最合理的是 （ ）
A． B．
C． D．
4．（2021高三下·浙江开学考）下列有关进制与编码的说法，正确的是（ ）
A．十六进制数2020是十六进制数202的10倍
B．十六进制数15转换为二进制数为1111
C．ASCII码由7位二进制进行编码
D．已知字符“9”的内码为“39H”，则字符“10”的内码为“3AH”
5．（2021高三下·浙江开学考）用Photoshop制作“重阳登高”作品，其中“重”字的轮廓被选区选中，部分界面如图所示。
下列说法正确的是（ ）
A．“花栏”图层未在舞台显示的原因是该图层被隐藏
B．可使用文字工具修改“印章”图层中文字“九月”的字体
C．当前状态下，可将“印章”图层的图层样式拷贝到“太阳”图层
D．当前状态下，可使用油漆桶工具对“重”字选区进行填充
6．（2021高三下·浙江开学考）—幅未经压缩16位色的BMP图像，将其另存为256色，其他参数不变。则存储容量比为（ ）
A．1:2 B．1:16 C．2:1 D．256:1
7．（2021高三下·浙江开学考）下列选项中，无法实现变量r的值在“0”和“1”之间进行切换功能的表达式是（ ）
A．r = (r - 1) Mod 2 B．r = Abs(r - 1)
C．r = 1 - r D．r = (r + 1) Mod 2
8．（2021高三下·浙江开学考）某算法的部分流程图如图所示。输入n的值为20，执行这部分流程后，输出k的值为（ ）
A．0 B．1 C．2 D．5
9．（2021高三下·浙江开学考）有如下VB程序段：
n = 3: s = 0
c = Val(Text1.Text)
For i = 1 To c
p = i Mod n + 1
s = s + p
Next i
在文本框Text1中输入9，程序执行后，变量s的值为（ ）
A．6 B．9 C．18 D．45
10．（2021高三下·浙江开学考）有如下VB程序段：
For i = 1 To 2
For j = 6 To 2 * (i + 1) Step -2
If a(j) < a(j - 2) Then
t = a(j): a(j) = a(j - 2): a(j - 2) = t
End If
Next j
Next i
假定数组元素a(1)～a(6)的值依次为“happy，sky，change，sk，bellow，hello”。执行该程序段后，a(4)～a(6)的值依次是（ ）
A．sk，bellow，sky B．sky，bellow，sk
C．sk，happy，sky D．happy，sk，sky
11．（2021高三下·浙江开学考）判断非重字符串s2(至少含2个字符)是否为s1的子集，若s2的字符按序在s1中出现，则称s2为s1的子集。例:s1="a3bcd"，s2="ab"，s3="ba"，则s2是s1的子集，s3不是s1的子集。实现该功能的VB程序段如下：
s1 = Text1.Text : s2 = Text2.Text
i = 1 : j = 1
Do While i <= Len(s1) And j <= Len(s2)
If Mid(s1, i, 1) = Mid(s2, j, 1) Then
Loop
If Then Label1.Caption = "是子集" Else Label1.Caption = "不是子集"
上述程序填空处的可选语句为：
①i = i + 1 ②j = j + 1 ③i > Len(s1) ④j > Len(s2)
则(1)(2)(3)处语句依次最合理的搭配为（ ）
A．①②③ B．②①③ C．①②④ D．②①④
12．（2021高三下·浙江开学考）有如下VB程序段：
s = ""
i = 1:j = 10:k = 1
Do While i <= j
m = Int((i + j) / 2)
If a(m) > b(k) Then j = m - 1 Else i = m + 1
If a(m) = b(k) Then k = k + 1:s = s + Str(m)
Loop
数组元素a(1)到a(10)依次为“2,3,7,9,10,15,15,15,19,20”，执行该程序段后，变量s的值有3个字符，则b(1)到b(3)的值可能为（ ）
A．2 3 11 B．3 7 9 C．10 15 15 D．15 15 19
二、操作题
13．（2021高三下·浙江开学考）某中学校园英语文化节举行了各类比赛，用Excel软件对比赛成绩进行处理，如图a所示。
图a
（1）图a中L4:P4区域的数据是根据K4单元格自动填充得到，则L4单元格中的公式是
（单选，填字母：A
.=AVERAGEIF($A$4:$A$63,"高一*",C4:C63)/ B
.=AVERAGEIF($A4:$A63,"高一*",C4:C63) / C
.=AVERAGEIF($A4:$A63,"高一*",B4:B63 )
（2）根据图a数据创建的图表如图b所示，则创建图表的数据区域为 。
图b
（3）若要找出高三年级口语成绩最好的班级，下列操作可行的是 （多选，填字母）。
A．以“班级”包含高三，“口语”最大1项进行筛选，选取筛选出的班级。
B．以“班级”包含高三进行筛选，再按“口语”进行降序排序，选取排在最前面的班级。
C．以“口语”为主要关键字，“班级”为次要关键词均降序排序，选取排在最前面的班级。
D．以“口语”为主要关键字降序排序，以“班级”包含高三进行筛选，选取排在最前面的班级。
14．（2021高三下·浙江开学考）使用Flash软件创作“雍正故宫”作品，其中“load”场景的制作脚本如下表所示，
场景名：load 类别序号：1 进入方式：启动动画自动播放
呈现方式： 呈现顺序：
①“音乐”图层中的声音源于库中的素材 bg.wav，参数如图b所示。 ①一开始时出现背景画面，音乐随即播放。
②“文物”从完全透明到完全显示，由左到右由小变大慢慢呈现在舞台上。 ②1秒后出现“文物”动画，3.5秒后音乐停止播放。
③“播放”按钮位于舞台右侧位置，单击该按钮跳转到“main”场景第1帧并开始播放。 ③最后出现“播放”按钮，场景停止播放。
(其他略) (其他略)
部分界面如图a所示，请回答下列问题：
图a
图b
（1）根据所给材料，下列说法正确的是 (多选 ，填字母)。
A．该动画作品至少包含2个场景
B．“播放”按钮只能用于本场景的舞台中
C．编写制作脚本后应进行的操作是编写文字脚本
D．“文物”图层第10帧对象的Alpha值为0%
（2）从图中可知“故宫”图层中的文字“雍正故宫”为 （选填：实例/形状）。
（3）根据制作脚本可知，背景图层第60帧处应添加动作命令为 。
（4）若要使得“音乐”图层中的音乐在“文物”图层补间动画结束后停止播放，在不改变其他动画效果情况下，以下操作可行的是 （多选：填字母）。
A．在“音乐”图层第20帧帧插入关键帧
B．将“音乐”图层第35帧空白关键帧移至第20帧
C．在“音乐”图层第20帧添加stopAllSounds();指令
D．删除“音乐”图层第20-34帧，并将声音的同步方式设置为事件
（5）“按钮”图层的呈现方式和脚本不符，则应进行的操作是 。
15．（2021高三下·浙江开学考）某分段排序算法描述如下：
1)将原始数据按升序分成若干有序段。
2)将第1段和第2段进行合并，使得合并后的数据依旧有序，得到新的有序段。
3)将新的有序段再次和下一个有序段进行合并。
4)重复上述操作，直到全部数据变成一个有序段为止，排序结束。
如数据：1、3、9、4、5、7、2、6，第1段为1、3、9，第2段为4、5、7，将第1段和第2段合并，得到新的第1段为1、3、4、5、7、9。继续和下一段2、6进行合并，合并后段数变为1段，则排序结束。
编写VB程序，实现分段排序功能：在文本框Text1中输入数据总量，单击“数据生成”按钮Command1后，在列表框List1中显示原始数据，然后单击“分段排序”按钮Command2，在列表框List2中显示排序后的结果。程序运行界面如图所示。
请回答下列问题：
（1）若要清空列表框List1，下列代码正确的是 (单选，填字母：
A .List1.Clear / B .List1.List="" / C .List1.Text=""
/ D .List1.Caption="空白" )。
（2）实现分段排序功能的VB程序如下，请在划线处填入合适的代码。
Dim a(1 To 1000) As Integer
Dim n As Integer
Private Sub Command1_Click()
'输入数据总量n，随机生成n个数据保存在数组
'a(1)~a(n)中，并在List1中显示数据，代码略
End Sub
Private Sub Command2_Click()
Dim b(1 To 10000) As Integer
Dim p1 As Integer, p2 As
Integer, t1 As Integer, t2 As Integer
Dim t As Integer, k As Integer,
i As Integer, j As Integer
p1 = 1
t1 = leng(p1)
p2 = p1 + t1
Do While p2 <= n
i =
p1: j = p2: t = 1
Do
While i < p2 Or j < p2 + t2
If
j >= p2 + t2 Or i < p2 And a(i) < a(j) Then
b(t) = a(i): i = i + 1
Else
b(t) = a(j): j = j + 1
End
If
t =
t + 1
Loop
For
k = 1 To
a(k) = b(k)
Next k
t1 =
t1 + t2
Loop
'在List2中输出数组a(i)的值，代码略
End Sub
Function Leng(ByVal p As Integer) As Integer
'该函数返回数组a中数组下标p开始的升序有序段的长度，代码略
End Function
（3）程序中加框处代码有错，请改正。
16．（2021高三下·浙江开学考）亲戚寻找。小李总是因为认不清亲戚而苦恼，于是他设计了如下程序来模拟亲戚寻找的过程。已知：如果1和2是亲戚，1和3是亲戚，则2和3也是亲戚。代码思维如下：
1)将每个人看成是一个钩码，能挂在另一个挂钩底下，自己底下也能挂其他挂钩。
2)如果两个钩码在同一条钩码串上，则为亲戚（如2、3都能找到1）。
3)如果两个是亲戚但不在一串钩码上，则可将其中一串的最上面的钩码挂在另一串的下方。
例如从图a加框处的前三行数据可得到图b所示的钩码串1和钩码串2，从第四行数据可知9、5也为亲戚，则可将两串钩码合并，合并后3为2的顶端，5为3的顶端，其余数据以此类推。
根据算法思想，编写VB程序功能如下：程序初始化时给出6条亲戚关系显示在List1中，单击“理关系”按钮，在List2中显示每个人所在钩码的顶端编号。在Text1和Text2中分别输入两人的编号，单击“询问”按钮，输出两个人是否为亲戚关系。程序运行界面如图a所示。
（1）根据图a数据，若输入两人的编号为4和5，则两人的关系是否为亲戚 (填：是/否)。
（2）实现上述功能的VB程序如下，请在划线处填入合适的代码。
Const n = 9 ‘总人数
Const m = 6 ‘已知的亲戚关系数
Dim a(1 To n) As String , b(1 To n) As String
Dim f(1 To n) As String ‘记录不同的亲戚钩码串成员，每条亲戚钩码串内互为亲戚
Dim k As Integer ‘亲戚钩码串的数目
Private Sub Form_Load()
‘初始化List1和List2，生成m条亲戚关系，每条亲戚关系的编号对应存储在数组a(i)和b(i) '中，在List1中输出a(i)和b(i)，代码略
End Sub
Private Sub Command1_Click()
Dim i As Integer, x As Integer,
y As Integer
f(1) = a(1) + b(1) ‘利用a(1)、b(1)生成第一条钩码串存储在f(1)中
k = 1 ‘k为钩码串编号
For i = 2 To m
x = root(a(i), 0): y =
root(b(i), 0) ‘x为调用函数获取a(i)所在的钩码串编号
If x = 0 And y = 0 Then k =
k + 1: ‘根据x与y分类讨论
If x <> 0 And y = 0
Then f(x) = f(x) + b(i)
If x = 0 And y <> 0
Then f(y) = f(y) + a(i)
If x <> y And x
<> 0 And y <> 0 Then ‘x、y在不同钩码串则将两条钩码串合并
f(x) = f(x) + f(y):
f(y) = f(k): k = k - 1
End If
Next i
For i = 1 To n ‘输出每个人所在钩码的顶端编号
x = root(CStr(i), 0): y =
root(CStr(i), 1) ‘Cstr()函数用于去除字符前导空格
If x <> 0 Then
If y = Len(f(x)) Then
List2.AddItem Str(i) + " " + CStr(i)
If y <> Len(f(x))
Then List2.AddItem Str(i) + " " +
End If
Next i
End Sub
'按钮Command2的功能为判断输入的两个人是否为亲戚关系，代码略
Function root(a As String, b As Integer) As Integer ‘参数a表示待查找目标，参数b
‘表示返回值类型，0表示返回目标所在钩码串编号，1表示返回目标在该钩码串中的位置
Dim m As Integer, n As Integer, i As Integer, j As Integer
m = 0: n = 0: i = k: j = 0
Do While i > 0
If a = Mid(f(i), Len(f(i))
- j, 1) Then m = i: n = Len(f(i)) - j: Exit Do
j = j + 1
If j = Len(f(i)) Then i = i
- 1: j = 0
Loop
If Then root = m Else root = n
End Function
答案解析部分
1．【答案】B
【知识点】信息及其特征；因特网信息资源评价
【解析】【解答】信息只有转换成二进制代码才能被计算机处理，选项A错误；同一信息可以借助不同的载体被保存和传播，选项B正确；信息具有真伪性，通过搜索引擎检索到的信息不一定都是真实可信的，选项C错误；凭借个人对因特网资源的了解和主观认识进行的评价。该方法参考价值较低。专家推荐属于较可靠的一种方式。选项D错误。故答案选B。
【分析】本题主要考查的是信息的处理、信息的特征以及信息的评价。信息的特征：载体依附性、时效性、共享性、可加工处理性、真伪性、价值性。信息资源的评价是指从信息来源的多样性中确认权威、可信的信息源，从而鉴别信息的真实性，理解信息的价值与时效性。
2．【答案】B
【知识点】信息表达方式与表达技术；电子邮件，电子公告板等信息交流方式；网络资源的类型、下载与保存
【解析】【解答】选项A：哑语和肢体动作不是常用的信息表达技术，是有语言障碍的人的交流方式；选项B：网页之间遵循超文本传输协议（HTTP）进行相互链接访问；选项C：电子邮局接受协议POP3，用于从收件人电子邮件服务器中将邮件读到收件人计算机中，所以若是POP3协议出错，是无法收取邮件的。选项D：把网页以“网页，仅html”类型保存，是把当前叶面的源文件保存下来，而非图片。故答案选B。
【分析】本题考查的是信息的表达、交流以及网络资源的保存。最常用的信息表达方式有文字、语言、图形、图像、声音和形体动作等几种。表达技术有：广播电视、报刊书籍、多媒体技术、网络技术等，其中多媒体技术和网络技术是信息社会化种比较重要的信息表达技术。
3．【答案】D
【知识点】字段的数据类型；数据表的创建
【解析】【解答】文本：这种类型允许最大255个字符或数字，Access默认的大小是50个字符，而且系统只保存输入到字段中的字符，而不保存文本字段中未用位置上的空字符。数字：这种字段类型可以用来存储进行算术计算的数字数据。日期/时间：这种类型是用来存储日期、时间或日期时间一起的，每个日期/时间字段需要8个字节来存储空间。自动编号是一个唯一的顺序号（递增或随机）、用户无法直接修改其值。“是/否”类型存储逻辑值，仅能取两个值，“货币”类型存储货币值数据，如金额、价格等。题中文物名称、文物编号、距今时间以及来源字段可设置为文本类型，收藏日期可设置为日期/时间类型。故答案选D。
【分析】本题考查的是Access字段的数据类型。Access提供的主要字段数据类型有：文本、数字、日期/时间、货币、自动编号、是/否等。
4．【答案】C
【知识点】进制及数制转换；字符编码
【解析】【解答】选项A：十六进制2020转为十进制是8224，十六进制202转为十进制是514，两者不是10倍的关系，是16倍的关系；选项B：基本的ASCII码共有128个，用1个字节中的低7位编码；选项C：十六进制数15转换为二进制数为00010101；选项D：ASCII码表如下，字符“9”的内码（十进制数57）经过换算可得出是“39H”，但是“10”的内码则不是“3AH”。故答案选C。
【分析】本题考查的进制与编码。十六进制转换成十进制的方法是：要从右到左用二进制的每个数去乘以16的相应次方，然后这些数字相加就是了。十六进制转化为二进制：把十六进制数中的每一位数转换为二进制数，每个数要分四位，不足四位的前面加零。
5．【答案】D
【知识点】图片加工常用工具的使用；图层及图层的基本操作
【解析】【解答】选项A：“花栏”图层未被隐藏，在舞台中没显示的原因是因为上面图层的遮挡；选项B：文字工具只能修改文字图层的内容，“印章”图层明显不是文字图层；选项C：当前状态是“重”字的轮廓被选区选中，所以不能实现图层样式的拷贝；选项D：油漆桶工具的功能是用前景色填充当前图层或选择区域。当前状态下可以使用油漆桶工具对“重”字选区进行填充。故答案选D。
【分析】本题考查的是Photoshop中图层与图片加工工具。图层内容不可见的原因主要有：图层的透明度为100%（不透明度为0%）、图层为不可视、图层被其他图层遮盖。
6．【答案】C
【知识点】声音、图像、视频编码
【解析】【解答】原图像大小=分辨率*16/8B；修改后图像大小=分辨率*8/8B。所以存储容量比为（分辨率*16/8B）/（分辨率*8/8B）=2:1。故答案选C。
【分析】本题考查的是图像存储容量。在计算图像存储容量时可采用公式：图像文件存储量=水平像素×垂直像素×每个像素所需位数／8（字节）。
7．【答案】A
【知识点】运算符、基本运算与表达式
【解析】【解答】表达式r = (r - 1) Mod 2，当r=0时，表达式值为-1，当r=1时，表达式值为0。故答案选A。
【分析】本题主要考查常见表达式的计算。Abs( )是求绝对值，Mod是求模取余。
8．【答案】C
【知识点】流程图识读
【解析】【解答】程序执行过程如下：
初始值：n=20，k=0
n=20<>0，执行n=20\2=10，10 Mod 2≠1；
n=10<>0，执行n=10\2=5，5 Mod 2=1，执行k=k+1=1；
n=5<>0，执行n=5\2=2，2 Mod 2≠1；
n=2<>0，执行n=2\2=1，1 Mod 2=1，，执行k=k+1=2；
n=1<>0，执行n=1\2=0，0 Mod 2≠1；
n=0，输出k，k=2
故答案选C。
【分析】本题考查的是流程图的分析。
9．【答案】C
【知识点】程序的调试及运行；循环结构语句及程序实现
【解析】【解答】程序分析：
n = 3，s = 0，文本框Text1中输入9，即c=9，
i=1，p=1 Mod 3+1=2，s=0+2=2；
i=2，p=2 Mod 3+1=3，s=2+3=5；
i=3，p=3 Mod 3+1=1，s=5+1=6；
i=4，p=4 Mod 3+1=2，s=6+2=8；
i=5，p=5 Mod 3+1=3，s=8+3=11；
i=6，p=6 Mod 3+1=1，s=11+1=12；
i=7，p=7 Mod 3+1=2，s=12+2=14；
i=8，p=8 Mod 3+1=3，s=14+3=17；
i=9，p=9 Mod 3+1=1，s=17+1=18；
i=10，不进入循环，程序结束，s值为18。
故答案选C。
【分析】本题考查的VB程序的运行与分析。
10．【答案】A
【知识点】循环结构语句及程序实现
【解析】【解答】题中外层循环执行2次，内层循环步长为-2，当 a(j) < a(j - 2)时，进行数组元素互换，i=1时，执行结果为happy,hello,change,sky,bellow,sk；i=2时，执行结果为happy,hello,change,sk,bellow,sky。故答案选A。
【分析】本题主要考查的是VB程序循环嵌套。
11．【答案】D
【知识点】循环结构语句及程序实现
【解析】【解答】Mid ( )函数是从文本字符串中指定的开始位置起返回指定长度的字符。题中当循环变量i和 j分别小于等于字符串s1和s2长度时，逐一判断对应字符是否相同，相同，则继续比较下一字符，因此方框处分别为循环变量增1，当变量j大于字符串s2长度时，说明字符逐一比较通过，得出“是子集”结论。故答案选D。
【分析】本题主要考查的是VB循环结构。
12．【答案】B
【知识点】查找算法及程序实现
【解析】【解答】如果b(1)到b(3)的值为A选项的2,3,11，则变量s的最终值只有“1”这1个字符，选项A错误；如果b(1)到b(3)的值为B选项的3,7,9，则变量s的最终值是“234”这3个字符，选项B正确；CD选项排除同上。故答案选B。
【分析】本题考查的是对VB程序的分析。本题可采用排除法来分析程序。
13．【答案】（1）B
（2）J3:P3,J6:P6
（3）B；D
【知识点】表格数据的处理与计算；表格数据的图表呈现
【解析】【解答】（1）Excel中单元格的表示：绝对位置，就是单元格人眼看到的坐标，一般用$表示，如$A$10，表示A10单元格。相对位置，表示在使用公式时，引用的单元格与当前单元格的偏移。题中K4单元格中的公式是=AVERAGEIF($A4:$A63,"高一*",B4:B63)，L4的公式相比于K4的公式，只有相对位置的单元格表示有变动，即“B4:B63”，变为“C4:C63”。故答案为：B。
（2）根据图表中的横纵坐标，纵坐标数据只涉及到J6:P6，横坐标的标注涉及到J3:P3。故答案为：J3:P3,J6:P6；
（3）选项A，“口语”最大1项进行筛选，不可行，可能出现多个班级并列第一的情况。选项C，该做法不能排除高三以外，其他年级的情况。故答案选BD。
【分析】本题考查的是Excel中公式的应用、图表数据源的选取、数据的筛选与排序。在选择图表数据区域时，要看其横轴和纵轴的数据。对数据的筛选分为“自动筛选”和“高级筛选”。通过对数据筛选条件的设置，可以筛选出所需的数据。
14．【答案】（1）A；D
（2）实例
（3）Stop();
（4）A；B
（5）将“按钮”图层第1帧移至第60帧 或其他等价答案
【知识点】多媒体作品的规划和设计；时间轴、帧、图层、库的概念及基本操作；常用影片控制函数的应用
【解析】【解答】（1）选项A：Flash动画中有多少个场景？场景这个词呢，它在Flash中有两种意思，一种是人物场景，也是就背景，另外一种就是舞台场景，就是在舞台的右上角场景里边的分场景。根据该题目描述，至少包含人物场景和舞台场景。选项正确；
选项B：“播放”按钮不是只能用于本场景的舞台中。选项B错误；选项C：多媒体作品脚本编写的一般顺序是：制订脚本大纲→编写文字脚本→编写制作脚本→媒体元素分解。选项C错误；选项D，“文物”从完全透明到完全显示，由左到右。通过Alpha的数值来调整图像的透明度和半透明性，选中色块，alpha值取0%，则为纯透明。alpha值取100%，则为不透明。第十帧的位置应该是完全透明，所以值为0%。选项D正确。故答案选AD；
（2）实例是指位于舞台上或嵌套在另一个元件内的元件副本。 实例可以与它的元件在颜色、大小和功能上有差别。“雍正故宫”中心位置有小圆圈，是典型的实例的特点。故答案为：实例；
（3）stop()；停止当前正在播放的 SWF 文件（停止在当前帧上）动作。故答案为：stop()；；
（4）停止播放声音命令stopAllSounds()，功能：在不停止播放头的情况下停止SWF文件中当前正在播放的所有声音。此命令没有参数。故答案选AB；
（5）题意中按钮的效果要求是“最后出现‘播放’按钮，场景停止播放”。根据时间轴上“按钮”图层所示，所以需要将“按钮”图层第1帧移至第60帧。故答案为：将“按钮”图层第1帧移至第60帧 或其他等价答案。
【分析】本题主要考查的是Flash中图层的基本操作、控制命令的设置以及动画效果的实现。
15．【答案】（1）A
（2）p2 = p1 + t1 或 p2 = p2 + t2；t2 = leng(p2) 或 t2 = leng(t1+p1) 或 t2 = leng(t1+1)
（3）t1 + t2 或 t-1 或 p2+t2-1或 t 或 t1+1
【知识点】过程与自定义函数；排序算法及程序实现；基本语句
【解析】【解答】（1）VB中列表框对象可通过Clear方法清空原有内容，故答案为：A；
（2）第一空：变量p2记录新增后有序段的长度。故答案为：p2 = p1 + t1；
第二空：数组a接收列表框list1生成的数组排序后在列表框list2中输出，变量t1存储数组中有序字符的个数，变量p2记录新增后有序段的长度。故答案为：t2 = leng(p2)；
第三空：For循环中，将有序段添加到数组a中，For循环变量终值t1 + t2。故答案为：t1 + t2。
【分析】本题主要考查VB排序算法以及自定义函数的应用。
16．【答案】（1）是
（2）f(k) = a(i) + b(i；Mid(f(x), y + 1, 1)；b = 0
【知识点】过程与自定义函数；常用标准函数
【解析】【解答】（1）根据题示，5的顶端是8，8的顶端是4，即4和5是亲戚，因此答题空1为“是”；
（2）第一空：数组变量用于存储钩码串，当x = 0 ，y = 0时，则钩码串新增相关数据。故答案为：f(k) = a(i) + b(i)；
第二空：For循环用于输出每个人所在钩码的顶端编号，当y不等于钩码串长度时，需要在List2中添加相关钩码。故答案为：Mid(f(x), y + 1, 1)；
第三空：自定义函数root用于获取变量所在的钩码串编号，当参数b=0时，该自定义函数返回m，否则返回n。故答案为：b = 0。
【分析】本题主要考查VB中自定义函数调用。
二一教育在线组卷平台（zujuan.21cnjy.com）自动生成 1 / 1登录二一教育在线组卷平台 助您教考全无忧
浙江省名校协作体2020-2021学年高三下学期信息技术开学联考试卷
一、选择题
1．（2021高三下·浙江开学考）下列关于信息的说法正确的是（ ）
A．信息只有转换成二进制代码才能被处理
B．同一信息可以通过不同的载体被保存和传播
C．通过搜索引擎检索到的信息都是真实可信的
D．在信息评价中个人推荐属于较可靠的一种方式
【答案】B
【知识点】信息及其特征；因特网信息资源评价
【解析】【解答】信息只有转换成二进制代码才能被计算机处理，选项A错误；同一信息可以借助不同的载体被保存和传播，选项B正确；信息具有真伪性，通过搜索引擎检索到的信息不一定都是真实可信的，选项C错误；凭借个人对因特网资源的了解和主观认识进行的评价。该方法参考价值较低。专家推荐属于较可靠的一种方式。选项D错误。故答案选B。
【分析】本题主要考查的是信息的处理、信息的特征以及信息的评价。信息的特征：载体依附性、时效性、共享性、可加工处理性、真伪性、价值性。信息资源的评价是指从信息来源的多样性中确认权威、可信的信息源，从而鉴别信息的真实性，理解信息的价值与时效性。
2．（2021高三下·浙江开学考）下列关于信息的表达与交流，说法正确的是（ ）
A．哑语和肢体动作是常用的信息表达技术
B．HTTP又称超文本传输协议，主要用于浏览器和Web服务器之间的信息传输
C．POP3协议出错，则通过浏览器登录电子邮箱时无法发送新的邮件
D．为了方便下载网页中的图片，可以把网页以“网页，仅html”类型保存
【答案】B
【知识点】信息表达方式与表达技术；电子邮件，电子公告板等信息交流方式；网络资源的类型、下载与保存
【解析】【解答】选项A：哑语和肢体动作不是常用的信息表达技术，是有语言障碍的人的交流方式；选项B：网页之间遵循超文本传输协议（HTTP）进行相互链接访问；选项C：电子邮局接受协议POP3，用于从收件人电子邮件服务器中将邮件读到收件人计算机中，所以若是POP3协议出错，是无法收取邮件的。选项D：把网页以“网页，仅html”类型保存，是把当前叶面的源文件保存下来，而非图片。故答案选B。
【分析】本题考查的是信息的表达、交流以及网络资源的保存。最常用的信息表达方式有文字、语言、图形、图像、声音和形体动作等几种。表达技术有：广播电视、报刊书籍、多媒体技术、网络技术等，其中多媒体技术和网络技术是信息社会化种比较重要的信息表达技术。
3．（2021高三下·浙江开学考）使用Access软件设计的博物馆文物信息数据表，需存储如图所示的数据。
序号 文物名称 文物编号 距今时间 收藏日期 来源
1 晚清七色釉盘 Q4877111854510 208年 2001-3-1 捐赠
2 明官窑矮罐 M6877111665125 531年 1998-6-8 馆有
3 汉青铜短剑 H7877111783721 2000年 1978-9-16 租借
… … … … … …
下列表结构设计最合理的是 （ ）
A． B．
C． D．
【答案】D
【知识点】字段的数据类型；数据表的创建
【解析】【解答】文本：这种类型允许最大255个字符或数字，Access默认的大小是50个字符，而且系统只保存输入到字段中的字符，而不保存文本字段中未用位置上的空字符。数字：这种字段类型可以用来存储进行算术计算的数字数据。日期/时间：这种类型是用来存储日期、时间或日期时间一起的，每个日期/时间字段需要8个字节来存储空间。自动编号是一个唯一的顺序号（递增或随机）、用户无法直接修改其值。“是/否”类型存储逻辑值，仅能取两个值，“货币”类型存储货币值数据，如金额、价格等。题中文物名称、文物编号、距今时间以及来源字段可设置为文本类型，收藏日期可设置为日期/时间类型。故答案选D。
【分析】本题考查的是Access字段的数据类型。Access提供的主要字段数据类型有：文本、数字、日期/时间、货币、自动编号、是/否等。
4．（2021高三下·浙江开学考）下列有关进制与编码的说法，正确的是（ ）
A．十六进制数2020是十六进制数202的10倍
B．十六进制数15转换为二进制数为1111
C．ASCII码由7位二进制进行编码
D．已知字符“9”的内码为“39H”，则字符“10”的内码为“3AH”
【答案】C
【知识点】进制及数制转换；字符编码
【解析】【解答】选项A：十六进制2020转为十进制是8224，十六进制202转为十进制是514，两者不是10倍的关系，是16倍的关系；选项B：基本的ASCII码共有128个，用1个字节中的低7位编码；选项C：十六进制数15转换为二进制数为00010101；选项D：ASCII码表如下，字符“9”的内码（十进制数57）经过换算可得出是“39H”，但是“10”的内码则不是“3AH”。故答案选C。
【分析】本题考查的进制与编码。十六进制转换成十进制的方法是：要从右到左用二进制的每个数去乘以16的相应次方，然后这些数字相加就是了。十六进制转化为二进制：把十六进制数中的每一位数转换为二进制数，每个数要分四位，不足四位的前面加零。
5．（2021高三下·浙江开学考）用Photoshop制作“重阳登高”作品，其中“重”字的轮廓被选区选中，部分界面如图所示。
下列说法正确的是（ ）
A．“花栏”图层未在舞台显示的原因是该图层被隐藏
B．可使用文字工具修改“印章”图层中文字“九月”的字体
C．当前状态下，可将“印章”图层的图层样式拷贝到“太阳”图层
D．当前状态下，可使用油漆桶工具对“重”字选区进行填充
【答案】D
【知识点】图片加工常用工具的使用；图层及图层的基本操作
【解析】【解答】选项A：“花栏”图层未被隐藏，在舞台中没显示的原因是因为上面图层的遮挡；选项B：文字工具只能修改文字图层的内容，“印章”图层明显不是文字图层；选项C：当前状态是“重”字的轮廓被选区选中，所以不能实现图层样式的拷贝；选项D：油漆桶工具的功能是用前景色填充当前图层或选择区域。当前状态下可以使用油漆桶工具对“重”字选区进行填充。故答案选D。
【分析】本题考查的是Photoshop中图层与图片加工工具。图层内容不可见的原因主要有：图层的透明度为100%（不透明度为0%）、图层为不可视、图层被其他图层遮盖。
6．（2021高三下·浙江开学考）—幅未经压缩16位色的BMP图像，将其另存为256色，其他参数不变。则存储容量比为（ ）
A．1:2 B．1:16 C．2:1 D．256:1
【答案】C
【知识点】声音、图像、视频编码
【解析】【解答】原图像大小=分辨率*16/8B；修改后图像大小=分辨率*8/8B。所以存储容量比为（分辨率*16/8B）/（分辨率*8/8B）=2:1。故答案选C。
【分析】本题考查的是图像存储容量。在计算图像存储容量时可采用公式：图像文件存储量=水平像素×垂直像素×每个像素所需位数／8（字节）。
7．（2021高三下·浙江开学考）下列选项中，无法实现变量r的值在“0”和“1”之间进行切换功能的表达式是（ ）
A．r = (r - 1) Mod 2 B．r = Abs(r - 1)
C．r = 1 - r D．r = (r + 1) Mod 2
【答案】A
【知识点】运算符、基本运算与表达式
【解析】【解答】表达式r = (r - 1) Mod 2，当r=0时，表达式值为-1，当r=1时，表达式值为0。故答案选A。
【分析】本题主要考查常见表达式的计算。Abs( )是求绝对值，Mod是求模取余。
8．（2021高三下·浙江开学考）某算法的部分流程图如图所示。输入n的值为20，执行这部分流程后，输出k的值为（ ）
A．0 B．1 C．2 D．5
【答案】C
【知识点】流程图识读
【解析】【解答】程序执行过程如下：
初始值：n=20，k=0
n=20<>0，执行n=20\2=10，10 Mod 2≠1；
n=10<>0，执行n=10\2=5，5 Mod 2=1，执行k=k+1=1；
n=5<>0，执行n=5\2=2，2 Mod 2≠1；
n=2<>0，执行n=2\2=1，1 Mod 2=1，，执行k=k+1=2；
n=1<>0，执行n=1\2=0，0 Mod 2≠1；
n=0，输出k，k=2
故答案选C。
【分析】本题考查的是流程图的分析。
9．（2021高三下·浙江开学考）有如下VB程序段：
n = 3: s = 0
c = Val(Text1.Text)
For i = 1 To c
p = i Mod n + 1
s = s + p
Next i
在文本框Text1中输入9，程序执行后，变量s的值为（ ）
A．6 B．9 C．18 D．45
【答案】C
【知识点】程序的调试及运行；循环结构语句及程序实现
【解析】【解答】程序分析：
n = 3，s = 0，文本框Text1中输入9，即c=9，
i=1，p=1 Mod 3+1=2，s=0+2=2；
i=2，p=2 Mod 3+1=3，s=2+3=5；
i=3，p=3 Mod 3+1=1，s=5+1=6；
i=4，p=4 Mod 3+1=2，s=6+2=8；
i=5，p=5 Mod 3+1=3，s=8+3=11；
i=6，p=6 Mod 3+1=1，s=11+1=12；
i=7，p=7 Mod 3+1=2，s=12+2=14；
i=8，p=8 Mod 3+1=3，s=14+3=17；
i=9，p=9 Mod 3+1=1，s=17+1=18；
i=10，不进入循环，程序结束，s值为18。
故答案选C。
【分析】本题考查的VB程序的运行与分析。
10．（2021高三下·浙江开学考）有如下VB程序段：
For i = 1 To 2
For j = 6 To 2 * (i + 1) Step -2
If a(j) < a(j - 2) Then
t = a(j): a(j) = a(j - 2): a(j - 2) = t
End If
Next j
Next i
假定数组元素a(1)～a(6)的值依次为“happy，sky，change，sk，bellow，hello”。执行该程序段后，a(4)～a(6)的值依次是（ ）
A．sk，bellow，sky B．sky，bellow，sk
C．sk，happy，sky D．happy，sk，sky
【答案】A
【知识点】循环结构语句及程序实现
【解析】【解答】题中外层循环执行2次，内层循环步长为-2，当 a(j) < a(j - 2)时，进行数组元素互换，i=1时，执行结果为happy,hello,change,sky,bellow,sk；i=2时，执行结果为happy,hello,change,sk,bellow,sky。故答案选A。
【分析】本题主要考查的是VB程序循环嵌套。
11．（2021高三下·浙江开学考）判断非重字符串s2(至少含2个字符)是否为s1的子集，若s2的字符按序在s1中出现，则称s2为s1的子集。例:s1="a3bcd"，s2="ab"，s3="ba"，则s2是s1的子集，s3不是s1的子集。实现该功能的VB程序段如下：
s1 = Text1.Text : s2 = Text2.Text
i = 1 : j = 1
Do While i <= Len(s1) And j <= Len(s2)
If Mid(s1, i, 1) = Mid(s2, j, 1) Then
Loop
If Then Label1.Caption = "是子集" Else Label1.Caption = "不是子集"
上述程序填空处的可选语句为：
①i = i + 1 ②j = j + 1 ③i > Len(s1) ④j > Len(s2)
则(1)(2)(3)处语句依次最合理的搭配为（ ）
A．①②③ B．②①③ C．①②④ D．②①④
【答案】D
【知识点】循环结构语句及程序实现
【解析】【解答】Mid ( )函数是从文本字符串中指定的开始位置起返回指定长度的字符。题中当循环变量i和 j分别小于等于字符串s1和s2长度时，逐一判断对应字符是否相同，相同，则继续比较下一字符，因此方框处分别为循环变量增1，当变量j大于字符串s2长度时，说明字符逐一比较通过，得出“是子集”结论。故答案选D。
【分析】本题主要考查的是VB循环结构。
12．（2021高三下·浙江开学考）有如下VB程序段：
s = ""
i = 1:j = 10:k = 1
Do While i <= j
m = Int((i + j) / 2)
If a(m) > b(k) Then j = m - 1 Else i = m + 1
If a(m) = b(k) Then k = k + 1:s = s + Str(m)
Loop
数组元素a(1)到a(10)依次为“2,3,7,9,10,15,15,15,19,20”，执行该程序段后，变量s的值有3个字符，则b(1)到b(3)的值可能为（ ）
A．2 3 11 B．3 7 9 C．10 15 15 D．15 15 19
【答案】B
【知识点】查找算法及程序实现
【解析】【解答】如果b(1)到b(3)的值为A选项的2,3,11，则变量s的最终值只有“1”这1个字符，选项A错误；如果b(1)到b(3)的值为B选项的3,7,9，则变量s的最终值是“234”这3个字符，选项B正确；CD选项排除同上。故答案选B。
【分析】本题考查的是对VB程序的分析。本题可采用排除法来分析程序。
二、操作题
13．（2021高三下·浙江开学考）某中学校园英语文化节举行了各类比赛，用Excel软件对比赛成绩进行处理，如图a所示。
图a
（1）图a中L4:P4区域的数据是根据K4单元格自动填充得到，则L4单元格中的公式是
（单选，填字母：A
.=AVERAGEIF($A$4:$A$63,"高一*",C4:C63)/ B
.=AVERAGEIF($A4:$A63,"高一*",C4:C63) / C
.=AVERAGEIF($A4:$A63,"高一*",B4:B63 )
（2）根据图a数据创建的图表如图b所示，则创建图表的数据区域为 。
图b
（3）若要找出高三年级口语成绩最好的班级，下列操作可行的是 （多选，填字母）。
A．以“班级”包含高三，“口语”最大1项进行筛选，选取筛选出的班级。
B．以“班级”包含高三进行筛选，再按“口语”进行降序排序，选取排在最前面的班级。
C．以“口语”为主要关键字，“班级”为次要关键词均降序排序，选取排在最前面的班级。
D．以“口语”为主要关键字降序排序，以“班级”包含高三进行筛选，选取排在最前面的班级。
【答案】（1）B
（2）J3:P3,J6:P6
（3）B；D
【知识点】表格数据的处理与计算；表格数据的图表呈现
【解析】【解答】（1）Excel中单元格的表示：绝对位置，就是单元格人眼看到的坐标，一般用$表示，如$A$10，表示A10单元格。相对位置，表示在使用公式时，引用的单元格与当前单元格的偏移。题中K4单元格中的公式是=AVERAGEIF($A4:$A63,"高一*",B4:B63)，L4的公式相比于K4的公式，只有相对位置的单元格表示有变动，即“B4:B63”，变为“C4:C63”。故答案为：B。
（2）根据图表中的横纵坐标，纵坐标数据只涉及到J6:P6，横坐标的标注涉及到J3:P3。故答案为：J3:P3,J6:P6；
（3）选项A，“口语”最大1项进行筛选，不可行，可能出现多个班级并列第一的情况。选项C，该做法不能排除高三以外，其他年级的情况。故答案选BD。
【分析】本题考查的是Excel中公式的应用、图表数据源的选取、数据的筛选与排序。在选择图表数据区域时，要看其横轴和纵轴的数据。对数据的筛选分为“自动筛选”和“高级筛选”。通过对数据筛选条件的设置，可以筛选出所需的数据。
14．（2021高三下·浙江开学考）使用Flash软件创作“雍正故宫”作品，其中“load”场景的制作脚本如下表所示，
场景名：load 类别序号：1 进入方式：启动动画自动播放
呈现方式： 呈现顺序：
①“音乐”图层中的声音源于库中的素材 bg.wav，参数如图b所示。 ①一开始时出现背景画面，音乐随即播放。
②“文物”从完全透明到完全显示，由左到右由小变大慢慢呈现在舞台上。 ②1秒后出现“文物”动画，3.5秒后音乐停止播放。
③“播放”按钮位于舞台右侧位置，单击该按钮跳转到“main”场景第1帧并开始播放。 ③最后出现“播放”按钮，场景停止播放。
(其他略) (其他略)
部分界面如图a所示，请回答下列问题：
图a
图b
（1）根据所给材料，下列说法正确的是 (多选 ，填字母)。
A．该动画作品至少包含2个场景
B．“播放”按钮只能用于本场景的舞台中
C．编写制作脚本后应进行的操作是编写文字脚本
D．“文物”图层第10帧对象的Alpha值为0%
（2）从图中可知“故宫”图层中的文字“雍正故宫”为 （选填：实例/形状）。
（3）根据制作脚本可知，背景图层第60帧处应添加动作命令为 。
（4）若要使得“音乐”图层中的音乐在“文物”图层补间动画结束后停止播放，在不改变其他动画效果情况下，以下操作可行的是 （多选：填字母）。
A．在“音乐”图层第20帧帧插入关键帧
B．将“音乐”图层第35帧空白关键帧移至第20帧
C．在“音乐”图层第20帧添加stopAllSounds();指令
D．删除“音乐”图层第20-34帧，并将声音的同步方式设置为事件
（5）“按钮”图层的呈现方式和脚本不符，则应进行的操作是 。
【答案】（1）A；D
（2）实例
（3）Stop();
（4）A；B
（5）将“按钮”图层第1帧移至第60帧 或其他等价答案
【知识点】多媒体作品的规划和设计；时间轴、帧、图层、库的概念及基本操作；常用影片控制函数的应用
【解析】【解答】（1）选项A：Flash动画中有多少个场景？场景这个词呢，它在Flash中有两种意思，一种是人物场景，也是就背景，另外一种就是舞台场景，就是在舞台的右上角场景里边的分场景。根据该题目描述，至少包含人物场景和舞台场景。选项正确；
选项B：“播放”按钮不是只能用于本场景的舞台中。选项B错误；选项C：多媒体作品脚本编写的一般顺序是：制订脚本大纲→编写文字脚本→编写制作脚本→媒体元素分解。选项C错误；选项D，“文物”从完全透明到完全显示，由左到右。通过Alpha的数值来调整图像的透明度和半透明性，选中色块，alpha值取0%，则为纯透明。alpha值取100%，则为不透明。第十帧的位置应该是完全透明，所以值为0%。选项D正确。故答案选AD；
（2）实例是指位于舞台上或嵌套在另一个元件内的元件副本。 实例可以与它的元件在颜色、大小和功能上有差别。“雍正故宫”中心位置有小圆圈，是典型的实例的特点。故答案为：实例；
（3）stop()；停止当前正在播放的 SWF 文件（停止在当前帧上）动作。故答案为：stop()；；
（4）停止播放声音命令stopAllSounds()，功能：在不停止播放头的情况下停止SWF文件中当前正在播放的所有声音。此命令没有参数。故答案选AB；
（5）题意中按钮的效果要求是“最后出现‘播放’按钮，场景停止播放”。根据时间轴上“按钮”图层所示，所以需要将“按钮”图层第1帧移至第60帧。故答案为：将“按钮”图层第1帧移至第60帧 或其他等价答案。
【分析】本题主要考查的是Flash中图层的基本操作、控制命令的设置以及动画效果的实现。
15．（2021高三下·浙江开学考）某分段排序算法描述如下：
1)将原始数据按升序分成若干有序段。
2)将第1段和第2段进行合并，使得合并后的数据依旧有序，得到新的有序段。
3)将新的有序段再次和下一个有序段进行合并。
4)重复上述操作，直到全部数据变成一个有序段为止，排序结束。
如数据：1、3、9、4、5、7、2、6，第1段为1、3、9，第2段为4、5、7，将第1段和第2段合并，得到新的第1段为1、3、4、5、7、9。继续和下一段2、6进行合并，合并后段数变为1段，则排序结束。
编写VB程序，实现分段排序功能：在文本框Text1中输入数据总量，单击“数据生成”按钮Command1后，在列表框List1中显示原始数据，然后单击“分段排序”按钮Command2，在列表框List2中显示排序后的结果。程序运行界面如图所示。
请回答下列问题：
（1）若要清空列表框List1，下列代码正确的是 (单选，填字母：
A .List1.Clear / B .List1.List="" / C .List1.Text=""
/ D .List1.Caption="空白" )。
（2）实现分段排序功能的VB程序如下，请在划线处填入合适的代码。
Dim a(1 To 1000) As Integer
Dim n As Integer
Private Sub Command1_Click()
'输入数据总量n，随机生成n个数据保存在数组
'a(1)~a(n)中，并在List1中显示数据，代码略
End Sub
Private Sub Command2_Click()
Dim b(1 To 10000) As Integer
Dim p1 As Integer, p2 As
Integer, t1 As Integer, t2 As Integer
Dim t As Integer, k As Integer,
i As Integer, j As Integer
p1 = 1
t1 = leng(p1)
p2 = p1 + t1
Do While p2 <= n
i =
p1: j = p2: t = 1
Do
While i < p2 Or j < p2 + t2
If
j >= p2 + t2 Or i < p2 And a(i) < a(j) Then
b(t) = a(i): i = i + 1
Else
b(t) = a(j): j = j + 1
End
If
t =
t + 1
Loop
For
k = 1 To
a(k) = b(k)
Next k
t1 =
t1 + t2
Loop
'在List2中输出数组a(i)的值，代码略
End Sub
Function Leng(ByVal p As Integer) As Integer
'该函数返回数组a中数组下标p开始的升序有序段的长度，代码略
End Function
（3）程序中加框处代码有错，请改正。
【答案】（1）A
（2）p2 = p1 + t1 或 p2 = p2 + t2；t2 = leng(p2) 或 t2 = leng(t1+p1) 或 t2 = leng(t1+1)
（3）t1 + t2 或 t-1 或 p2+t2-1或 t 或 t1+1
【知识点】过程与自定义函数；排序算法及程序实现；基本语句
【解析】【解答】（1）VB中列表框对象可通过Clear方法清空原有内容，故答案为：A；
（2）第一空：变量p2记录新增后有序段的长度。故答案为：p2 = p1 + t1；
第二空：数组a接收列表框list1生成的数组排序后在列表框list2中输出，变量t1存储数组中有序字符的个数，变量p2记录新增后有序段的长度。故答案为：t2 = leng(p2)；
第三空：For循环中，将有序段添加到数组a中，For循环变量终值t1 + t2。故答案为：t1 + t2。
【分析】本题主要考查VB排序算法以及自定义函数的应用。
16．（2021高三下·浙江开学考）亲戚寻找。小李总是因为认不清亲戚而苦恼，于是他设计了如下程序来模拟亲戚寻找的过程。已知：如果1和2是亲戚，1和3是亲戚，则2和3也是亲戚。代码思维如下：
1)将每个人看成是一个钩码，能挂在另一个挂钩底下，自己底下也能挂其他挂钩。
2)如果两个钩码在同一条钩码串上，则为亲戚（如2、3都能找到1）。
3)如果两个是亲戚但不在一串钩码上，则可将其中一串的最上面的钩码挂在另一串的下方。
例如从图a加框处的前三行数据可得到图b所示的钩码串1和钩码串2，从第四行数据可知9、5也为亲戚，则可将两串钩码合并，合并后3为2的顶端，5为3的顶端，其余数据以此类推。
根据算法思想，编写VB程序功能如下：程序初始化时给出6条亲戚关系显示在List1中，单击“理关系”按钮，在List2中显示每个人所在钩码的顶端编号。在Text1和Text2中分别输入两人的编号，单击“询问”按钮，输出两个人是否为亲戚关系。程序运行界面如图a所示。
（1）根据图a数据，若输入两人的编号为4和5，则两人的关系是否为亲戚 (填：是/否)。
（2）实现上述功能的VB程序如下，请在划线处填入合适的代码。
Const n = 9 ‘总人数
Const m = 6 ‘已知的亲戚关系数
Dim a(1 To n) As String , b(1 To n) As String
Dim f(1 To n) As String ‘记录不同的亲戚钩码串成员，每条亲戚钩码串内互为亲戚
Dim k As Integer ‘亲戚钩码串的数目
Private Sub Form_Load()
‘初始化List1和List2，生成m条亲戚关系，每条亲戚关系的编号对应存储在数组a(i)和b(i) '中，在List1中输出a(i)和b(i)，代码略
End Sub
Private Sub Command1_Click()
Dim i As Integer, x As Integer,
y As Integer
f(1) = a(1) + b(1) ‘利用a(1)、b(1)生成第一条钩码串存储在f(1)中
k = 1 ‘k为钩码串编号
For i = 2 To m
x = root(a(i), 0): y =
root(b(i), 0) ‘x为调用函数获取a(i)所在的钩码串编号
If x = 0 And y = 0 Then k =
k + 1: ‘根据x与y分类讨论
If x <> 0 And y = 0
Then f(x) = f(x) + b(i)
If x = 0 And y <> 0
Then f(y) = f(y) + a(i)
If x <> y And x
<> 0 And y <> 0 Then ‘x、y在不同钩码串则将两条钩码串合并
f(x) = f(x) + f(y):
f(y) = f(k): k = k - 1
End If
Next i
For i = 1 To n ‘输出每个人所在钩码的顶端编号
x = root(CStr(i), 0): y =
root(CStr(i), 1) ‘Cstr()函数用于去除字符前导空格
If x <> 0 Then
If y = Len(f(x)) Then
List2.AddItem Str(i) + " " + CStr(i)
If y <> Len(f(x))
Then List2.AddItem Str(i) + " " +
End If
Next i
End Sub
'按钮Command2的功能为判断输入的两个人是否为亲戚关系，代码略
Function root(a As String, b As Integer) As Integer ‘参数a表示待查找目标，参数b
‘表示返回值类型，0表示返回目标所在钩码串编号，1表示返回目标在该钩码串中的位置
Dim m As Integer, n As Integer, i As Integer, j As Integer
m = 0: n = 0: i = k: j = 0
Do While i > 0
If a = Mid(f(i), Len(f(i))
- j, 1) Then m = i: n = Len(f(i)) - j: Exit Do
j = j + 1
If j = Len(f(i)) Then i = i
- 1: j = 0
Loop
If Then root = m Else root = n
End Function
【答案】（1）是
（2）f(k) = a(i) + b(i；Mid(f(x), y + 1, 1)；b = 0
【知识点】过程与自定义函数；常用标准函数
【解析】【解答】（1）根据题示，5的顶端是8，8的顶端是4，即4和5是亲戚，因此答题空1为“是”；
（2）第一空：数组变量用于存储钩码串，当x = 0 ，y = 0时，则钩码串新增相关数据。故答案为：f(k) = a(i) + b(i)；
第二空：For循环用于输出每个人所在钩码的顶端编号，当y不等于钩码串长度时，需要在List2中添加相关钩码。故答案为：Mid(f(x), y + 1, 1)；
第三空：自定义函数root用于获取变量所在的钩码串编号，当参数b=0时，该自定义函数返回m，否则返回n。故答案为：b = 0。
【分析】本题主要考查VB中自定义函数调用。
二一教育在线组卷平台（zujuan.21cnjy.com）自动生成 1 / 1
