1.选择题- (共12题)
1.
二维码是近年来非常流行的编码方式,以下关于二维码的说法正确的是( )
A.手机扫描二维码,属于信息的编码过程 |
B.二维码可以表示文字、图像、超链接等信息 |
C.通过扫描二维码获得某URL的过程,涉及信息的加工与发布 |
D.某支付APP付款二维码每隔一定时间自动更新,主要体现了信息的载体依附性 |
2.
用Goldwave软件对某音频文件进行编辑,Goldwave状态栏如下图所示:以下说法正确的是( )


A.该文件类型为WAVE格式,属于无损压缩格式 |
B.该音频每秒钟采样1411次,选中部分音频时长为10秒 |
C.当前状态下插入5秒静音,按原参数保存,文件大小约为4. 2MB |
D.当前状态下,点击“删除”,以原参数保存,则声音存储容量约为原来的一半 |
3.
某数据的加密方法如下:
(1)将字符的ASCII码值以字节为单位进行加密处理;
(2)将一个字节的8位二进制数右移1位,最高位用右移出来的最低位补充;
(3)将二进制数转换为十六进数,顺序连接,即为该字符的密文。
用UltraEdit软件观察字符“2018,Lucky!”的内码如图所示。

则字符“z”(小写英文字母)加密后的密文是( )
(1)将字符的ASCII码值以字节为单位进行加密处理;
(2)将一个字节的8位二进制数右移1位,最高位用右移出来的最低位补充;
(3)将二进制数转换为十六进数,顺序连接,即为该字符的密文。
用UltraEdit软件观察字符“2018,Lucky!”的内码如图所示。

则字符“z”(小写英文字母)加密后的密文是( )
A.3A | B.3D | C.40 | D.36 |
4.
以下关于网络协议和网页保存类型的描述,正确的是( )
A.SMTP协议可以实现将发件人的邮件直接发送到收件人的计算机中 |
B.FTP协议负责浏览器和Web服务器之间的信息传输 |
C.通过“网页,全部(*.htm;*.html)”方式保存网页,可以下载网页上的视频 |
D.通过“Web档案,单个文件(*.mht)”方式保存网页,可以同时保存网页中的图片 |
5.
指纹锁(如下图所示)是通过提取指纹图像的特征进行身份识别,其工作流程可以分为:
①指纹图像采集 ②指纹图像处理 ③控制门锁开启 ④指纹图像特征的匹配 ⑤指纹图像特征提取,正确的顺序应该是

①指纹图像采集 ②指纹图像处理 ③控制门锁开启 ④指纹图像特征的匹配 ⑤指纹图像特征提取,正确的顺序应该是

A.①②③④⑤ |
B.①⑤②④③ |
C.①②⑤④③ |
D.①④⑤②③ |
6.
以下关于数据库的说法正确的是:
A.数据库中无法存储图片或视频 |
B.数据库管理系统负责建立、使用和维护数据库,如 Access、 DB2 等都是小型数据库管理系统 |
C.在 Access 数据表视图中,误删了某个字段中的值,可以马上通过“撤销”操作来恢复 |
D.在 Access 数据表输入数据后,则不能再将任何字段设置为主键 |
8.
(加试题) 有如下 VB 程序段:
Dim a(1 To 10) As Integer
Dim s As String, n, i As Integer
s = "54851845236": n = Len(s)
For i = 1 To n - 1
a(i) = Val(Mid(s, i, 2))
Next i
For i = 1 To n - 2
k = i
For j = i + 1 To n - 1
If a(k) < a(j) Then k = j
Next
If k <> i Then
t = a(k): a(k) = a(i): a(i) = t
End If
Next i
Text1.Text = Str(a(1))
该程序段运行后,文本框 Text1 中显示的内容是:
Dim a(1 To 10) As Integer
Dim s As String, n, i As Integer
s = "54851845236": n = Len(s)
For i = 1 To n - 1
a(i) = Val(Mid(s, i, 2))
Next i
For i = 1 To n - 2
k = i
For j = i + 1 To n - 1
If a(k) < a(j) Then k = j
Next
If k <> i Then
t = a(k): a(k) = a(i): a(i) = t
End If
Next i
Text1.Text = Str(a(1))
该程序段运行后,文本框 Text1 中显示的内容是:
A.18 | B.54 | C.85 | D.8 |
9.
(加试题) 数组 a 中依次存放 6 个有序数据“ 23 33 44 55 66 77”。
Dim a(1 To 10) As Integer
Dim s As String, n, key As Integer
a(1) = 23: a(2) = 33: a(3) = 44: a(4) = 55: a(5) = 66: a(6) = 77
i = 1: j = 6: c = 0: key = 35
Do While i <= j
c = c + 1
m = (i + j) \ 2
If (j - i + 1) Mod 2 = 0 Then m = m + 1
If a(m) = key Then Exit Do
If key < a(m) Then j = m - 1 Else i = m + 1
Loop
该程序段运行后,下列各变量的值不正确的是:
Dim a(1 To 10) As Integer
Dim s As String, n, key As Integer
a(1) = 23: a(2) = 33: a(3) = 44: a(4) = 55: a(5) = 66: a(6) = 77
i = 1: j = 6: c = 0: key = 35
Do While i <= j
c = c + 1
m = (i + j) \ 2
If (j - i + 1) Mod 2 = 0 Then m = m + 1
If a(m) = key Then Exit Do
If key < a(m) Then j = m - 1 Else i = m + 1
Loop
该程序段运行后,下列各变量的值不正确的是:
A.i=3 | B.j=2 | C.c=3 | D.m=2 |
10.
使用Flash软件制作动画作品,部分编辑界面如下图所示。其中“蜻蜓”图层第40帧有动作命令gotoAndStop(“load”,10);“蜻蜓”图层利用“蜻蜓”元件实例制作了从左到右飞出舞台的动画效果;“声音”图层中声音的同步属性为“数据流”。下列说法不正确的是( )


A.“蜻蜓”元件的类型一定是“影片剪辑” |
B.当前状态下,可以在“背景”图层第15帧插入关键帧 |
C.测试场景时,播放到最后一帧,动画会自动跳转并停止在load场景第10帧 |
D.若要声音播放2秒后停止,可以在“声音”图层第25帧插入空白关键帧 |
11.
小明使用 Photoshop 软件制作“世界杯”作品,部分界面如下图所示:下列说法正确的是:


A.当前状态下,可对“人物”图层作水平翻转,“足球”图层也会随之翻转 |
B.图中“ 90%”的含义是显示比例,改变该比例大小不影响图像的实际像素 |
C.“人物”图层添加了两个图层样式,其中只有“投影 ”样式可见 |
D.当前状态下,可将“人物”图层的图层样式拷贝到“文字”图层 |
2.填空题- (共5题)
13.
某研究小组收集了“浙江省 2016 年农林牧渔总产值”数据,制作了一张统计表,如下图 1所示。

图1
请回答以下问题:(1)单元格 C4:G4 的公式是从 B4 单元格通过自动填充功能得出,由上图可知 F4 单元格公式为:_______。
(2)根据图 a 制作的图表如图 2 所示,可 知 制 作 该 图 表 的 区 域 为 :A3,A5:A10,_______。
(3)对图 a 数据做如下操作,会引起图表变化的是:_______。(单选)
A.以农业产值为关键字,对所有浙西南城市进行降序排序;
B、将宁波市的林业产值修改为 24.8;
C、选定数据区域 B4:G17 设置单元格格式,保留 1 位小数;
D、对区域 A3:G17 筛选“农业产值”最大的三项)
(4)要对浙西南的所有城市,按“渔业产值”进行降序排序,则排序时应选择的数据区域为:_______。

图2

图1
请回答以下问题:(1)单元格 C4:G4 的公式是从 B4 单元格通过自动填充功能得出,由上图可知 F4 单元格公式为:_______。
(2)根据图 a 制作的图表如图 2 所示,可 知 制 作 该 图 表 的 区 域 为 :A3,A5:A10,_______。
(3)对图 a 数据做如下操作,会引起图表变化的是:_______。(单选)
A.以农业产值为关键字,对所有浙西南城市进行降序排序;
B、将宁波市的林业产值修改为 24.8;
C、选定数据区域 B4:G17 设置单元格格式,保留 1 位小数;
D、对区域 A3:G17 筛选“农业产值”最大的三项)
(4)要对浙西南的所有城市,按“渔业产值”进行降序排序,则排序时应选择的数据区域为:_______。

图2
14.
小李利用所学的 VB 知识,编写了一个简单计算器:在文本框 Text1 中输入一个加减算式(只包含数字和“ +”、“ -”符号,以“ =”结束),点击“计算”按钮 Command1,计算结果在标签 Label1 上显示。程序运行界面如下图所示:

(1)要实现程序运行时,单击文本框 Text1 即可将文本 框 清 空 , 则 应 在 _______(A 、Command1_Click/B、 Form_Load/C、 Text1_Click)事件处理过程中添加语句 Text1.text=”” 。
(2)实现上述功能的 VB 程序如下,请在划线处填入合适的代码
Private Sub Command1_Click
Dim s As String, ch As String, sum As Integer
Dim fh As Integer
s = Text1.Text: fh = 1: p = 0: sum=0
For i = 1 To Len(s)
ch = Mid(s, i, 1)
If ch >= "0" And ch <= "9" Then
p = ①________
Else
sum = ②________
p = 0
If ch = "-" Then
fh = -1
ElseIf ch = "+" Then
fh = 1
End If
End If
Next i
Label1.Caption = Str(sum)
End Sub
(3)若文本框 Text1 中输入的内容为“ 12*10=”(不包括双引号),单击“计算”按钮后,标签Label1 上将显示:________ .(A、 120 / B、 22 / C、 0 /D、程序出错无法显示)

(1)要实现程序运行时,单击文本框 Text1 即可将文本 框 清 空 , 则 应 在 _______(A 、Command1_Click/B、 Form_Load/C、 Text1_Click)事件处理过程中添加语句 Text1.text=”” 。
(2)实现上述功能的 VB 程序如下,请在划线处填入合适的代码
Private Sub Command1_Click
Dim s As String, ch As String, sum As Integer
Dim fh As Integer
s = Text1.Text: fh = 1: p = 0: sum=0
For i = 1 To Len(s)
ch = Mid(s, i, 1)
If ch >= "0" And ch <= "9" Then
p = ①________
Else
sum = ②________
p = 0
If ch = "-" Then
fh = -1
ElseIf ch = "+" Then
fh = 1
End If
End If
Next i
Label1.Caption = Str(sum)
End Sub
(3)若文本框 Text1 中输入的内容为“ 12*10=”(不包括双引号),单击“计算”按钮后,标签Label1 上将显示:________ .(A、 120 / B、 22 / C、 0 /D、程序出错无法显示)
15.
在 VB 的算术运算中,最大的实数类型 double 有效位数也只有 15 位。为了实现除法运算保留任意位数,小明根据除法原理,编写了如下程序,功能如下:在文本框 Text1 中输入被除数(正整数) ,在文本框 Text2 中输入除数(正整数),在文本框 Text3 中输入小数位数,单击按钮 Command1,在标签 Label 中显示除法运算的商。程序运行界面如图所示,但加框处代码有错,请改正:

Private Sub Command1_Click
Dim x, y As Integer
Dim n As Integer
Dim s As String
x = Val(Text1.Text): y = Val(Text2.Text)
n = Val(Text3.Text)
s = s + Str(x \ y)
s = s + "."
k = x Mod y
For i = 1 To n
k = x Mod y
Next i
Label1.Caption = "商为: " + s
End Sub

Private Sub Command1_Click
Dim x, y As Integer
Dim n As Integer
Dim s As String
x = Val(Text1.Text): y = Val(Text2.Text)
n = Val(Text3.Text)
s = s + Str(x \ y)
s = s + "."
k = x Mod y
For i = 1 To n
x = x+k * 10 ①________ |
s = Str(x \ y) ②________ |
k = x Mod y
Next i
Label1.Caption = "商为: " + s
End Sub
16.
小明编写了一个 VB 程序对成绩数据进行排序。为保证相同分数的同学相对位置(指原数据中的前后关系)不发生改变,他试着采用一种新的排序算法来解决。为便于描述算法的实现过程,假定有如下数组 a:
第一步:统计数组 a 中每个值 a(i)出现的次数,存入 b(a(i)),统计完成后数组 b 的情况如下:
第二步:从前向后,依次使数组 b 中的每个值等于其与前一项之和,这样数组 b(a(i))就代表了数组 a 中小于或等于 a(i)的元素个数,完成第二步后数组 b 如下:
第三步:从后往前,依次将数组 a 中元素填入数组 c 中,将数组元素 a(i)放在数组 c 的第 b(a(i))项,如元素 a(1)=5,应该放在数组 c 的 b(5)位(即 c(5) )。每放一个元素就将 b(a(i))递减;完成第三步后,数组 c 如下所示,已经完成升序排序,且相对位置不变,即原来 a (2)的值 3 仍然在 a(3)的值 3 前面。
程序运行界面如右图所示:

实现上述功能的 VB 程序如下,回答以下问题:
(1) 从代码中可以得知,用于连接数据库的对象名是:________
(2) 请在划线处填上相应代码。
Dim a(1 To 50) As Integer '存放学生的成绩
Dim sname(1 To 50) As String '存放学生姓名
Dim n As Integer
Private Sub Command1_Click
Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
conn.ConnectionString="Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" +
App.Path + "\stu.accdb"
conn.Open
strSQL = "SELECT * From stucj"
Set rs.ActiveConnection = conn
rs.Open strSQL
n = 0
List1.AddItem "姓 名" & " " & "成绩"
Do While Not rs.EOF
n = n + 1
a(n) = rs.Fields("cj")
sname(n) = rs.Fields("xm")
List1.AddItem sname(n) & " " & Str(a(n))
①_________
Loop
rs.Close
conn.Close
End Sub
Private Sub Command2_Click
Dim i As Integer, k As Integer
Dim b(0 To 100) As Integer
Dim c(1 To 50) As Integer, c1(1 To 50) As String 'c 和 c1 作为临时数组
For i = 1 To n
b(a(i)) = b(a(i)) + 1
Next
For i = 1 To 100
b(i) = ②__________
Next
For i = n To 1 Step -1
c(b(a(i))) = a(i)
c1(b(a(i))) = sname(i)
③_________________
Next
For i = 1 To n '把临时数组 c 和 c1 中的数据放入 a 和 sname 数组
a(i) = c(i)
sname(i) = c1(i)
Next
List2.AddItem "姓 名" & " " & "成绩"
For i = 1 To n
List2.AddItem sname(i) & " " & Str(a(i))
下标 | 1 | 2 | 3 | 4 | 5 |
值 | 5 | 3 | 3 | 2 | 4 |
第一步:统计数组 a 中每个值 a(i)出现的次数,存入 b(a(i)),统计完成后数组 b 的情况如下:
下标 | 1 | 2 | 3 | 4 | 5 |
值 | 0 | 1 | 2 | 1 | 1 |
第二步:从前向后,依次使数组 b 中的每个值等于其与前一项之和,这样数组 b(a(i))就代表了数组 a 中小于或等于 a(i)的元素个数,完成第二步后数组 b 如下:
下标 | 1 | 2 | 3 | 4 | 5 |
值 | 0 | 1 | 3 | 4 | 5 |
第三步:从后往前,依次将数组 a 中元素填入数组 c 中,将数组元素 a(i)放在数组 c 的第 b(a(i))项,如元素 a(1)=5,应该放在数组 c 的 b(5)位(即 c(5) )。每放一个元素就将 b(a(i))递减;完成第三步后,数组 c 如下所示,已经完成升序排序,且相对位置不变,即原来 a (2)的值 3 仍然在 a(3)的值 3 前面。
下标 | 1 | 2 | 3 | 4 | 5 |
值 | 2 | 3 | 3 | 4 | 5 |
程序运行界面如右图所示:

实现上述功能的 VB 程序如下,回答以下问题:
(1) 从代码中可以得知,用于连接数据库的对象名是:________
(2) 请在划线处填上相应代码。
Dim a(1 To 50) As Integer '存放学生的成绩
Dim sname(1 To 50) As String '存放学生姓名
Dim n As Integer
Private Sub Command1_Click
Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
conn.ConnectionString="Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" +
App.Path + "\stu.accdb"
conn.Open
strSQL = "SELECT * From stucj"
Set rs.ActiveConnection = conn
rs.Open strSQL
n = 0
List1.AddItem "姓 名" & " " & "成绩"
Do While Not rs.EOF
n = n + 1
a(n) = rs.Fields("cj")
sname(n) = rs.Fields("xm")
List1.AddItem sname(n) & " " & Str(a(n))
①_________
Loop
rs.Close
conn.Close
End Sub
Private Sub Command2_Click
Dim i As Integer, k As Integer
Dim b(0 To 100) As Integer
Dim c(1 To 50) As Integer, c1(1 To 50) As String 'c 和 c1 作为临时数组
For i = 1 To n
b(a(i)) = b(a(i)) + 1
Next
For i = 1 To 100
b(i) = ②__________
Next
For i = n To 1 Step -1
c(b(a(i))) = a(i)
c1(b(a(i))) = sname(i)
③_________________
Next
For i = 1 To n '把临时数组 c 和 c1 中的数据放入 a 和 sname 数组
a(i) = c(i)
sname(i) = c1(i)
Next
List2.AddItem "姓 名" & " " & "成绩"
For i = 1 To n
List2.AddItem sname(i) & " " & Str(a(i))
Next
End Sub
17.
小明制作了一个主题为”2018 世界杯” 的 Flash 作品,其中“ main”场景的制作脚本如下所示。
请回答以下问题。
(1)用 Photoshop 打开足球图片“ ball.jpg”,如 图 1 所示。要去除白色背景,使其导入 Flash 后背景透明,以下操作可行的是:____ 。(单选:A、用魔棒选中白色背景,删除后存为 gif 格式/B、用橡皮擦工具擦除白色,将文件存为 png 格式/C、用魔术橡皮擦工具点选白色区域,并将文件存为 gif 格式)

图1
结合制作脚本及图 2,请回答案以下问题:

图2
(2) 足球在第 11 帧时的坐标位置可能为: ____。

(3)文字由小到大,旋转一圈进入舞台上方,可知文字动画是 __。(A、动画补间 B、形状补间)。
(4)文字的出现与脚本设计不符,修改方法为: __。
(5)在不影响其它动画播放效果的前提下,要使音乐播放到第 40 帧时停止,以下可行的操作有:____ 。(多选: A、在“音乐”图层第 40 帧插入空白关键帧/B、删除“音乐”图层第40 帧至 60 帧/ C、选中“音乐”图层第 40 帧,添加动作命令 stopAllSounds; /D、在“音乐”图层第 40 帧插入关键帧,并添加动作命令 stop;)
(6)结合制作脚本可知,“ replay”按钮上的动作命令为:________
请回答以下问题。
场景名: main | 序号类别: 2 | 进入方式:由“ load”场景单击“ Enter”按钮进入 |
呈现方式: 1、 足球从舞台外右上侧进入舞台, 最终停在舞台下方中央。 2、“按钮”图层的按钮出现在舞台 左下方,单击该按钮,动画从本 场景第 1 帧开始播放。 | 呈现顺序: 1、 一开始出现草地背景,“音乐”响起。 2、 动画开始 1 秒后,足球从场外右上侧飞入,补间动画持续 2 秒后,静止在舞台下方中央。 3、 动画开始 1.5 秒后,文字由小变大,旋转一圈进入舞台上方,持续 2 秒后静止在舞台上。 4、 最后出现“ replay”按钮,动画停止播放。 |
(1)用 Photoshop 打开足球图片“ ball.jpg”,如 图 1 所示。要去除白色背景,使其导入 Flash 后背景透明,以下操作可行的是:____ 。(单选:A、用魔棒选中白色背景,删除后存为 gif 格式/B、用橡皮擦工具擦除白色,将文件存为 png 格式/C、用魔术橡皮擦工具点选白色区域,并将文件存为 gif 格式)

图1
结合制作脚本及图 2,请回答案以下问题:

图2
(2) 足球在第 11 帧时的坐标位置可能为: ____。

(3)文字由小到大,旋转一圈进入舞台上方,可知文字动画是 __。(A、动画补间 B、形状补间)。
(4)文字的出现与脚本设计不符,修改方法为: __。
(5)在不影响其它动画播放效果的前提下,要使音乐播放到第 40 帧时停止,以下可行的操作有:____ 。(多选: A、在“音乐”图层第 40 帧插入空白关键帧/B、删除“音乐”图层第40 帧至 60 帧/ C、选中“音乐”图层第 40 帧,添加动作命令 stopAllSounds; /D、在“音乐”图层第 40 帧插入关键帧,并添加动作命令 stop;)
(6)结合制作脚本可知,“ replay”按钮上的动作命令为:________
试卷分析
-
【1】题量占比
选择题:(12道)
填空题:(5道)
-
【2】:难度分析
1星难题:0
2星难题:0
3星难题:0
4星难题:0
5星难题:0
6星难题:0
7星难题:0
8星难题:0
9星难题:17