浙江省金华十校2020届高三上学期信息技术11月模拟考试试卷

浙江省金华十校2020届高三上学期信息技术11月模拟考试试卷
一、选择题(本大题共12小题，每小题2分，共24分。)
1．（2019·金华模拟）下列说法正确的是（　　）
A．计算机中的内码是以十六进制的形式存储的
B．信息可以脱离所反映的事物而存在，但必须有载体
C．只要经常更新杀毒软件就可以防御一切计算机病毒
D．信息是指对消息接受者来说预先不知道的东西，因此具有不确定性
【答案】B
【知识点】信息及其特征
【解析】【解答】选项A：在计算机内部都是以二进制表示数据的而不是以十六进制表示的，本项错。选项B：信息具有传递性，在产生后可以脱离所反映的事物而在不同的载体之间进行传递，但信息不能独立存在必须依附于载体，这是信息的依附性。本项对。选项C：杀毒软件是滞后于计算机病毒的，有了某种病毒后才能出现相应的杀毒软件或升级包，本项错。选项D：信息尽管具有真伪性，但对于一条信息其表达的意义是确定的，本项错。故答案选B。
【分析】本题考查的是信息的特征。信息有五个基本特征和五个一般特征。基本特征：普遍性、依附性、传递性、价值性、时效性；一般特征：共享性、真伪性、不完全性、价值相对性、可处理性。
2．（2019·金华模拟）从电子邮件服务器中接收邮件附件到本地计算机时使用的协议是（　　）
A．SMTP B．POP3 C．HTTP D．FTP
【答案】B
【知识点】网络协议
【解析】【解答】选项A：SMTP协议又称为简单邮件传输协议，是用于发送邮件的协议。选项B：POP3协议又称为邮局协议，是用于接受邮件的协议。选项C：HTTP协议又称为超文本传输协议，是用于传输网页文件的协议。选项D：FTP协议又称为文件传输协议，是用于上传和下载文件的协议。故答案选B。
【分析】本题考查的是常用的网络协议及其英文名称。除了以上常见的协议还有Telnet协议，又称远程登陆协议，是用于远程登陆和管理计算机服务器或网络设置的协议。TCP/IP即传输控制和网络协议，是用于上网的协议。DNS 全称为Domain Name Service，中文名为域名服务 ，用于完成地址查找，邮件转发等工作(运行在TCP和UDP协议上。
3．（2019·金华模拟）下列应用中没有使用人工智能技术的是（　　）
A．百度输入法中的语音输入功能
B．通过语音控制智能音响点播歌曲
C．在浏览器地址栏中输入“www”后自动跳出曾经浏览过的网址
D．超市中的人脸识别自助付款
【答案】C
【知识点】人工智能的应用
【解析】【解答】选项A： 百度输入法中的语音输入功能使用的是语音识别技术，是人工智能技术。选项B： 通过语音控制智能音响点播歌曲使用的是语音识别技术，是人工智能技术。选项C：在浏览器地址栏中输入“WWW”后自动跳出曾经浏览过的网址使用的是自动搜索技术，不是人工智能技术。选项D： 超市中的人脸识别自助付款使用的是生物识别技术，是人工智能技术。故答案选C。
【分析】本题考查的是人工智能技术的范畴。人工智能（Artificial Intelligence），英文缩写为AI。它是研究、开发用于模拟、延伸和扩展人的智能的理论、方法、技术及应用系统的一门新的技术科学。人工智能包括机器人、语音识别、图像识别、生物识别、自然语言处理和专家系统等。
4．（2019·金华模拟）使用UltraEdit件观察字符“ AvengersⅣ(2019)”的内码，部分界面如图所示。
下列说法正确的是（　　）
A．字符“IV”的内码值的二进制表示为“10100010”
B．图中所有字符内码值的十进制表示均小于128
C．图中字符在计算机存储时均占1个字节
D．根据图中信息推测，字符“a”的ASCⅡ编码的十六进制值为61H
【答案】D
【知识点】信息的编码
【解析】【解答】选项A：由图可知，“ IV”的内码为”A2 F4“转为二进制为”1010 0010 1111 0100“，本项错。选项B：由图可知“ IV”的内码为”A2 F4“转为十进制数为“258 277”，其区码或位码都超过了128，本项错。选项C：由图可知“ IV”的内码为”A2 F4“要占两个字节，本项错。选项D：由图中可知字符“e”的内码为65H，可以推出字符a的内码为61H，本项对。故答案选D。
【分析】本题考查的是中文及其字符、英文字母、英文字符、数字在内存的表示以及依据字母表来推测未知字母的内码。在内存中一个中文或中文字符在内存中占用二个字节、4位十六进制、16位二进制数。而一个英文字母或英文字符、阿拉件数字在内存中占用一个字节、8位二进制数，2位十六进制数。英文字母在内存中是按字母表顺序存储的，且区分大小写由此可以依据字母表来推测未知字母的内码。
5．（2019·金华模拟）一段时长为20秒AⅥ格式有声音视频，其具体参数如图所示，视频压缩后的存储容量约为30MB，压缩比约为（　　）
A．12：1 B．20：1 C．30：1 D．36：1
【答案】B
【知识点】声音、图像、视频编码
【解析】【解答】视频文件压缩前的存储容量为：24位即每个像素占用24位二进制数，即占3个字节，存储容量=720*576*3*25*20=622080000B=607500KB=593.26171875MB，其存储容量在压缩前大约为600M，在压缩后存储容量为30MB，故其压缩比约为20:1。故答案选B。
【分析】本题考查的是视频文件的存储容量计算公式。视频文件存储容量=（水平像素×垂直像素×每个像素所需位数／8）*帧频*时长（字节）。
6．（2019·金华模拟）使用Gold Wave软件编辑某音频文件，选中其中一段音频后部分界面如图所示。下列说法正确的是（　　）
A．执行“静音”命令后直接保存，音频文件存储容量为原来3/4
B．执行“删除”命令后直接保存，音频文件存储容量为原来3/4
C．执行“复制”命令并直接粘贴保存，音频文件存储容量与原来一样
D．执行“插入静音”命令，设置时间为15秒后直接保存，音频文件中右声道有静音
【答案】D
【知识点】声音素材的基本处理；声音、图像、视频编码
【解析】【解答】选项A：执行“静音”命令后，选中部分变为了静音，但音频文件的总时长没有改变，则音频文件的存储容量不会改变，本项错。选项B：执行“删除”命令后由于只选中了左声道，相当于执行静音命令，音频文件的容量不会变小，本项错。选项C：执行“复制”和“粘贴”命令后则相当于插入了一段音频，则音频文件的时长变长，故存储容量比原文件大，本项错。选项D：执行“插入静音”命令后使左声道的声音比右声道的时长长，故右声道也会有部分静音，本项对。故答案选D。
【分析】本题考查的是音频文件的“静音”、“删除”、“复制”、“插入静音”命令。如果只选中单声道的音频而没有选中双声道则执行“删除”命令与“静音”命令相同，如果选中了双声道则执行“删除”命令后音频文件的总时长变短，存储容量变小。插入静音就是增加音频文件的时长，复制后再粘贴也相当于插入了一段音频。
7．（2019·金华模拟）某算法的部分流程图如图所示，若输入“50”并执行这部分流程图，变量i的值为（　　）
A．9 B．10 C．11 D．12
【答案】B
【知识点】算法的常用表示方法；算法的控制结构
【解析】【解答】由本题的流程图知，先输入一个数50赋给变量n，然后给a、b、c的值赋为1，将i的值赋为2，然后判断c的值是否超过了n的值，如果没有超过则执行循环体，由于c=1，小于等于50成立，故执行第一次循环：c=a+b=1+1=2，a=b=1，b=c=2，i=i+1=2+1=3，然后再判断c的值，c值为2仍然小于50，执行第二次循环：c=1+2=3，a=2，b=3，i=4，第三次循环：c=2+3=5，a=3，b=5，i=5，第四次循环：c=3+5=8，a=5，b=8，i=6，第五次循环：c=5+8=13，a=8，b=13，i=7，第六次循环：c=8+13=21，a=13，b=21，i=8，第七次循环：c=13+21=34，a=21，b=34，i=9，第八次循环：c=21+34=55，a=34，b=55，i=10，此时c值超过了50，故输出i值，i=10。故答案选B。
【分析】本题考查的是对流程图的识别以及算法的计算。流程图是一种用规定的图形、指向线及文字说明来准确表示算法的图形，具有直观、形象的特点，能清楚地展现算法的逻辑结构。流程图使用标准的框图符号绘制，框图一般按从上到下、从左到右的方向画，除了判断框外，程序框的符号只有一个进入点和一个退出点，而判断框则具有一个进入点和多个退出点。
8．（2019·金华模拟）下列VB表达式的值为2019的是（　　）
A．Len(“2018”)+1 B．Val(“2018”+“1”)
C．Abs(Int(-20188)) D．Int(Rnd*2019)
【答案】C
【知识点】运算符、基本运算与表达式
【解析】【解答】选项A： Len(“2018”)+1=4+1=5；
选项B： Val(“2018”+“1”)=val（“20181”）=20181；
选项C：Abs（int（-2018.8））=abs（-2019）=2019；
选项D：Int(Rnd*209）的取值范围为【0，2018】之间的任一整数。故答案选C。
【分析】本题考查的是VB常用标准函数的功能。在本题中，len()是求字符串的长度，val()是将字符型转为数值型，abs()是求参数的绝对值，int()是取不大于参数的一个整数，rnd为随机整数，其取值范围为（0，1）。
9．（2019·金华模拟）有如下VB程序段：
Dim s As String, i As Integer, n As Integer
Dim ch As String, ans As Integer
s= Text1.Text
n Len(s): ans=0
For i=1 To n
ch =Mid (s, i, 1)
ans =ans *2+ Val(ch)
Next i
Text2 Text ans
若程序运行后Tex2中显示的是“38”，则Text中输入的是（　　）
A．100110 B．209 C．45 D．19
【答案】A
【知识点】常量、变量及变量的赋值
【解析】【解答】本题程序分析如下：
Dim s As String, i As Integer, n As Integer ‘定义字符串变量s，定义整型变量i和n
Dim ch As String, ans As Integer ‘定义字符串变量ch，定义整型变量ans
s= Text1.Text ‘将从文本框1中输入的字符串赋给变量s
n= Len(s): ans=0 ‘将字符串的长度赋给变量n，初始化ans的值为0
For i=1 To n ‘使用i来控制循环，i的初值为1，终值为n（字符串s的长度），步长为1
ch =Mid (s, i, 1) ‘按i值从字符串s中中取一个字符赋给变量ch
ans =ans *2+ Val(ch) ‘将an值加倍后加上字符ch转为数值型的值
Next i ‘结整循环
Text2 .Text= ans ‘在文本框2中输出ans的值
由以上程序可知，该程序将从文本框中输入的数从左到右逐位取出后要乘以2倍再加上后面的值，直到输入的字符串取完为止，故选项A：共执行6次循环，第一次ans=1，第二次ans=1*2+0=2，第三次ans=2*2+0=4，第四次ans=4*2+1=9，第五次ans=9*2+1=19，第六次ans=19*2+0=38；选项B：共执行3次循环：第一次ans=2，第二次ans=2*2+0=4，第三次ans=4*2+9=17；选项C：ans=4*2+5=13，选项D：ans=1*2+9=11。故答案选A。
【分析】本题考查的是定次循环for语句。由以上程序可知，该程序将从文本框中输入的数从左到右逐位取出后要乘以2倍再加上后面的值，直到输入的字符串取完为止，对于这种有规则有一定循环次数的循环可以使用定次循环。
10．（2019·金华模拟）在由小写字母组成的字符串中，找出同一字母第一次与最后一次出现的最大间隔距离，如字符串“ abccbcb”，字母“b”第一次与最后一次分别出现在位置2和7，相距5，间隔距离最大。编写VB代码如下：
s=Text.Text
c=0
For i=1 To 26
⑴
Next
For i=1 To Len(s)
⑵
IF d(t)=0 Then d(t)=i
⑶
Next
Text2 Text=Str(c)
填空处的代码可由以下部分组成
①d(i)=0 ②=val(Mid(si, 1) ③IFd(t)<>0Andi-d(t)> c Then c=i-d(t)
④d(i)=1 ⑤t=Asc(Mid(s, i, 1)-Asc("a")+1 ⑥fi-d(t)> c Then c=i-d(t)
代码顺序正确的是（　　）
A．④⑥⑤ B．①⑤⑥ C．④②③ D．①⑤③
【答案】D
【知识点】算法的控制结构；常量、变量及变量的赋值
【解析】【解答】本程序分析如下：
s=Text.Text ‘将从文本框1中输入的字符串赋给变量s
c=0 ‘将c值初始化为0
For i=1 To 26 ‘使用i来控制循环，i的初值为1，终值为26，步长为1
⑴ ‘初始化数组d的每个元素值为0，数组d的值标记着字母在字符串的初始位置，而下标识着字母在字母表的顺序，故本处答案应填写：d（i）=0
Next ‘结束循环
For i=1 To Len(s) ‘使用i来控制循环，i的初值为1，终值为字符s的长度，i值代表着该字符在字符串s中的位置
⑵ ‘按i值从字符串中中取一个字符并求出其在字母表的位置并赋给变量t，故本处答案应填写： t=Asc(Mid(s, i, 1)-Asc("a")+1
IF d(t)=0 Then d(t)=i ‘如果和对应的数组在的元素的值为0，则说明没有出现该字符故将其初始位置i赋给数组元素
⑶ ‘如果t对应的数组d的元素值不为0且i值与d（i）值（代表该元素与初始位置的距离）之差大于了c值（c为字母的最大距离）时将这个距离（i-d（i）赋给c，使用c值仍为最大距离，故本题答案应填写： IF d(t)<>0 And i-d(t)> c Then c=i-d(t)
Next ‘结束循环
Text2 .Text=Str(c) ‘在文本框2中输出字母的最大距离
由以上可知（1）处为初始化数组d的每个元素值为0，数组d的值标记着字母在字符串的初始位置，而下标识着字母在字母表的顺序，故本处答案应填写：d（i）=0；（2）处为按i值从字符串中中取一个字符并求出其在字母表的位置并赋给变量t，故本处答案应填写： t=Asc(Mid(s, i, 1)-Asc("a")+1 ；（3）处为如果t对应的数组d的元素值不为0且i值与d（i）值（代表该元素与初始位置的距离）之差大于了c值（c为字母的最大距离）时将这个距离（i-d（i）赋给c，使用c值仍为最大距离，故本题答案应填写： IF d(t)<>0 And i-d(t)> c Then c=i-d(t) 。故答案选D。
【分析】本题考查的是循环语句及数组的特殊用法。在本题中数组d有的值和下标都有作用，数组d的值标记着字母在字符串的初始位置，而下标识着字母在字母表的顺序。另外使用c来标记字母距离的最大值，通过i-d（i）来判断新字母的距离并与c值比较，如比c值大则替换c值，保证c为字母的最大距离，最后输出c值。
11．（2019·金华模拟）有如下VB程序段
Dim a(1 To 100)As Integer, b(1 To 10) As Intege
Dim i As Integer, s As Integer, c As Integer
For i=1 To 100
a(i)=0
Next i
For i=1 To 9 Step 2
a(b(i))=a(b(i))+1: a(b(i+1)+1)=a(b(i+1)+1)-1
Next i
c=0
For i=1 To 100
c=c+a(i)
If c=0 Then s=s+ 1
Next i
Text1. Text= Str(s)
若数组b中的值依次为“5，10，7，20，30，40，40，60，55，70”，则程序运行后Text中的内容是（　　）
A．43 B．42 C．41 D．40
【答案】A
【知识点】算法的控制结构；常见数据类型、数组；常量、变量及变量的赋值
【解析】【解答】本程序分析如下：
Dim a(1 To 100)As Integer, b(1 To 10) As Intege '定义整型数组a和b，a有100个元素，b有10个元素
Dim i As Integer, s As Integer, c As Integer '定义整型变量i、s和c
For i=1 To 100 '使用i来控制循环，i的初值为1，终值为100，步长为1
a(i)=0 '初始化数组元素的值为0
Next i '结束循环
For i=1 To 9 Step 2 '使用i来控制循环，i的初值为1，终值为9，步长为2
a(b(i))=a(b(i))+1: a(b(i+1)+1)=a(b(i+1)+1)-1 '以数组b（i）的值为下标对应的数组a元素的值增1，a用于统计数组b的值的个数，将b（i+1）为下标，其对应数组a元素后的一个元素值减1
Next i '结束循环
c=0 '将c初始化为0
For i=1 To 100 '使用i来控制循环
c=c+a(i) '将元素i的值累加到变量c中
If c=0 Then s=s+ 1 '如果c的值为0则将s值增1
Next i '结束循环
Text1. Text= Str(s) '在文本框中输出s的值
由以上程序分析知，a(5)=1,a(11)=-1,a(7)=1,a(21)=-1,a(30)=1,a(41)=-1,a(40)=1,a(61)=-1,a(55)=1,a(71)=-1
在a（1）-a（4）时，c=0，故s=4，在a（5）-a（20）时，c<>0，不累加s，当a（21）-a（29）时，c=0则累加s=4+9=13，当a（30）-a（70），c<>0,不累加s，当a（71）-a（100）时，c=0，累中s值，则s=13+30=43。故答案选A。
【分析】本题考查的是计数器的使用及用数组元素作为另一个数组的下标。计数器是用于统计满足某个条件的个数，如本题计数器为s用于统计数组a的元素合计为0的情况，其格式为：s=s+1。在本题中将数组b的元素值作为了数组a的下标，将其对应的数组a的值增1或减1。
12．（2019·金华模拟）有如下VB程序段：
i=1: j=8: n=1
k=Val(Text1. Text)
Do While i<=j
m=(i+j)2
IF kn=n+1
Loop
数组元素d(1)到d(8)依次为3，9，14，17，25，29，32，35，在文本框 Text1输人“14”。执行程序后，下列说法不正确的是（　　）
A．变量m的值为3 B．变量i的值3
C．变量j的值为3 D．变量n的值为4
【答案】B
【知识点】排序算法及程序实现
【解析】【解答】本题程序分析如下：
i=1: j=8: n=1 ‘给变量i、j、n分别赋值为1、8和1，i代表要查找数组的下标的下限，而j代表要查找数组的下标的上限，n为计数器，用于统计查找次数
k=Val(Text1. Text) ‘将文本框1中输入的数据转为数值型并赋给变量k，在本题k=14
Do While i<=j ‘在要查找数组的下标的下限小于等于上限时进行循环
m=(i+j)\2 ‘将中值元素的下标赋给变量m
IF kn=n+1 ‘将n值增1
Loop ‘结束循环
由以上分析知，开始运行程序时i=1，j=8，n=1，k=14，第一次循环：m=4，k=14j退出循环。共循环3次，故n=1+3=4，循环终了，i=4，j=3，m=3，n=4。故答案选B。
【分析】本题考查的是使用对分法查找数据的算法。对分法查找过程是先将一个数列放于一个有序数组中，然后比较中间数组元素的值与要查找的值，或中间数组的值比要查找的值大，则在前半个数组中查找，若中间数组的值比要查找的值小则在后半个数组中查找。查找方法仍是比较中间数组元素的值和要查找的值。以此类推直到查到或下限大于了上限（没查找）为止。
二、非选择题(本大题共4小题，4+8+7+7，共26分)
13．（2019·金华模拟）丁老师利用
EXCEL记录了高二(1)班同学本学期每次月考及期末成绩，如图13-1所示：
（1）表中第43行是用函数 AVERAGE()计算得到的，则C43单元格中的公式是 　 　；
（2）表中I列的排名是按照总评成绩从高到低排序后依次输入排名得到的，根据图13-1可知排序的数据区域是　 　；
（3）丁老师想找到“期末成绩”和“总评成绩”均为班级前5的同学，下列方法可行的是 (单选，填字母)
A．在“总评成绩”列设置筛选，筛选条件为“最大的5项”，此时“排名”为1-5的同学
B．在“期末成绩”列设置筛选，筛选条件为“最大的5项”，此时“排名”为1-5的同学
C．以“期末成绩”为关键字降序排列，排在前5个的同学
（4）从图2中可知，学号为　 　的同学成绩是持续进步的(图中方框内为学生学号)
【答案】（1）= AVERAGE(C3：C42)
（2）A2：H42或A2：142或A3：H42或A3：I42
（3）B
（4）0141
【知识点】表格数据的基本操作；表格数据的处理与计算
【解析】【解答】（1）由图1可知，第43行求的是第3行到第42行的平均值，C43是求C3到C42区域的平均值，故本小题答案填写： = AVERAGE(C3：C42) 。
（2）由图可知，第一行有合并单元格，第二行为标题行，对行排序，即可以带标题行也可以不带标题行，学生数据第三行到第42行，故本题答案填写： A2：H42或A2：I42或A3：H42或A3：I42。
（3）选项A：总评成绩最大的5项与排名1-5是重复条件，没有涉及期末成绩，本项错。选项B：使用自动筛选期末成绩最大的前5项，并筛选排名1-5，两者是“且”的关系，正好筛选出符合条件的记录，本项对。选项C：本项只筛选期末成绩没有涉及总评成绩，本项错。故答案选B。
（4）由图2可知，0139和0141在5月月考有一个下降，而0141的成绩一直是上升没有下降，故本题答案填写：0141。
【分析】本题考查的是Excel的公式填写、排序数据区域的选择、筛选操作及折线图。填写公式时注意题的要求及数据区域；筛选时自动筛选如果为多个条件，则这多个条件之间为“且”的关系；排序时可以有标题栏也可以没有标题栏，对于公式列可以选也可以不选，公式会自动变化；折线图易于表现变化趋势，从图形可以分析事务的变化状态。
14．（2019·金华模拟）小刘使用Fash软件创作有关诗歌鉴赏的多媒体作品。他先用PhotoShop软件制作素材，再用Flash软件制作动画，请回答下列问题：
（1）在图1状态下，下列描述是正确的是 (多选，填字母)
A．用自由变换命令改变画面左侧的柳树大小，右侧的梅花会一起变化大小。
B．当前状态下，不能修改“梦里水乡”图层的图层样式。
C．交换“梦里水乡”与“柳树”的图层顺序，会改变图片的效果
D．将作品保存为“jpg”格式后打开，“梦里水乡”4个字会有“描边”效果。
（2）在图2状态下将帧频改为24ps，其他场景的播放速度 　 　(填：变快/变慢)。
（3）元件“人物1”编辑界面如图3所示，测试影片时发现单击小人无法跳转到“清明”场景，原因是　 　。
（4）测试影片发现按钮图层中的4个按钮最后才出现在舞台上，为了使按钮一开始就出现在舞台上，正确的操作是 (单选)
A．在“按钮”图层第1帧执行清除关键帧
B．在“按钮”图层最后1帧执行清除关键帧
C．将“按钮”图层第1帧移动到最后1帧
D．在“按钮”图层第1帧执行“清除帧”
（5）单击“清明”按钮后，停止本场景的音乐并进人“清明”场景第1帧播放，应在“清明”按钮中设置脚本
　 　。
【答案】（1）A；B
（2）变快
（3）“人物1”元件中“人物”图层“点击”帧没有帧或“人物1”元件当前有效的可点击区域为文字“清明”或其他类似答案
（4）A
（5）on(press) StopAllSounds(); gotoAndPlay(“清明”, 1);}
【知识点】图片加工常用工具的使用；动画的类型；时间轴、帧、图层、库的概念及基本操作；元件的类型与应用；常用影片控制函数的应用
【解析】【解答】（1）选项A：由图1可知，柳树图层和梅图层是链接图层，两个图层可以看作一个图层，故当使用自由变换工具改变柳树大小时，梅花会一起变化，本项对。选项B：由图可以看出“梦里水乡”图层处于锁定状态是不能修改图层中的图像的，本项对。选项C：“梦里水乡”和“柳树”、“梅”图层没有重叠关系可以交换它们的图层顺序，本项错。选项D：将作品保存为jpg后，所有图层合并为一个图层，而“梦里水乡”里的“描边”处于不可见状态，在合并后同样不可见，本项错。故本小题答案选AB。
（2）由图可知，原动画的帧频为12fps，即每秒播放12帧，现改为24fps后每秒播放24帧则动画播放时间会变短，场景播放速度会变快，故本小题答案选填：变快。
（3）由图2可以看出该按钮的“人物”图层的“点击”帧中没有图像，只有“文字”图层的点击帧才有图像，故点击文字才跳转而点击人物不会跳转，故本小题答案应填写： 人物1”元件中“人物”图层“点击”帧没有帧或“人物1”元件当前有效的可点击区域为文字“清明”或其他类似答案 。
（4）由图2可知，按钮图层的第一帧为一个空白关键帧，故清除第一帧的关键帧就可以将按钮图层的四个按钮同时出现在舞台上，故本小题答案选A。
（5）由题义可知，在按下“清明”或释放该按钮时，停止本场景音乐（stopAllSounds（））并进入“清明场景的第一帧（gotoAndPlay（）函数为转到播放函数），故本题答案应填写： on(press) StopAllSounds(); gotoAndPlay(“清明”, 1);} 或 on(release) StopAllSounds(); gotoAndPlay(“清明”, 1);}。
【分析】本题考查的是Photoshop图层的操作、帧频、点击帧的作用、清除关键帧操作及动作脚本。为了防止图层被误删除或修改可以将图层设置为不可见或锁定状态，在设置为不可见或锁定时不可以修改图层的名称、图层样式和滤镜效果，但可以复制和删除图层。在图层或样式不可见时导出为其他格式的图像文件时，不可见图层或样式不能被导出。链接的图层可以看作一个图层。帧频就是每秒播放的帧数，是衡量动画播放快慢的指标。点击帧表示按钮响应鼠标事件的范围或称区域面积，此状态的画面内容、颜色在动画播放时不可见。动作脚本可以增强多媒体作品的人机交互功能。
15．（2019·金华模拟）小刘设计了一个排序算法，该排序算法会将数组a中奇数位的元素从小到大排列，偶数位的元素从大到小排列，程序界面如图，算法的VB程序段如下：
Private Sub Command2_Click()
Dim i As Integer, j As Integer, tmp As Integer
Dim s1 As String, t As Integer, s2 As String
t=1
For i=1 To n-2
For j= To n Step 2 ‘改错
If a(i)*t>a(j)*t Then
tmp =a(i): a(i)= a(j): a(j)=tmp
End if
Next j
‘填空①
Next i
For i =1 To n
If Then ‘填空②
s1 =s1 Str(a(i))
Else
s2=s2+Str(a(i))
End If
Text2. Text=“奇数位：”+s1
Text3. Text=“偶数位：”+s2
End Sub
回答以下问题：
（1）若要修改按钮 Command上显示的文字，应修改的属性名是　 　(单选，填字母：A .Text/B .Caption/C .Click)
（2）程序代码中，For语句加框处有错，应改为　 　.
（3）划线部分的代码应填①　 　②　 　。
（4）若将划线处“For
i=1 To n-2”修改为“For i=1 To n-1”，是否会出错 　 　(填是/否)
【答案】（1）B
（2）i+2
（3）t=-t；i Mod 2=1
（4）否
【知识点】常量、变量及变量的赋值；排序算法及程序实现
【解析】【解答】本程序分析如下：
Private Sub Command2_Click() ‘命令按钮2单击事件过程开始
Dim i As Integer, j As Integer, tmp As Integer ‘定义整型变量i、j和tmp
Dim s1 As String, t As Integer, s2 As String ‘定义字符串变量s1、s2和整型变量t
t=1 ‘将t值设为1，t为正负号
For i=1 To n-2 ‘使用i来控制循环，i的初值为1，终值为n-2（n代表数组元素个数）步长为1
For j= To n Step 2 ‘改错 使用j来控制内层循环，本循环在i为奇数时处理奇数位，在i为偶数时处理偶数位，无论奇数还偶数位都是与i间隔1个数，故本处初值应为i+2，终值为n，步长为2
If a(i)*t>a(j)*t Then ‘如果奇数位最左边数组元素比其后的元素值大或偶数位最左边的数组元素比其后的元素小时进行如下处理
tmp =a(i): a(i)= a(j): a(j)=tmp ‘借助第三变量tmp交换两个元素的值
End if ‘结束条件判断
Next j ‘结束内层循环
‘填空① 改变正负号正负号由t来决定，故此处答案应填写：t=-t
Next i ‘结束外层循环
For i =1 To n ‘使用i来控制循环，该循环用于合并已经排好序奇数位和偶数位上的数分别为一个字符串
If Then ‘填空② 如果i为奇数时则进行如下处理，故本处答案应填写： i Mod 2=1
s1 =s1+ Str(a(i)) ‘将奇数位上的数组元素转为字符型并合并到字符串s1中
Else ‘否则（如果i为偶数）进行如下处理
s2=s2+Str(a(i)) ‘将偶数位上的数组元素转为字符型并合并到字符串s2中
End If ‘结束条件判断
Text2. Text=“奇数位：”+s1 ‘在文本框2中输出奇数位上的数组元素的值
Text3. Text=“偶数位：”+s2 ‘在文本框3中输出偶数位上的数组元素的值
End Sub ‘结束事件过程
（1）选项A：text为文本属性，命令按钮无引属性。选项B：caption为标题属性，用于显示按钮上的文字。选项C：click为单击事件名。故本题答案选B。
（2）改错 ： 使用j来控制内层循环，本循环在i为奇数时处理奇数位，在i为偶数时处理偶数位，无论奇数还偶数位都是与i间隔1个数，故本处初值应改为i+2。
（3）①处为改变正负号正负号由t来决定，故此处答案应填写：t=-t。②处为如果i为奇数时则进行如下处理，故本处答案应填写： i Mod 2=1。
（4）若将划线处“For i=1 To n-2”修改为“For i=1 To n-1” 则多执行一次循环，由于数组元素的个数为n，多执行一次只是将排好序的数再排一次。数组下标不会超界，故本题答案选填：否。
【分析】本题考查的是选择排序法。本题使用的排序方法是选择排序法，只不过标准的选择排序是找到每轮的最大值或最小值后才与最左边元素交换，而本题是一遇到比左边大或小的值就交换。选择排序的基本思想：第1轮，在待排序记录r[1]~r[n]中选出最小的记录，将它与r[1]交换；第2轮，在待排序记录r[2]~r[n]中选出最小的记录，将它与r[2]交换；以此类推，第i轮在待排序记录r[i]~r[n]中选出最小的记录，将它与r[i]交换，使有序序列不断增长直到全部排序完毕。
16．（2019·金华模拟）幻方是一种将数字安排在正方形格子中，使每行、列和对角线上的数字和都相等的方法。n阶幻方是由1~n2之间的自然数组成的一个n阶方阵，其各行、各列及对角线所含的数字之和均相等。例如3阶幻方(如图1)，幻和为15。
奇数阶幻方的构造是所有幻方中最简单的，可以按照如下规则来实现：
⑴将1放在第一行中间一列；(如图2)
⑵从2开始直到n*n为止，各数按下列规则存放：
假设当前要存放的数为k，则k存放在k-1)数的右上方并按照规则
①若(k-1)放在第1行且不是最后一列，则将k存放在n行，(k-1)所在列右侧；(如图3)
②若(k-1)放在第n列且不是第一行，则将k存放在第1列，k-1)的上1行；(如图4)
③若(k-1)即不在第1行也不在最后1列：
若(k-1)右上方有数，则将k放在(k-1)的下1行的同一列。(如图5)
若(k-1)右上方没有数，则将k放在(k-1)的右上方；(如图6)
④若(k-1)在第1行第n列，将k填在(k-1)的正下方(如图7)
（1）用下图的程序生成5阶幻方后，List1中的第一行显示的是　 　。
（2）30阶以内的幻方程序如下图，代码如下，请完成代码填空
Private Sub Command1_Click()
Dim i As Integer, i As Integer, n As
Integer ‘i表示行，j表示列
Dim a(1 To 1000) As Integer, k As Integer ‘数组a依次保存幻方中的数
Dim s As String
n= Val(Text1.Text)
j=
①
: a(j)=1
i=1
For k =2 To n*n
If i=1 And j<>n Then
i=n: j=j+1
a((i-1)*n+j)=k
ElseIf j= n And i<> 1Then
② : j=1
a((i-1)*n+j)=k
ElseIf i=1 And j=n Then
i+1 =1
a((i-1)*n+j)=k
ElseIf i <> 1 And j<> n Then
If ③ Then
i=i-1：j=j+1
va((i-1)*n+j)=k
Else
i=i+1
a((i-1)*n+j)=k
End If
End If
Next
k
List1.
Clear
For
i=1 To n
s=“”
For j=1 To n
s=s+ format(a((i-1)*n+j))
Next j
List1AddItem s
Next
i
End
Sub
Function
format( x As Integer) As String ‘将数字字符串格式化为3个字符长度
Dim
n As integer, i As Integer
format
=Str(x)
n=Len(format)
For
i=1 To ④
format ="”+ format
Next
i
End
Function
①　 　②　 　③　 　④　 　
【答案】（1）17 24 1 8 15
（2）(n+1)/2或n\2+1；i=i-1；a((i-2)*n+j+1)=0；3-n
【知识点】常量、变量及变量的赋值；过程与自定义函数；查找算法及程序实现
【解析】【解答】（1） (1)由规则知，1放在第一行第3列，2放在第5行第4列，3在第4行第5列,4在第三行第一列，……，以此类推，最终5阶幻方的第一行为：17、24、1、8、15。
（2）本题程序分析如下：
Private Sub Command1_Click() ‘命令按钮1单击事件过程开始
Dim i As Integer, i As Integer, n As Integer ‘定义整型变量i和j，i表示行，j表示列
Dim a(1 To 1000) As Integer, k As Integer ‘定义整型数组a和整型变量k，数组a依次保存幻方中的数
Dim s As String ‘定义字符串变量s
n= Val(Text1.Text) ‘将从文本框1中输入的字符转为数值型并赋给变量n
j= ① : a(j)=1 ‘初始化变量j的值为n+1的一半，即找第一行最中间的值，并将1存入以j为下标所指示的元素中，故本处答案应填写： (n+1)/2或n\2+1
i=1 ‘初始化i的值为1，即i代表第一行
For k =2 To n*n ‘使用k来控制循环，k的初值为2，终值为n*n，步长为1，n代表了幻方数组中的下标值
If i=1 And j<>n Then ‘如果i值为1且j不等于n进，即元素在第一行且不在最后一行时进行如下处理
i=n: j=j+1 ‘将i值赋为n，将j值增1，即下一处元素在第n行，本元素的右侧列
a((i-1)*n+j)=k ‘计算下一个元素的下标并将k值存入这个元素中
ElseIf j= n And i<> 1Then ‘否则如果j等于n且i不等于1时，即此元素在第n列且不是第一行时进行如下处理
② : j=1 ‘将i值减1，将j值赋为1，即下一个元素应在第一列的本元素的上一行上，故本处答案为应填写为：i=i-1
a((i-1)*n+j)=k ‘计算下一个元素的下标并将k值存入这个元素中
ElseIf i=1 And j=n Then ‘否则如果i等于1且j等于n时，即元素在第一行第n列上时进行如下处理
i+1 =1 ‘将i值增1，即将行数增加一行，列数不变（代表了下一个元素在本元素的正下方
a((i-1)*n+j)=k ‘计算下一个元素的下标并将k值存入这个元素中
ElseIf i <> 1 And j<> n Then ‘否则即i不竺于1且j不等于n时，即不在第1行也不在最后1列时进行如下处理
If ③ Then ‘如果本元素右上方元素值为0，即没有存放过元素时进行如下处理，故本处答案应填写： a((i-2)*n+j+1)=0
i=i-1：j=j+1 ‘将i值减少1，将j值增1，即下一个元素在本元素的上一行下一列（右上方）
a((i-1)*n+j)=k ‘计算下一个元素的下标并将k值存入这个元素中
Else ‘否则（即右上方元素有值时）进行如下处理
i=i+1 ‘将i值增1，即将行数增加一行，列数不变，下一个元素在本元素的正下方
a((i-1)*n+j)=k ‘计算下一个元素的下标并将k值存入这个元素中
End If ‘结束内层条件判断
End If ‘结束外层条件判断
Next k ‘结束循环
List1. Clear ‘清空列表框1
For i=1 To n ‘使用i来控制循环，i的初值为1，终值为n，步长为1，本循环为一行一行输出幻方矩阵，i代表行数
s=“” ‘初值化字符串s的值为空值
For j=1 To n ‘使用j来控制循环，j代表列数
s=s+ format(a((i-1)*n+j)) ‘将格式化为占三个位置的数组元素的值合并到变量s中
Next j ‘结束内层循环
List1AddItem s ‘输出一行幻方矩阵
Next i ‘结束外层循环
End Sub ‘结束命令按钮1单击事件过程
Function format( x As Integer) As String ‘自定义函数format（）开始，该函数的功能是将数字字符串格式化为3个字符长度，参数为数值型，参数值为字符型
Dim n As integer, i As Integer ‘定义整型变量n和i
format =Str(x) ‘将输入的数值型参数x转为字符型并赋给函数format
n=Len(format) ‘将format的长度赋给变量n
For i=1 To ④ ‘使用i来控制循环，i的初值为1，终值为3-n，步长为1，该循环对于长度不足3位的整数前补空格，补的空格数为3-n个，故本题答案应填写：3-n
format =" ”+ format ‘在字符串format前补空格
Next i ‘结束循环
End Function ‘结束自定义函数
由以上程序分析知： ①处为，初始化变量j的值为n+1的一半，即找第一行最中间的值，并将1存入以j为下标所指示的元素中，故本处答案应填写： (n+1)/2或n\2+1。
②处为将i值减1，将j值赋为1，即下一个元素应在第一列的本元素的上一行上，故本处答案为应填写为：i=i-1。
③处为如果本元素右上方元素值为0，即没有存放过元素时进行如下处理，故本处答案应填写： a((i-2)*n+j+1)=0。
④处为使用i来控制循环，i的初值为1，终值为3-n，步长为1，该循环对于长度不足3位的整数前补空格，补的空格数为3-n个，故本题答案应填写：3-n。
【分析】本题考查的是多分支选择语句及自定义函数的定义和使用。在有多种的情况（三种以上）需要作判断处理时，可以使用多分支语句结构，多分支语句结构可以对应四种语句：一种是单分支语句的简单罗列，即逐条进行判断，二是进行双分支语句的嵌套，三是使用if……elseif……else……end if语句，四是使用select case语句。在多分支语句中一般只有一个条件下的语句得到了执行，其他条件下的语句都跳过。 在有多种的情况（三种以上）需要作判断处理时，可以使用多分支语句结构，多分支语句结构可以对应四种语句：一种是单分支语句的简单罗列，即逐条进行判断，二是进行双分支语句的嵌套，三是使用if……elseif……else……end if语句，四是使用select case语句。在多分支语句中一般只有一个条件下的语句得到了执行，其他条件下的语句都跳过。本题使用的是if……elseif……else……end if语句。自定义函数使用function关键字来定义，以End function来结束，在定义好后，其使用方法与标准函数相同。
1 / 1浙江省金华十校2020届高三上学期信息技术11月模拟考试试卷
一、选择题(本大题共12小题，每小题2分，共24分。)
1．（2019·金华模拟）下列说法正确的是（　　）
A．计算机中的内码是以十六进制的形式存储的
B．信息可以脱离所反映的事物而存在，但必须有载体
C．只要经常更新杀毒软件就可以防御一切计算机病毒
D．信息是指对消息接受者来说预先不知道的东西，因此具有不确定性
2．（2019·金华模拟）从电子邮件服务器中接收邮件附件到本地计算机时使用的协议是（　　）
A．SMTP B．POP3 C．HTTP D．FTP
3．（2019·金华模拟）下列应用中没有使用人工智能技术的是（　　）
A．百度输入法中的语音输入功能
B．通过语音控制智能音响点播歌曲
C．在浏览器地址栏中输入“www”后自动跳出曾经浏览过的网址
D．超市中的人脸识别自助付款
4．（2019·金华模拟）使用UltraEdit件观察字符“ AvengersⅣ(2019)”的内码，部分界面如图所示。
下列说法正确的是（　　）
A．字符“IV”的内码值的二进制表示为“10100010”
B．图中所有字符内码值的十进制表示均小于128
C．图中字符在计算机存储时均占1个字节
D．根据图中信息推测，字符“a”的ASCⅡ编码的十六进制值为61H
5．（2019·金华模拟）一段时长为20秒AⅥ格式有声音视频，其具体参数如图所示，视频压缩后的存储容量约为30MB，压缩比约为（　　）
A．12：1 B．20：1 C．30：1 D．36：1
6．（2019·金华模拟）使用Gold Wave软件编辑某音频文件，选中其中一段音频后部分界面如图所示。下列说法正确的是（　　）
A．执行“静音”命令后直接保存，音频文件存储容量为原来3/4
B．执行“删除”命令后直接保存，音频文件存储容量为原来3/4
C．执行“复制”命令并直接粘贴保存，音频文件存储容量与原来一样
D．执行“插入静音”命令，设置时间为15秒后直接保存，音频文件中右声道有静音
7．（2019·金华模拟）某算法的部分流程图如图所示，若输入“50”并执行这部分流程图，变量i的值为（　　）
A．9 B．10 C．11 D．12
8．（2019·金华模拟）下列VB表达式的值为2019的是（　　）
A．Len(“2018”)+1 B．Val(“2018”+“1”)
C．Abs(Int(-20188)) D．Int(Rnd*2019)
9．（2019·金华模拟）有如下VB程序段：
Dim s As String, i As Integer, n As Integer
Dim ch As String, ans As Integer
s= Text1.Text
n Len(s): ans=0
For i=1 To n
ch =Mid (s, i, 1)
ans =ans *2+ Val(ch)
Next i
Text2 Text ans
若程序运行后Tex2中显示的是“38”，则Text中输入的是（　　）
A．100110 B．209 C．45 D．19
10．（2019·金华模拟）在由小写字母组成的字符串中，找出同一字母第一次与最后一次出现的最大间隔距离，如字符串“ abccbcb”，字母“b”第一次与最后一次分别出现在位置2和7，相距5，间隔距离最大。编写VB代码如下：
s=Text.Text
c=0
For i=1 To 26
⑴
Next
For i=1 To Len(s)
⑵
IF d(t)=0 Then d(t)=i
⑶
Next
Text2 Text=Str(c)
填空处的代码可由以下部分组成
①d(i)=0 ②=val(Mid(si, 1) ③IFd(t)<>0Andi-d(t)> c Then c=i-d(t)
④d(i)=1 ⑤t=Asc(Mid(s, i, 1)-Asc("a")+1 ⑥fi-d(t)> c Then c=i-d(t)
代码顺序正确的是（　　）
A．④⑥⑤ B．①⑤⑥ C．④②③ D．①⑤③
11．（2019·金华模拟）有如下VB程序段
Dim a(1 To 100)As Integer, b(1 To 10) As Intege
Dim i As Integer, s As Integer, c As Integer
For i=1 To 100
a(i)=0
Next i
For i=1 To 9 Step 2
a(b(i))=a(b(i))+1: a(b(i+1)+1)=a(b(i+1)+1)-1
Next i
c=0
For i=1 To 100
c=c+a(i)
If c=0 Then s=s+ 1
Next i
Text1. Text= Str(s)
若数组b中的值依次为“5，10，7，20，30，40，40，60，55，70”，则程序运行后Text中的内容是（　　）
A．43 B．42 C．41 D．40
12．（2019·金华模拟）有如下VB程序段：
i=1: j=8: n=1
k=Val(Text1. Text)
Do While i<=j
m=(i+j)2
IF kn=n+1
Loop
数组元素d(1)到d(8)依次为3，9，14，17，25，29，32，35，在文本框 Text1输人“14”。执行程序后，下列说法不正确的是（　　）
A．变量m的值为3 B．变量i的值3
C．变量j的值为3 D．变量n的值为4
二、非选择题(本大题共4小题，4+8+7+7，共26分)
13．（2019·金华模拟）丁老师利用
EXCEL记录了高二(1)班同学本学期每次月考及期末成绩，如图13-1所示：
（1）表中第43行是用函数 AVERAGE()计算得到的，则C43单元格中的公式是 　 　；
（2）表中I列的排名是按照总评成绩从高到低排序后依次输入排名得到的，根据图13-1可知排序的数据区域是　 　；
（3）丁老师想找到“期末成绩”和“总评成绩”均为班级前5的同学，下列方法可行的是 (单选，填字母)
A．在“总评成绩”列设置筛选，筛选条件为“最大的5项”，此时“排名”为1-5的同学
B．在“期末成绩”列设置筛选，筛选条件为“最大的5项”，此时“排名”为1-5的同学
C．以“期末成绩”为关键字降序排列，排在前5个的同学
（4）从图2中可知，学号为　 　的同学成绩是持续进步的(图中方框内为学生学号)
14．（2019·金华模拟）小刘使用Fash软件创作有关诗歌鉴赏的多媒体作品。他先用PhotoShop软件制作素材，再用Flash软件制作动画，请回答下列问题：
（1）在图1状态下，下列描述是正确的是 (多选，填字母)
A．用自由变换命令改变画面左侧的柳树大小，右侧的梅花会一起变化大小。
B．当前状态下，不能修改“梦里水乡”图层的图层样式。
C．交换“梦里水乡”与“柳树”的图层顺序，会改变图片的效果
D．将作品保存为“jpg”格式后打开，“梦里水乡”4个字会有“描边”效果。
（2）在图2状态下将帧频改为24ps，其他场景的播放速度 　 　(填：变快/变慢)。
（3）元件“人物1”编辑界面如图3所示，测试影片时发现单击小人无法跳转到“清明”场景，原因是　 　。
（4）测试影片发现按钮图层中的4个按钮最后才出现在舞台上，为了使按钮一开始就出现在舞台上，正确的操作是 (单选)
A．在“按钮”图层第1帧执行清除关键帧
B．在“按钮”图层最后1帧执行清除关键帧
C．将“按钮”图层第1帧移动到最后1帧
D．在“按钮”图层第1帧执行“清除帧”
（5）单击“清明”按钮后，停止本场景的音乐并进人“清明”场景第1帧播放，应在“清明”按钮中设置脚本
　 　。
15．（2019·金华模拟）小刘设计了一个排序算法，该排序算法会将数组a中奇数位的元素从小到大排列，偶数位的元素从大到小排列，程序界面如图，算法的VB程序段如下：
Private Sub Command2_Click()
Dim i As Integer, j As Integer, tmp As Integer
Dim s1 As String, t As Integer, s2 As String
t=1
For i=1 To n-2
For j= To n Step 2 ‘改错
If a(i)*t>a(j)*t Then
tmp =a(i): a(i)= a(j): a(j)=tmp
End if
Next j
‘填空①
Next i
For i =1 To n
If Then ‘填空②
s1 =s1 Str(a(i))
Else
s2=s2+Str(a(i))
End If
Text2. Text=“奇数位：”+s1
Text3. Text=“偶数位：”+s2
End Sub
回答以下问题：
（1）若要修改按钮 Command上显示的文字，应修改的属性名是　 　(单选，填字母：A .Text/B .Caption/C .Click)
（2）程序代码中，For语句加框处有错，应改为　 　.
（3）划线部分的代码应填①　 　②　 　。
（4）若将划线处“For
i=1 To n-2”修改为“For i=1 To n-1”，是否会出错 　 　(填是/否)
16．（2019·金华模拟）幻方是一种将数字安排在正方形格子中，使每行、列和对角线上的数字和都相等的方法。n阶幻方是由1~n2之间的自然数组成的一个n阶方阵，其各行、各列及对角线所含的数字之和均相等。例如3阶幻方(如图1)，幻和为15。
奇数阶幻方的构造是所有幻方中最简单的，可以按照如下规则来实现：
⑴将1放在第一行中间一列；(如图2)
⑵从2开始直到n*n为止，各数按下列规则存放：
假设当前要存放的数为k，则k存放在k-1)数的右上方并按照规则
①若(k-1)放在第1行且不是最后一列，则将k存放在n行，(k-1)所在列右侧；(如图3)
②若(k-1)放在第n列且不是第一行，则将k存放在第1列，k-1)的上1行；(如图4)
③若(k-1)即不在第1行也不在最后1列：
若(k-1)右上方有数，则将k放在(k-1)的下1行的同一列。(如图5)
若(k-1)右上方没有数，则将k放在(k-1)的右上方；(如图6)
④若(k-1)在第1行第n列，将k填在(k-1)的正下方(如图7)
（1）用下图的程序生成5阶幻方后，List1中的第一行显示的是　 　。
（2）30阶以内的幻方程序如下图，代码如下，请完成代码填空
Private Sub Command1_Click()
Dim i As Integer, i As Integer, n As
Integer ‘i表示行，j表示列
Dim a(1 To 1000) As Integer, k As Integer ‘数组a依次保存幻方中的数
Dim s As String
n= Val(Text1.Text)
j=
①
: a(j)=1
i=1
For k =2 To n*n
If i=1 And j<>n Then
i=n: j=j+1
a((i-1)*n+j)=k
ElseIf j= n And i<> 1Then
② : j=1
a((i-1)*n+j)=k
ElseIf i=1 And j=n Then
i+1 =1
a((i-1)*n+j)=k
ElseIf i <> 1 And j<> n Then
If ③ Then
i=i-1：j=j+1
va((i-1)*n+j)=k
Else
i=i+1
a((i-1)*n+j)=k
End If
End If
Next
k
List1.
Clear
For
i=1 To n
s=“”
For j=1 To n
s=s+ format(a((i-1)*n+j))
Next j
List1AddItem s
Next
i
End
Sub
Function
format( x As Integer) As String ‘将数字字符串格式化为3个字符长度
Dim
n As integer, i As Integer
format
=Str(x)
n=Len(format)
For
i=1 To ④
format ="”+ format
Next
i
End
Function
①　 　②　 　③　 　④　 　
答案解析部分
1．【答案】B
【知识点】信息及其特征
【解析】【解答】选项A：在计算机内部都是以二进制表示数据的而不是以十六进制表示的，本项错。选项B：信息具有传递性，在产生后可以脱离所反映的事物而在不同的载体之间进行传递，但信息不能独立存在必须依附于载体，这是信息的依附性。本项对。选项C：杀毒软件是滞后于计算机病毒的，有了某种病毒后才能出现相应的杀毒软件或升级包，本项错。选项D：信息尽管具有真伪性，但对于一条信息其表达的意义是确定的，本项错。故答案选B。
【分析】本题考查的是信息的特征。信息有五个基本特征和五个一般特征。基本特征：普遍性、依附性、传递性、价值性、时效性；一般特征：共享性、真伪性、不完全性、价值相对性、可处理性。
2．【答案】B
【知识点】网络协议
【解析】【解答】选项A：SMTP协议又称为简单邮件传输协议，是用于发送邮件的协议。选项B：POP3协议又称为邮局协议，是用于接受邮件的协议。选项C：HTTP协议又称为超文本传输协议，是用于传输网页文件的协议。选项D：FTP协议又称为文件传输协议，是用于上传和下载文件的协议。故答案选B。
【分析】本题考查的是常用的网络协议及其英文名称。除了以上常见的协议还有Telnet协议，又称远程登陆协议，是用于远程登陆和管理计算机服务器或网络设置的协议。TCP/IP即传输控制和网络协议，是用于上网的协议。DNS 全称为Domain Name Service，中文名为域名服务 ，用于完成地址查找，邮件转发等工作(运行在TCP和UDP协议上。
3．【答案】C
【知识点】人工智能的应用
【解析】【解答】选项A： 百度输入法中的语音输入功能使用的是语音识别技术，是人工智能技术。选项B： 通过语音控制智能音响点播歌曲使用的是语音识别技术，是人工智能技术。选项C：在浏览器地址栏中输入“WWW”后自动跳出曾经浏览过的网址使用的是自动搜索技术，不是人工智能技术。选项D： 超市中的人脸识别自助付款使用的是生物识别技术，是人工智能技术。故答案选C。
【分析】本题考查的是人工智能技术的范畴。人工智能（Artificial Intelligence），英文缩写为AI。它是研究、开发用于模拟、延伸和扩展人的智能的理论、方法、技术及应用系统的一门新的技术科学。人工智能包括机器人、语音识别、图像识别、生物识别、自然语言处理和专家系统等。
4．【答案】D
【知识点】信息的编码
【解析】【解答】选项A：由图可知，“ IV”的内码为”A2 F4“转为二进制为”1010 0010 1111 0100“，本项错。选项B：由图可知“ IV”的内码为”A2 F4“转为十进制数为“258 277”，其区码或位码都超过了128，本项错。选项C：由图可知“ IV”的内码为”A2 F4“要占两个字节，本项错。选项D：由图中可知字符“e”的内码为65H，可以推出字符a的内码为61H，本项对。故答案选D。
【分析】本题考查的是中文及其字符、英文字母、英文字符、数字在内存的表示以及依据字母表来推测未知字母的内码。在内存中一个中文或中文字符在内存中占用二个字节、4位十六进制、16位二进制数。而一个英文字母或英文字符、阿拉件数字在内存中占用一个字节、8位二进制数，2位十六进制数。英文字母在内存中是按字母表顺序存储的，且区分大小写由此可以依据字母表来推测未知字母的内码。
5．【答案】B
【知识点】声音、图像、视频编码
【解析】【解答】视频文件压缩前的存储容量为：24位即每个像素占用24位二进制数，即占3个字节，存储容量=720*576*3*25*20=622080000B=607500KB=593.26171875MB，其存储容量在压缩前大约为600M，在压缩后存储容量为30MB，故其压缩比约为20:1。故答案选B。
【分析】本题考查的是视频文件的存储容量计算公式。视频文件存储容量=（水平像素×垂直像素×每个像素所需位数／8）*帧频*时长（字节）。
6．【答案】D
【知识点】声音素材的基本处理；声音、图像、视频编码
【解析】【解答】选项A：执行“静音”命令后，选中部分变为了静音，但音频文件的总时长没有改变，则音频文件的存储容量不会改变，本项错。选项B：执行“删除”命令后由于只选中了左声道，相当于执行静音命令，音频文件的容量不会变小，本项错。选项C：执行“复制”和“粘贴”命令后则相当于插入了一段音频，则音频文件的时长变长，故存储容量比原文件大，本项错。选项D：执行“插入静音”命令后使左声道的声音比右声道的时长长，故右声道也会有部分静音，本项对。故答案选D。
【分析】本题考查的是音频文件的“静音”、“删除”、“复制”、“插入静音”命令。如果只选中单声道的音频而没有选中双声道则执行“删除”命令与“静音”命令相同，如果选中了双声道则执行“删除”命令后音频文件的总时长变短，存储容量变小。插入静音就是增加音频文件的时长，复制后再粘贴也相当于插入了一段音频。
7．【答案】B
【知识点】算法的常用表示方法；算法的控制结构
【解析】【解答】由本题的流程图知，先输入一个数50赋给变量n，然后给a、b、c的值赋为1，将i的值赋为2，然后判断c的值是否超过了n的值，如果没有超过则执行循环体，由于c=1，小于等于50成立，故执行第一次循环：c=a+b=1+1=2，a=b=1，b=c=2，i=i+1=2+1=3，然后再判断c的值，c值为2仍然小于50，执行第二次循环：c=1+2=3，a=2，b=3，i=4，第三次循环：c=2+3=5，a=3，b=5，i=5，第四次循环：c=3+5=8，a=5，b=8，i=6，第五次循环：c=5+8=13，a=8，b=13，i=7，第六次循环：c=8+13=21，a=13，b=21，i=8，第七次循环：c=13+21=34，a=21，b=34，i=9，第八次循环：c=21+34=55，a=34，b=55，i=10，此时c值超过了50，故输出i值，i=10。故答案选B。
【分析】本题考查的是对流程图的识别以及算法的计算。流程图是一种用规定的图形、指向线及文字说明来准确表示算法的图形，具有直观、形象的特点，能清楚地展现算法的逻辑结构。流程图使用标准的框图符号绘制，框图一般按从上到下、从左到右的方向画，除了判断框外，程序框的符号只有一个进入点和一个退出点，而判断框则具有一个进入点和多个退出点。
8．【答案】C
【知识点】运算符、基本运算与表达式
【解析】【解答】选项A： Len(“2018”)+1=4+1=5；
选项B： Val(“2018”+“1”)=val（“20181”）=20181；
选项C：Abs（int（-2018.8））=abs（-2019）=2019；
选项D：Int(Rnd*209）的取值范围为【0，2018】之间的任一整数。故答案选C。
【分析】本题考查的是VB常用标准函数的功能。在本题中，len()是求字符串的长度，val()是将字符型转为数值型，abs()是求参数的绝对值，int()是取不大于参数的一个整数，rnd为随机整数，其取值范围为（0，1）。
9．【答案】A
【知识点】常量、变量及变量的赋值
【解析】【解答】本题程序分析如下：
Dim s As String, i As Integer, n As Integer ‘定义字符串变量s，定义整型变量i和n
Dim ch As String, ans As Integer ‘定义字符串变量ch，定义整型变量ans
s= Text1.Text ‘将从文本框1中输入的字符串赋给变量s
n= Len(s): ans=0 ‘将字符串的长度赋给变量n，初始化ans的值为0
For i=1 To n ‘使用i来控制循环，i的初值为1，终值为n（字符串s的长度），步长为1
ch =Mid (s, i, 1) ‘按i值从字符串s中中取一个字符赋给变量ch
ans =ans *2+ Val(ch) ‘将an值加倍后加上字符ch转为数值型的值
Next i ‘结整循环
Text2 .Text= ans ‘在文本框2中输出ans的值
由以上程序可知，该程序将从文本框中输入的数从左到右逐位取出后要乘以2倍再加上后面的值，直到输入的字符串取完为止，故选项A：共执行6次循环，第一次ans=1，第二次ans=1*2+0=2，第三次ans=2*2+0=4，第四次ans=4*2+1=9，第五次ans=9*2+1=19，第六次ans=19*2+0=38；选项B：共执行3次循环：第一次ans=2，第二次ans=2*2+0=4，第三次ans=4*2+9=17；选项C：ans=4*2+5=13，选项D：ans=1*2+9=11。故答案选A。
【分析】本题考查的是定次循环for语句。由以上程序可知，该程序将从文本框中输入的数从左到右逐位取出后要乘以2倍再加上后面的值，直到输入的字符串取完为止，对于这种有规则有一定循环次数的循环可以使用定次循环。
10．【答案】D
【知识点】算法的控制结构；常量、变量及变量的赋值
【解析】【解答】本程序分析如下：
s=Text.Text ‘将从文本框1中输入的字符串赋给变量s
c=0 ‘将c值初始化为0
For i=1 To 26 ‘使用i来控制循环，i的初值为1，终值为26，步长为1
⑴ ‘初始化数组d的每个元素值为0，数组d的值标记着字母在字符串的初始位置，而下标识着字母在字母表的顺序，故本处答案应填写：d（i）=0
Next ‘结束循环
For i=1 To Len(s) ‘使用i来控制循环，i的初值为1，终值为字符s的长度，i值代表着该字符在字符串s中的位置
⑵ ‘按i值从字符串中中取一个字符并求出其在字母表的位置并赋给变量t，故本处答案应填写： t=Asc(Mid(s, i, 1)-Asc("a")+1
IF d(t)=0 Then d(t)=i ‘如果和对应的数组在的元素的值为0，则说明没有出现该字符故将其初始位置i赋给数组元素
⑶ ‘如果t对应的数组d的元素值不为0且i值与d（i）值（代表该元素与初始位置的距离）之差大于了c值（c为字母的最大距离）时将这个距离（i-d（i）赋给c，使用c值仍为最大距离，故本题答案应填写： IF d(t)<>0 And i-d(t)> c Then c=i-d(t)
Next ‘结束循环
Text2 .Text=Str(c) ‘在文本框2中输出字母的最大距离
由以上可知（1）处为初始化数组d的每个元素值为0，数组d的值标记着字母在字符串的初始位置，而下标识着字母在字母表的顺序，故本处答案应填写：d（i）=0；（2）处为按i值从字符串中中取一个字符并求出其在字母表的位置并赋给变量t，故本处答案应填写： t=Asc(Mid(s, i, 1)-Asc("a")+1 ；（3）处为如果t对应的数组d的元素值不为0且i值与d（i）值（代表该元素与初始位置的距离）之差大于了c值（c为字母的最大距离）时将这个距离（i-d（i）赋给c，使用c值仍为最大距离，故本题答案应填写： IF d(t)<>0 And i-d(t)> c Then c=i-d(t) 。故答案选D。
【分析】本题考查的是循环语句及数组的特殊用法。在本题中数组d有的值和下标都有作用，数组d的值标记着字母在字符串的初始位置，而下标识着字母在字母表的顺序。另外使用c来标记字母距离的最大值，通过i-d（i）来判断新字母的距离并与c值比较，如比c值大则替换c值，保证c为字母的最大距离，最后输出c值。
11．【答案】A
【知识点】算法的控制结构；常见数据类型、数组；常量、变量及变量的赋值
【解析】【解答】本程序分析如下：
Dim a(1 To 100)As Integer, b(1 To 10) As Intege '定义整型数组a和b，a有100个元素，b有10个元素
Dim i As Integer, s As Integer, c As Integer '定义整型变量i、s和c
For i=1 To 100 '使用i来控制循环，i的初值为1，终值为100，步长为1
a(i)=0 '初始化数组元素的值为0
Next i '结束循环
For i=1 To 9 Step 2 '使用i来控制循环，i的初值为1，终值为9，步长为2
a(b(i))=a(b(i))+1: a(b(i+1)+1)=a(b(i+1)+1)-1 '以数组b（i）的值为下标对应的数组a元素的值增1，a用于统计数组b的值的个数，将b（i+1）为下标，其对应数组a元素后的一个元素值减1
Next i '结束循环
c=0 '将c初始化为0
For i=1 To 100 '使用i来控制循环
c=c+a(i) '将元素i的值累加到变量c中
If c=0 Then s=s+ 1 '如果c的值为0则将s值增1
Next i '结束循环
Text1. Text= Str(s) '在文本框中输出s的值
由以上程序分析知，a(5)=1,a(11)=-1,a(7)=1,a(21)=-1,a(30)=1,a(41)=-1,a(40)=1,a(61)=-1,a(55)=1,a(71)=-1
在a（1）-a（4）时，c=0，故s=4，在a（5）-a（20）时，c<>0，不累加s，当a（21）-a（29）时，c=0则累加s=4+9=13，当a（30）-a（70），c<>0,不累加s，当a（71）-a（100）时，c=0，累中s值，则s=13+30=43。故答案选A。
【分析】本题考查的是计数器的使用及用数组元素作为另一个数组的下标。计数器是用于统计满足某个条件的个数，如本题计数器为s用于统计数组a的元素合计为0的情况，其格式为：s=s+1。在本题中将数组b的元素值作为了数组a的下标，将其对应的数组a的值增1或减1。
12．【答案】B
【知识点】排序算法及程序实现
【解析】【解答】本题程序分析如下：
i=1: j=8: n=1 ‘给变量i、j、n分别赋值为1、8和1，i代表要查找数组的下标的下限，而j代表要查找数组的下标的上限，n为计数器，用于统计查找次数
k=Val(Text1. Text) ‘将文本框1中输入的数据转为数值型并赋给变量k，在本题k=14
Do While i<=j ‘在要查找数组的下标的下限小于等于上限时进行循环
m=(i+j)\2 ‘将中值元素的下标赋给变量m
IF kn=n+1 ‘将n值增1
Loop ‘结束循环
由以上分析知，开始运行程序时i=1，j=8，n=1，k=14，第一次循环：m=4，k=14j退出循环。共循环3次，故n=1+3=4，循环终了，i=4，j=3，m=3，n=4。故答案选B。
【分析】本题考查的是使用对分法查找数据的算法。对分法查找过程是先将一个数列放于一个有序数组中，然后比较中间数组元素的值与要查找的值，或中间数组的值比要查找的值大，则在前半个数组中查找，若中间数组的值比要查找的值小则在后半个数组中查找。查找方法仍是比较中间数组元素的值和要查找的值。以此类推直到查到或下限大于了上限（没查找）为止。
13．【答案】（1）= AVERAGE(C3：C42)
（2）A2：H42或A2：142或A3：H42或A3：I42
（3）B
（4）0141
【知识点】表格数据的基本操作；表格数据的处理与计算
【解析】【解答】（1）由图1可知，第43行求的是第3行到第42行的平均值，C43是求C3到C42区域的平均值，故本小题答案填写： = AVERAGE(C3：C42) 。
（2）由图可知，第一行有合并单元格，第二行为标题行，对行排序，即可以带标题行也可以不带标题行，学生数据第三行到第42行，故本题答案填写： A2：H42或A2：I42或A3：H42或A3：I42。
（3）选项A：总评成绩最大的5项与排名1-5是重复条件，没有涉及期末成绩，本项错。选项B：使用自动筛选期末成绩最大的前5项，并筛选排名1-5，两者是“且”的关系，正好筛选出符合条件的记录，本项对。选项C：本项只筛选期末成绩没有涉及总评成绩，本项错。故答案选B。
（4）由图2可知，0139和0141在5月月考有一个下降，而0141的成绩一直是上升没有下降，故本题答案填写：0141。
【分析】本题考查的是Excel的公式填写、排序数据区域的选择、筛选操作及折线图。填写公式时注意题的要求及数据区域；筛选时自动筛选如果为多个条件，则这多个条件之间为“且”的关系；排序时可以有标题栏也可以没有标题栏，对于公式列可以选也可以不选，公式会自动变化；折线图易于表现变化趋势，从图形可以分析事务的变化状态。
14．【答案】（1）A；B
（2）变快
（3）“人物1”元件中“人物”图层“点击”帧没有帧或“人物1”元件当前有效的可点击区域为文字“清明”或其他类似答案
（4）A
（5）on(press) StopAllSounds(); gotoAndPlay(“清明”, 1);}
【知识点】图片加工常用工具的使用；动画的类型；时间轴、帧、图层、库的概念及基本操作；元件的类型与应用；常用影片控制函数的应用
【解析】【解答】（1）选项A：由图1可知，柳树图层和梅图层是链接图层，两个图层可以看作一个图层，故当使用自由变换工具改变柳树大小时，梅花会一起变化，本项对。选项B：由图可以看出“梦里水乡”图层处于锁定状态是不能修改图层中的图像的，本项对。选项C：“梦里水乡”和“柳树”、“梅”图层没有重叠关系可以交换它们的图层顺序，本项错。选项D：将作品保存为jpg后，所有图层合并为一个图层，而“梦里水乡”里的“描边”处于不可见状态，在合并后同样不可见，本项错。故本小题答案选AB。
（2）由图可知，原动画的帧频为12fps，即每秒播放12帧，现改为24fps后每秒播放24帧则动画播放时间会变短，场景播放速度会变快，故本小题答案选填：变快。
（3）由图2可以看出该按钮的“人物”图层的“点击”帧中没有图像，只有“文字”图层的点击帧才有图像，故点击文字才跳转而点击人物不会跳转，故本小题答案应填写： 人物1”元件中“人物”图层“点击”帧没有帧或“人物1”元件当前有效的可点击区域为文字“清明”或其他类似答案 。
（4）由图2可知，按钮图层的第一帧为一个空白关键帧，故清除第一帧的关键帧就可以将按钮图层的四个按钮同时出现在舞台上，故本小题答案选A。
（5）由题义可知，在按下“清明”或释放该按钮时，停止本场景音乐（stopAllSounds（））并进入“清明场景的第一帧（gotoAndPlay（）函数为转到播放函数），故本题答案应填写： on(press) StopAllSounds(); gotoAndPlay(“清明”, 1);} 或 on(release) StopAllSounds(); gotoAndPlay(“清明”, 1);}。
【分析】本题考查的是Photoshop图层的操作、帧频、点击帧的作用、清除关键帧操作及动作脚本。为了防止图层被误删除或修改可以将图层设置为不可见或锁定状态，在设置为不可见或锁定时不可以修改图层的名称、图层样式和滤镜效果，但可以复制和删除图层。在图层或样式不可见时导出为其他格式的图像文件时，不可见图层或样式不能被导出。链接的图层可以看作一个图层。帧频就是每秒播放的帧数，是衡量动画播放快慢的指标。点击帧表示按钮响应鼠标事件的范围或称区域面积，此状态的画面内容、颜色在动画播放时不可见。动作脚本可以增强多媒体作品的人机交互功能。
15．【答案】（1）B
（2）i+2
（3）t=-t；i Mod 2=1
（4）否
【知识点】常量、变量及变量的赋值；排序算法及程序实现
【解析】【解答】本程序分析如下：
Private Sub Command2_Click() ‘命令按钮2单击事件过程开始
Dim i As Integer, j As Integer, tmp As Integer ‘定义整型变量i、j和tmp
Dim s1 As String, t As Integer, s2 As String ‘定义字符串变量s1、s2和整型变量t
t=1 ‘将t值设为1，t为正负号
For i=1 To n-2 ‘使用i来控制循环，i的初值为1，终值为n-2（n代表数组元素个数）步长为1
For j= To n Step 2 ‘改错 使用j来控制内层循环，本循环在i为奇数时处理奇数位，在i为偶数时处理偶数位，无论奇数还偶数位都是与i间隔1个数，故本处初值应为i+2，终值为n，步长为2
If a(i)*t>a(j)*t Then ‘如果奇数位最左边数组元素比其后的元素值大或偶数位最左边的数组元素比其后的元素小时进行如下处理
tmp =a(i): a(i)= a(j): a(j)=tmp ‘借助第三变量tmp交换两个元素的值
End if ‘结束条件判断
Next j ‘结束内层循环
‘填空① 改变正负号正负号由t来决定，故此处答案应填写：t=-t
Next i ‘结束外层循环
For i =1 To n ‘使用i来控制循环，该循环用于合并已经排好序奇数位和偶数位上的数分别为一个字符串
If Then ‘填空② 如果i为奇数时则进行如下处理，故本处答案应填写： i Mod 2=1
s1 =s1+ Str(a(i)) ‘将奇数位上的数组元素转为字符型并合并到字符串s1中
Else ‘否则（如果i为偶数）进行如下处理
s2=s2+Str(a(i)) ‘将偶数位上的数组元素转为字符型并合并到字符串s2中
End If ‘结束条件判断
Text2. Text=“奇数位：”+s1 ‘在文本框2中输出奇数位上的数组元素的值
Text3. Text=“偶数位：”+s2 ‘在文本框3中输出偶数位上的数组元素的值
End Sub ‘结束事件过程
（1）选项A：text为文本属性，命令按钮无引属性。选项B：caption为标题属性，用于显示按钮上的文字。选项C：click为单击事件名。故本题答案选B。
（2）改错 ： 使用j来控制内层循环，本循环在i为奇数时处理奇数位，在i为偶数时处理偶数位，无论奇数还偶数位都是与i间隔1个数，故本处初值应改为i+2。
（3）①处为改变正负号正负号由t来决定，故此处答案应填写：t=-t。②处为如果i为奇数时则进行如下处理，故本处答案应填写： i Mod 2=1。
（4）若将划线处“For i=1 To n-2”修改为“For i=1 To n-1” 则多执行一次循环，由于数组元素的个数为n，多执行一次只是将排好序的数再排一次。数组下标不会超界，故本题答案选填：否。
【分析】本题考查的是选择排序法。本题使用的排序方法是选择排序法，只不过标准的选择排序是找到每轮的最大值或最小值后才与最左边元素交换，而本题是一遇到比左边大或小的值就交换。选择排序的基本思想：第1轮，在待排序记录r[1]~r[n]中选出最小的记录，将它与r[1]交换；第2轮，在待排序记录r[2]~r[n]中选出最小的记录，将它与r[2]交换；以此类推，第i轮在待排序记录r[i]~r[n]中选出最小的记录，将它与r[i]交换，使有序序列不断增长直到全部排序完毕。
16．【答案】（1）17 24 1 8 15
（2）(n+1)/2或n\2+1；i=i-1；a((i-2)*n+j+1)=0；3-n
【知识点】常量、变量及变量的赋值；过程与自定义函数；查找算法及程序实现
【解析】【解答】（1） (1)由规则知，1放在第一行第3列，2放在第5行第4列，3在第4行第5列,4在第三行第一列，……，以此类推，最终5阶幻方的第一行为：17、24、1、8、15。
（2）本题程序分析如下：
Private Sub Command1_Click() ‘命令按钮1单击事件过程开始
Dim i As Integer, i As Integer, n As Integer ‘定义整型变量i和j，i表示行，j表示列
Dim a(1 To 1000) As Integer, k As Integer ‘定义整型数组a和整型变量k，数组a依次保存幻方中的数
Dim s As String ‘定义字符串变量s
n= Val(Text1.Text) ‘将从文本框1中输入的字符转为数值型并赋给变量n
j= ① : a(j)=1 ‘初始化变量j的值为n+1的一半，即找第一行最中间的值，并将1存入以j为下标所指示的元素中，故本处答案应填写： (n+1)/2或n\2+1
i=1 ‘初始化i的值为1，即i代表第一行
For k =2 To n*n ‘使用k来控制循环，k的初值为2，终值为n*n，步长为1，n代表了幻方数组中的下标值
If i=1 And j<>n Then ‘如果i值为1且j不等于n进，即元素在第一行且不在最后一行时进行如下处理
i=n: j=j+1 ‘将i值赋为n，将j值增1，即下一处元素在第n行，本元素的右侧列
a((i-1)*n+j)=k ‘计算下一个元素的下标并将k值存入这个元素中
ElseIf j= n And i<> 1Then ‘否则如果j等于n且i不等于1时，即此元素在第n列且不是第一行时进行如下处理
② : j=1 ‘将i值减1，将j值赋为1，即下一个元素应在第一列的本元素的上一行上，故本处答案为应填写为：i=i-1
a((i-1)*n+j)=k ‘计算下一个元素的下标并将k值存入这个元素中
ElseIf i=1 And j=n Then ‘否则如果i等于1且j等于n时，即元素在第一行第n列上时进行如下处理
i+1 =1 ‘将i值增1，即将行数增加一行，列数不变（代表了下一个元素在本元素的正下方
a((i-1)*n+j)=k ‘计算下一个元素的下标并将k值存入这个元素中
ElseIf i <> 1 And j<> n Then ‘否则即i不竺于1且j不等于n时，即不在第1行也不在最后1列时进行如下处理
If ③ Then ‘如果本元素右上方元素值为0，即没有存放过元素时进行如下处理，故本处答案应填写： a((i-2)*n+j+1)=0
i=i-1：j=j+1 ‘将i值减少1，将j值增1，即下一个元素在本元素的上一行下一列（右上方）
a((i-1)*n+j)=k ‘计算下一个元素的下标并将k值存入这个元素中
Else ‘否则（即右上方元素有值时）进行如下处理
i=i+1 ‘将i值增1，即将行数增加一行，列数不变，下一个元素在本元素的正下方
a((i-1)*n+j)=k ‘计算下一个元素的下标并将k值存入这个元素中
End If ‘结束内层条件判断
End If ‘结束外层条件判断
Next k ‘结束循环
List1. Clear ‘清空列表框1
For i=1 To n ‘使用i来控制循环，i的初值为1，终值为n，步长为1，本循环为一行一行输出幻方矩阵，i代表行数
s=“” ‘初值化字符串s的值为空值
For j=1 To n ‘使用j来控制循环，j代表列数
s=s+ format(a((i-1)*n+j)) ‘将格式化为占三个位置的数组元素的值合并到变量s中
Next j ‘结束内层循环
List1AddItem s ‘输出一行幻方矩阵
Next i ‘结束外层循环
End Sub ‘结束命令按钮1单击事件过程
Function format( x As Integer) As String ‘自定义函数format（）开始，该函数的功能是将数字字符串格式化为3个字符长度，参数为数值型，参数值为字符型
Dim n As integer, i As Integer ‘定义整型变量n和i
format =Str(x) ‘将输入的数值型参数x转为字符型并赋给函数format
n=Len(format) ‘将format的长度赋给变量n
For i=1 To ④ ‘使用i来控制循环，i的初值为1，终值为3-n，步长为1，该循环对于长度不足3位的整数前补空格，补的空格数为3-n个，故本题答案应填写：3-n
format =" ”+ format ‘在字符串format前补空格
Next i ‘结束循环
End Function ‘结束自定义函数
由以上程序分析知： ①处为，初始化变量j的值为n+1的一半，即找第一行最中间的值，并将1存入以j为下标所指示的元素中，故本处答案应填写： (n+1)/2或n\2+1。
②处为将i值减1，将j值赋为1，即下一个元素应在第一列的本元素的上一行上，故本处答案为应填写为：i=i-1。
③处为如果本元素右上方元素值为0，即没有存放过元素时进行如下处理，故本处答案应填写： a((i-2)*n+j+1)=0。
④处为使用i来控制循环，i的初值为1，终值为3-n，步长为1，该循环对于长度不足3位的整数前补空格，补的空格数为3-n个，故本题答案应填写：3-n。
【分析】本题考查的是多分支选择语句及自定义函数的定义和使用。在有多种的情况（三种以上）需要作判断处理时，可以使用多分支语句结构，多分支语句结构可以对应四种语句：一种是单分支语句的简单罗列，即逐条进行判断，二是进行双分支语句的嵌套，三是使用if……elseif……else……end if语句，四是使用select case语句。在多分支语句中一般只有一个条件下的语句得到了执行，其他条件下的语句都跳过。 在有多种的情况（三种以上）需要作判断处理时，可以使用多分支语句结构，多分支语句结构可以对应四种语句：一种是单分支语句的简单罗列，即逐条进行判断，二是进行双分支语句的嵌套，三是使用if……elseif……else……end if语句，四是使用select case语句。在多分支语句中一般只有一个条件下的语句得到了执行，其他条件下的语句都跳过。本题使用的是if……elseif……else……end if语句。自定义函数使用function关键字来定义，以End function来结束，在定义好后，其使用方法与标准函数相同。
1 / 1