1.选择题- (共12题)
1.
下列关于信息和信息技术的说法正确的是（ ）
| A．计算机对各类信息进行加工处理，本质上都是通过计算完成的。 |
| B．某GPS导航规划的路线经常出错，更新数据后很少出错，主要体现信息的真伪性。 |
| C．蓝牙音箱是一种主要用于将声音的模拟信号转换为数字信息的设备。 |
| D．一般来说，网页是用VB语言编写的，通过HTTP协议进行传输。 |
4.
某网站用户注册界面如图所示，用户信息相关的数据库使用Access设计，下列说法不正确的是（ ）
| A．用户成功注册一个新账号，数据库中将增加一个字段 |
| B．可以将“用户名”相应字段的类型设置为文本类型 |
| C．可以将“是否有车”相应字段的类型设置为“是/否”类型 |
| D．用户成功注册后，“电子邮箱”字段对应的记录不能为空 |
5.
有如下程序段
a(1)=False
For i=2 To 20
a(i)=True
Next i
For i=2 To 20
If a(i)=True Then
Next i
t = 0
For i=1 To 20
If a(i)=True Then
Next i
经过该程序段运行后，变量t的值为（ ）
a(1)=False
For i=2 To 20
a(i)=True
Next i
For i=2 To 20
If a(i)=True Then
For j=2 To 20\i
a(i*j)=FalseNext j
End IfNext i
t = 0
For i=1 To 20
If a(i)=True Then
t=t+1
End IfNext i
经过该程序段运行后，变量t的值为（ ）
| A．5 | B．6 | C．7 | D．8 |
7.
有如下程序段：
i = 1
Do While i <= 5
If i = 0 or a(i - 1) <= a(i) Then
i = i + 1
Else
t = a(i): a(i) = a(i - 1): a(i - 1) = t
i = " - 1
End If
Loop
For i = 1 To 5
List2.AddItem a(i)
Next i
数组元素a(0)到a(5)的值依次为“0，71，22，48，79，27”，经过该程序段“加工”后，数组元素a(4)的值为（ ）
i = 1
Do While i <= 5
If i = 0 or a(i - 1) <= a(i) Then
i = i + 1
Else
t = a(i): a(i) = a(i - 1): a(i - 1) = t
i = " - 1
End If
Loop
For i = 1 To 5
List2.AddItem a(i)
Next i
数组元素a(0)到a(5)的值依次为“0，71，22，48，79，27”，经过该程序段“加工”后，数组元素a(4)的值为（ ）
| A．0 | B．71 | C．48 | D．27 |
9.
将一时长为10分钟、未经压缩、采样频率为44.1KHZ、量化位数16位，双声道WAV音频文件另存为MP3格式，压缩比为10:1，该MP3音频的存储容量约为（ ）
| A．100MB | B．10MB | C．80MB | D．50MB |
10.
使用Flash软件编辑“月夜”动画，部分编辑界面如下图所示，其中 “动作”图层第35帧的动作命令为Stop（）；“月亮”图层实现从“月圆”变化为“月牙”的动画效果；“乌鸦”图层中乌鸦从舞台左下方飞到舞台中间，然后飞向左上方；“声音”图层中声音的同步方式为数据流，下列说法不正确的是（ ）
| A．测试影片时，动画播放到第35帧自动停止，但声音继续播放 |
| B．“月亮”图层的补间类型是“形状补间” |
| C．将“乌鸦”图层第20帧执行“清除关键帧命令”，乌鸦将从左下方直接飞向左上方 |
| D．改变“背景”图层和“声音”图层的上下顺序，不影响动画的播放效果 |
11.
使用Photoshop软件设计名片模板，编辑界面如下图所示：
下列说法不正确的是（ ）
下列说法不正确的是（ ）
| A．移动“电话图标”图层中的图像，“网页图标”和“地址图标”中的内容也会随之移动 |
| B．“二维码”图层添加了图层样式 |
| C．“信息”是图层组，可能包含多个图层 |
| D．为了便于用户修改“姓名”等信息，最好将图像存储为BMP格式 |
12.
使用GoldWave软件编辑音频素材，部分操作界面如下图所示:
下列说法正确的是（ ）
下列说法正确的是（ ）
| A．当前音频文件的左右声道均添加了淡入效果 |
| B．当前音频文件每个采样点的量化位数为16个字节 |
| C．将当前音频文件进行保存，总时长将变为10秒 |
| D．1411kbps的含义是该音频的播放速率为每秒钟播放1411k位 |
2.填空题- (共5题)
13.
日期判断:从文本框Text1输入一个8位数字表示的日期，其中第1到4位表示年（第1位确定不为零），第5到6位表示月，第7到8位表示日。单击“判断”按钮，判断该日期是否合法，将结果依次输出到列表框List1。程序界面如下图所示：
提示：年份值符合下列两种情况之一的是闰年。
1.年份是4的倍数，但不是100的倍数；
2.年份是400的倍数。
（1）观察程序代码，可知“判断”按钮的对象名为 。（单选，填字母：
（2）为实现上述功能，请在划线处填入合适的代码。
Private Sub Judge_Click()
Dim riqi As String, st As String
Dim year As Integer, month As Integer, day As Integer
Dim rn As Boolean, hefa As Boolean
riqi = Text1.Text
year =" Val(Mid(riqi," 1, 4))
month =" Val(Mid(riqi," 5, 2))
day = ① ‘第①处
st =" Str(year)" + "年" + Str(month) + "月" + Str(day) + "日"
rn = False ‘用于判断是否为闰年
If ② Then rn = True ‘第②处
If year Mod 4 =" 0" And year Mod 100 <> 0 Then rn = True
hefa = True ‘用于判断是否为合法日期
If month =" 0" Or month > 12 Then hefa = False
If day =" 0" Then hefa = False
If (month =" 1" Or month =" 3" Or month =" 5" Or month =" 7" Or ’与下一行语句同行
month =" 8" Or month =" 10" Or month =" 12)" And day > 31 Then hefa = False
If (month =" 4" Or month =" 6" Or month =" 9" Or month = 11) ’与下一行语句同行
And day > 30 Then hefa = False
If ③ Then hefa =" False" ’第③处,判断闰年2月的天数是否合法
If month =" 2" And Rn =" False" And day > 28 Then hefa = False
If hefa =" True" Then st =" st" + " 合法日期" Else st =" st" + " 非法日期"
List1.AddItem st
End Sub
提示：年份值符合下列两种情况之一的是闰年。
1.年份是4的倍数，但不是100的倍数；
2.年份是400的倍数。
（1）观察程序代码，可知“判断”按钮的对象名为 。（单选，填字母：
| A．Text1/ | B．List1/ | C．Command1/ | D．Judge/E.判断） |
Private Sub Judge_Click()
Dim riqi As String, st As String
Dim year As Integer, month As Integer, day As Integer
Dim rn As Boolean, hefa As Boolean
riqi = Text1.Text
year =" Val(Mid(riqi," 1, 4))
month =" Val(Mid(riqi," 5, 2))
day = ① ‘第①处
st =" Str(year)" + "年" + Str(month) + "月" + Str(day) + "日"
rn = False ‘用于判断是否为闰年
If ② Then rn = True ‘第②处
If year Mod 4 =" 0" And year Mod 100 <> 0 Then rn = True
hefa = True ‘用于判断是否为合法日期
If month =" 0" Or month > 12 Then hefa = False
If day =" 0" Then hefa = False
If (month =" 1" Or month =" 3" Or month =" 5" Or month =" 7" Or ’与下一行语句同行
month =" 8" Or month =" 10" Or month =" 12)" And day > 31 Then hefa = False
If (month =" 4" Or month =" 6" Or month =" 9" Or month = 11) ’与下一行语句同行
And day > 30 Then hefa = False
If ③ Then hefa =" False" ’第③处,判断闰年2月的天数是否合法
If month =" 2" And Rn =" False" And day > 28 Then hefa = False
If hefa =" True" Then st =" st" + " 合法日期" Else st =" st" + " 非法日期"
List1.AddItem st
End Sub
14.
字符串删除与插入:给定一个长度不超过100位的字符串S，现有以下两种操作指令：
指令1（删除）：给出一个字符串S1，在字符串S中找到最左边的一个字符串S1，将其删除，若在S中不存在字符串S1，则字符串S不变。
例如：S=“China is a big family,it is big” S1=“big”
则执行指令1后，S=“China is a family,it is big”
若S1=“small”，则S不变。
指令2（插入）：给出一个字符串S2，和一个整数w，将S2插入到S中以w开始的位置。
例如：S=“a big family” S2=“very ” w=3
则执行指令2后，S=“a very big family”
注意S中“a”后有一个空格，S2中“y”后有一个空格
实现上述功能的VB程序如下。请在划线处填入合适代码。
Dim S As String
Private Sub Command1_Click() ’单击Command1实现删除指令
Dim S1 As String
S = Text1.Text
S1 =" Text2." Text
S = del(S1)
Text5.Text = S
End Sub
Private Sub Command2_Click() ’单击Command2实现插入指令
Dim S2 As String, W As Integer
S = Text1.Text
S2 = Text2.Text
W = Val(Text4.Text)
S = (1) ’调用函数，实现插入指令
Text5.Text = S
End Sub
Function del(S1 As String) As String ’在字符串S中查找并删除S1
Dim S3 As String
For i =" 1" To Len(S) - Len(S1) + 1
S3 = "" ’S3表示从位置i开始，取出长度和S1相同的字符串
For j =" i" To i + Len(S1) - 1
S3 =" S3" + Mid(S, j, 1)
Next j
If (2) Then ’如果找到S1，则将S1删除
S =" Mid(S," 1, i - 1) + Mid(S, i + Len(S1), Len(S) - Len(S1) - i+ 2)
del = S
Exit Function ’删除左边的第一个S1后，退出函数，以保证只删除一次
End If
Next i
End Function
Function add(S2 As String, W As Integer) As String
S = Mid(S, 1, W - 1) + S2 + (3) ’将S2插入W开始的位置
add = S
End Function
指令1（删除）：给出一个字符串S1，在字符串S中找到最左边的一个字符串S1，将其删除，若在S中不存在字符串S1，则字符串S不变。
例如：S=“China is a big family,it is big” S1=“big”
则执行指令1后，S=“China is a family,it is big”
若S1=“small”，则S不变。
指令2（插入）：给出一个字符串S2，和一个整数w，将S2插入到S中以w开始的位置。
例如：S=“a big family” S2=“very ” w=3
则执行指令2后，S=“a very big family”
注意S中“a”后有一个空格，S2中“y”后有一个空格
实现上述功能的VB程序如下。请在划线处填入合适代码。
Dim S As String
Private Sub Command1_Click() ’单击Command1实现删除指令
Dim S1 As String
S = Text1.Text
S1 =" Text2." Text
S = del(S1)
Text5.Text = S
End Sub
Private Sub Command2_Click() ’单击Command2实现插入指令
Dim S2 As String, W As Integer
S = Text1.Text
S2 = Text2.Text
W = Val(Text4.Text)
S = (1) ’调用函数，实现插入指令
Text5.Text = S
End Sub
Function del(S1 As String) As String ’在字符串S中查找并删除S1
Dim S3 As String
For i =" 1" To Len(S) - Len(S1) + 1
S3 = "" ’S3表示从位置i开始，取出长度和S1相同的字符串
For j =" i" To i + Len(S1) - 1
S3 =" S3" + Mid(S, j, 1)
Next j
If (2) Then ’如果找到S1，则将S1删除
S =" Mid(S," 1, i - 1) + Mid(S, i + Len(S1), Len(S) - Len(S1) - i+ 2)
del = S
Exit Function ’删除左边的第一个S1后，退出函数，以保证只删除一次
End If
Next i
End Function
Function add(S2 As String, W As Integer) As String
S = Mid(S, 1, W - 1) + S2 + (3) ’将S2插入W开始的位置
add = S
End Function
15.
小朋友拍照:有来自K（1<=K<=20）个不同国家的N(1<=N<=100)个小朋友排成一行准备拍照。国籍用数字1,2,3……K表示，每个小朋友的国籍依次存入数组a（1）到a（N）。由于小朋友太多，没有办法全部被拍入。摄像师决定拍摄一段连续区间内的小朋友，这个区间内每种国籍的小朋友至少要有1个，求满足要求的最小区间长度。
例如有10个小朋友，5种国籍，从左到右排列，国籍编号依次是2，1,2,4,3,3,5,5,3,5，则最小的一段包含所有5种国籍的区间是从第2个到第7个小朋友，区间长度为6。
算法解析：区间的长度至少为K（国籍的数量），最大为N（小朋友的数量）。我们可以通过二分K到N之间的求得最小区间长度。
实现上述功能的VB代码如下，但加框处代码有错，请改正。
Dim a(1 To 100) As Integer '依次存储为1到100的小朋友的国籍编号
Dim K As Integer
Dim N As Integer
Private Sub Form_Load() '窗体加载，生成数据
'产生N的值，表示人数
'产生K的值，表示国籍种数
'产生编号为1到N的小朋友的国籍编号，并存储在数组a中
'代码略
End Sub
Private Sub Command1_Click() '使用二分的思想计算最小区间
Dim M As Integer
i =" K:" j = N '答案的范围为K到N，即最少K，最多N个小朋友
Do While i <= j
M =" (i" + j) \ 2 '二分，求中间值
If pd(M) =" True" Then '调用Pd函数，判断区间长度为M时，是否包含所有国籍
j =" M" – 1
ans = M '若以M为区间长度可包含所有国籍，更新答案
Else
i =
'第①处错误
End If
Loop
Text1.Text = Str(ans)
End Sub
Function pd(M As Integer) As Boolean
Dim f(1 To 20) As Integer 'f(i)表示国籍为i的小朋友是否包含
Dim t As Integer 't用于统计当前区间包含的国籍数量
pd = False
For i =" 1" To N - M + 1 '枚举以i为起点的M个小朋友中，各个国籍是否包含
For j =" i" To i + M - 1
f(a(j)) = 1 '等于1，表示国籍为a(j)的小朋友已包含，0表示不包含
Next j
t = 0
For j =" 1" To K '统计已包含的国籍的数量
t =
'第②处错误
Next j
If t =" K" Then pd =" True:" Exit Function '若包含K个国籍，返回True
For j =" 1" To K 'f数组元素重新初始化为0[来源:学。科。网Z。X。X。K]
f(j) = 0
Next j
Next i
End Function
例如有10个小朋友，5种国籍，从左到右排列，国籍编号依次是2，1,2,4,3,3,5,5,3,5，则最小的一段包含所有5种国籍的区间是从第2个到第7个小朋友，区间长度为6。
算法解析：区间的长度至少为K（国籍的数量），最大为N（小朋友的数量）。我们可以通过二分K到N之间的求得最小区间长度。
实现上述功能的VB代码如下，但加框处代码有错，请改正。
Dim a(1 To 100) As Integer '依次存储为1到100的小朋友的国籍编号
Dim K As Integer
Dim N As Integer
Private Sub Form_Load() '窗体加载，生成数据
'产生N的值，表示人数
'产生K的值，表示国籍种数
'产生编号为1到N的小朋友的国籍编号，并存储在数组a中
'代码略
End Sub
Private Sub Command1_Click() '使用二分的思想计算最小区间
Dim M As Integer
i =" K:" j = N '答案的范围为K到N，即最少K，最多N个小朋友
Do While i <= j
M =" (i" + j) \ 2 '二分，求中间值
If pd(M) =" True" Then '调用Pd函数，判断区间长度为M时，是否包含所有国籍
j =" M" – 1
ans = M '若以M为区间长度可包含所有国籍，更新答案
Else
i =
'第①处错误End If
Loop
Text1.Text = Str(ans)
End Sub
Function pd(M As Integer) As Boolean
Dim f(1 To 20) As Integer 'f(i)表示国籍为i的小朋友是否包含
Dim t As Integer 't用于统计当前区间包含的国籍数量
pd = False
For i =" 1" To N - M + 1 '枚举以i为起点的M个小朋友中，各个国籍是否包含
For j =" i" To i + M - 1
f(a(j)) = 1 '等于1，表示国籍为a(j)的小朋友已包含，0表示不包含
Next j
t = 0
For j =" 1" To K '统计已包含的国籍的数量
t =
'第②处错误Next j
If t =" K" Then pd =" True:" Exit Function '若包含K个国籍，返回True
For j =" 1" To K 'f数组元素重新初始化为0[来源:学。科。网Z。X。X。K]
f(j) = 0
Next j
Next i
End Function
16.
有一批未经压缩的BMP格式的图片文件，经格式转换后，文件大小发生改变，小李使用Excel软件对不同的图片格式进行研究，如图1所示。请回答下列问题：
图1
（1）区域E2:E17中的数据表示的是未经压缩的BMP格式图像的存储容量，通过对区域B2:D17的数据计算求得，可以在E2单元格输入公式 ，并向下填充至E17单元格。
（2）若在某次修改后，H12单元格显示内容为“#DIV/0!”，则可能的原因是 。（单选，填选项前的字母）
（3）小李对区域A1:H17数据进行筛选,筛选方式如图2所示，则被筛选出的数据条数为 。
图2
（4）为了更直观地反映不同图像格式存储容量的变化，小李创建了如题13图-3所示的图表，该图表的数据区域为 。
图3
图1
（1）区域E2:E17中的数据表示的是未经压缩的BMP格式图像的存储容量，通过对区域B2:D17的数据计算求得，可以在E2单元格输入公式 ，并向下填充至E17单元格。
（2）若在某次修改后，H12单元格显示内容为“#DIV/0!”，则可能的原因是 。（单选，填选项前的字母）
| A．E12单元格的内容被删除 | B．G12单元格的内容被删除 |
| C．H列的列宽被缩小 | D．G12单元格的内容被改为“JPEG” |
图2
（4）为了更直观地反映不同图像格式存储容量的变化，小李创建了如题13图-3所示的图表，该图表的数据区域为 。
图3
17.
使用Photoshop和Flash软件创作主题为“田忌赛马”的多媒体作品。请回答下列问题：
（1）使用魔棒工具，点击“白马.jpg”图像中背景部分左上角，发现只选中了背景的上半部分，如题图1所示，最可能的原因是 （单选，填字母：A.容差设置太小/B.容差设置太大/
作品“田忌赛马”共有5个场景，分别是“片头”、“第一场”、“第二场”、“第三场”和“片尾”。正在编辑的场景是“第一场”，部分编辑界面如题15图-2所示，田忌用下等马对齐王的上等马。
图2
（2）测试影片时发现，播放“第一场”场景动画1秒后，会自动开始赛马动画。现在希望在单击“开始”按钮后，赛马动画才开始出现，则首先应在“控制”图层的第 帧添加动作脚本 。
（3）齐王的马在第30帧到达终点，观察“田忌马”图层的动画补间，可知齐王的马比田忌的马早____________秒到达终点（填整数）。
（4）选择“田忌马”图层，将帧频设置为20fps，田忌的马是否会比齐王的马先到达终点。_________（单选，填字母：A.是/B.否）。
（5）库中的音频素材时长为20秒，应用于“音乐”图层中，若要使得音乐仅在单击“静音”按钮后，声音才停止播放，可将该图层的声音“同步”属性设置为 （单选，填字母：A.数据流/B.事件）。
（6）“返回”按钮在“第一场”场景第50帧出现在舞台右下角，单击该按钮，转到并停留在“片头”场景的第20帧，则在该按钮上添加的动作脚本是 。
（1）使用魔棒工具，点击“白马.jpg”图像中背景部分左上角，发现只选中了背景的上半部分，如题图1所示，最可能的原因是 （单选，填字母：A.容差设置太小/B.容差设置太大/
| A．马和背景的颜色差别过大）。 |
图2
（2）测试影片时发现，播放“第一场”场景动画1秒后，会自动开始赛马动画。现在希望在单击“开始”按钮后，赛马动画才开始出现，则首先应在“控制”图层的第 帧添加动作脚本 。
（3）齐王的马在第30帧到达终点，观察“田忌马”图层的动画补间，可知齐王的马比田忌的马早____________秒到达终点（填整数）。
（4）选择“田忌马”图层，将帧频设置为20fps，田忌的马是否会比齐王的马先到达终点。_________（单选，填字母：A.是/B.否）。
（5）库中的音频素材时长为20秒，应用于“音乐”图层中，若要使得音乐仅在单击“静音”按钮后，声音才停止播放，可将该图层的声音“同步”属性设置为 （单选，填字母：A.数据流/B.事件）。
（6）“返回”按钮在“第一场”场景第50帧出现在舞台右下角，单击该按钮，转到并停留在“片头”场景的第20帧，则在该按钮上添加的动作脚本是 。
试卷分析
-
【1】题量占比
选择题:(12道)
填空题:(5道)
-
【2】：难度分析
1星难题：0
2星难题：0
3星难题：0
4星难题：0
5星难题：0
6星难题：0
7星难题：0
8星难题：0
9星难题：17