浙江省温州市2018届高三下学期信息技术3月适应性考试（二模）试卷

试卷更新日期：2018-05-04 类型：高考模拟

进入出卷网下载

一、选择题

1. 学校通过邮箱 wzzx@163.com 给某学生家长的邮箱 4272242@qq.com 发送了一封电子邮件，在家长末收取该邮件时，则该电子邮件将（）

A、退回到发件人的邮箱 B、保存在 qq.com 邮件服务器上 C、保存在家长电脑或移动终端上 D、不断自动重发，直至家长收取该邮件

查看试题解析
2. 下列关于浏览器和页的说法，正确的是（）

A、页的超链接可以添加在文字或图片上 B、在 IE 浏览器中清空历史记录，收藏夹中的址被同时清空 C、页可能含有图片、动画等素材，故不能用记事本编辑页 D、页通过 HTML 协议传输，可以通过浏览器解释执行页文件

查看试题解析
3. ABBYY FineReady 是一款字符识别软件，打开软件，常用界面如图所示，下列说法错误的是（）

A、“图像文件到 PDF”选项功能没有应用人工智能 B、“扫描并保存为图像”选项功能应用了人工智能技术 C、“扫描到 Microsoft Word”选项功能应用了人工智能技术 D、“图像或 PDF 文件到 Microsoft Word”选项功能应用了人工智能技术

查看试题解析
4. 使用Access软件打开数据库，数据表视图如图a所示，设计视图如图b所示，下列说法正确的是（）

A、该数据库表名为“技术成绩.accdb” B、不能在当前选中记录前插入一条新记录 C、可以添加一条新记录“陈宣甸 2 班 50 45 95” D、图 a 状态下可以添加一个类型为“自动编号”的字段

查看试题解析
5. 某流程图如图所示。执行该算法，下面说法错误的是（）

A、s 的值最终为-5 B、语句“k=k+1”共执行了 4 次 C、语句“s≤0”共判断了 5 次 D、该算法转成 VB 代码时能用 Do 循环语句实现

查看试题解析
6. 一个二位十六进制正整数 n，末位是“9”，下列说法正确的是（）

A、无法确定 n 是奇数还是偶数 B、n+1 是一个三位十六进制数 C、转换为十进制数，最小值是 25 D、转换为二进制数，位数一定是 8

查看试题解析
7. 使用 GoldWave 软件打开某音频文件，选中其中一段音频后的部分界面如图所示。下列说法正确的是（）

A、该音频理论上有 16 个高低音级别 B、将当前选中部分设置为静音，则该部分音频采样频率为 0 C、仅将当前选中部分“裁剪”操作，右声道不会发生变化 D、仅将当前选中部分“删除”操作后直接保存，容量变为原来的 3/4

查看试题解析
8. 使用 Photoshop 软件制作“首饰”设计，部分界面如下图所示，下列操作可行的是（）

A、移动“钻石”的位置 B、向下合并“底座”和“形状”图层 C、设置“背景”图层的图层样式 D、调整文字“LOVE”的字体大小为 40

查看试题解析
9. 用 Flash 软件制作动画作品，其中一个场景的部分时间轴界面如下图所示。下列说法正确的是（）

A、当前状态下，可以移动“背景”图层内容的位置 B、在“夏”图层第21帧插入空白关键帧与清除帧效果一样 C、“按钮”图层第1帧清除关键帧，按钮将从始至终一直显示 D、最后一帧添加脚本“fscommand("quit")”，测试影片时动画窗口最后会自动关闭

查看试题解析
10. 【加试题】如图所示，某图像文件在 PhotoShop 中经过画布大小调整确定之后，保存类型为 BMP的图像格式，保存后的文件大小是（）

A、2.5MB B、3MB C、7.32KB D、768KB

查看试题解析
11. 【加试题】下列程序执行后文本框 Text1 显示的内容是（   ）
s = "ERROR:Divisor must not be zero!"
flag = False : m = 0
For i = 1 To Len(s)
ch = Mid(s, i, 1)
If ch >= "a" And ch <= "z" Then
If Not flag Then
m = m + 1 ： flag = True
End If
Else
flag = False
End If
Next i
Text1.Text=Str(m)

A、4 B、5 C、6 D、19

查看试题解析
12. 【加试题】有如下 VB 程序段:
For i=1 to 3

    For j=1 to 5-i

        If a(j)>a(j+1) Then

            t=a(j) : a(j)=a(j+1) : a(j+1)=t

        End If

    Next j

    Text1.Text = Text1.Text + Str(a(i))

Next i

数组元素a(1)到a(5)的值依次为“3,9,6,8,4”。若该程序段执行后，文本框Text1显示的内容是（）

A、3 4 6 B、6 8 9 C、3 6 4 D、3 6 6

查看试题解析

二、非选择题

13. 2016年浙江省各地市GDP情况数据在Excel表中如图a所示。
图a

请回答下列问题:

(1)、区域F3:F14的数据是通过公式计算得到。在单元格F3输入公式，并用自动填充功能完成区域 F4:F14的计算，则单元格F5中的公式是。

(2)、如图 a 所示，删除第 15 行，单元格 F3 的值显示为（选填：A, #DIV/0! / B, #REF! / C, 36958．67 / D, 0）。

(3)、将区域 A2:G14 的数据复制到新工作表，在新工作表中对数据进行筛选操作，2016 年 GDP（亿元）和人均 GDP 筛选条件均设置为如图b所示，则筛选出的城市有个。
图 b

(4)、根据图 a 中数据制作的图表如图 c 所示，创建该图表的数据区域是。
图 c

查看试题解析
14. 编写“单词查询”程序，实现如下功能：在文本框 Text1 中输入一段英文文本（以“.”为结束符），在文本框 Text2 输入一个英文字母，单击“获取单词”按钮 Command1，在列表框 List1 依次显示 Text1 中包含该英文字母的所有单词。程序运行界面如图所示。

(1)、程序运行时，文本框 Text1 显示为“请输入英文短句”，可在 Form_Load 事件过程中添加代码 (单选，填字母:A, Text1.Caption = "请输入英文短句" / B, Text1．Text="请输入英文短句" / C, Text1.AddItem "请输入英文短句"）。

(2)、实现上述功能的 VB 程序如下，请在划线处填入合适的代码。
Private Sub Command1_Click()
Dim s As String, tmp As String, c As String
Dim n As Integer, i As Integer
Dim flag As Boolean
Dim cnt As Integer '存储符合条件的单词数
s = Text1．Text
n = Len(s)
flag = False
List1.Clear
For i = 1 To n
c = Mid(s, i, 1)
If c >= "a" And c <= "z" Or c >= "A" And c <= "Z" Then
If c = Text2．Text Then flag = True: cnt = cnt + 1
Else
If flag Then List1.AddItem tmp
tmp = ""
End If
Next i
If cnt = 0 Then
List1．AddItem "找不到符合条件的单词．"
End If
End Sub

(3)、若文本框 Text2 中输入“M”，单击“获取单词”按钮后，列表框 List1 中显示的单词个数是。

查看试题解析
15. 创作一个题为“关爱老人”的多媒体作品，首先使用 Photoshop 软件制作一张片头图片，然后使用 Flash 软件制作一个动画，该动画设计思路如下。请回答下列问题:

(1)、如图a所示，若仅将“关爱老人”的“爱”字变更颜色，下列操作方法可行的有（多选，填字母:A, 用 T 工具选择“爱”字，设置文本颜色 / B, 用“套索”选择“爱”字，油漆桶填充颜色 / C, 用 T 工具选择“爱”字，设置图层样式“颜色叠加” / D, 栅格化文字，用“魔棒”选择“爱”字，前景色填充颜色）。
图 a

(2)、“main”场景如图 b 所示，结合动画设计思路，发现第 60 帧开始右边多出一个女孩，若要该女孩在舞台中消失，正确的操作是。
图 b

(3)、测试影片时，音乐自动延续到下一场景，“音乐”图层中的声音“同步”属性为。（选填：事件 / 数据流）

(4)、如图 b 所示，在“老婆婆”图层第 47 帧与第 52 帧之间添加动画补间时，发现库中自动生成“补间 1”素材，可能的原因是。

(5)、测试影片时，单击“下一幕”按钮，影片跳转到下一场景的第 1 帧并停止播放，则“下一幕”按钮的动作脚本为。

查看试题解析
16. 【加试题】某排序算法思想如下：每一趟将一个待排序的记录，按其关键字的大小插入到已经排好序的一组记录的适当位置上，直到所有待排序记录全部插入为止。例如(9,3,1,4)升序排序；第一步 3 插入到有序记录(9)，得到(3,9)；第二步 1 插入到有序记录(3,9)，得到(1,3,9)；第三步 4 插入到有序记录(1,3,9)，得到最终有序记录为“1,3,4,9”。
为此，编写了一个 VB 程序，功能如下：运行程序，窗体加载时随机产生 10 个随机整数，并在列表框 List1 中依次显示排序前数据，单击“排序”按钮 Command1，在列表框 List2 中
显示经过上述排序算法后的数据，运行结果如图 b 所示。实现上述功能的 VB 代码如下，但加框处代码有错，请改正。
Const n = 10
Dim a(1 To n) As Integer        '生成 n 个随机数，存储在 a 数组，代码略
Private Sub Command1_Click()
Dim i As Integer, j As Integer, t As Integer
For i = 2 To n
t = a(i) : j = i - 1
Do While t < a(j)
a(j + 1) = a(j) j = j – 1
If   Then Exit Do ①
Loop
       ②
Next i
For i = 1 To n
List2.AddItem Str(a(i))
Next i
End Sub
① ②

查看试题解析
17. 【加试题】编写一个技术成绩查询的 VB 程序。程序功能如下：在文本框 Text1 中输入分数 key(0-50 的整数)，单击“查询”按钮 Command1，查询出信息成绩大于等于 key 的所有记录，并以“信息”为主要关键字、“通用”为次要关键字均进行降序排序，结果输出在列表框 List2 中。运行界面如下图所示。
实现上述功能的 VB 程序如下，请回答下列问题：

(1)、   观察上图，排序后第 5 位的学生姓名是。

(2)、请在划线处填入合适的代码。
Dim xm(1 To 600) As String     '存储学生姓名
Dim xx(1 To 600) As Integer   '存储信息成绩
Dim ty(1 To 600) As Integer   '存储通用成绩
Dim n As Integer           '存储记录总数
Private Sub Form_Load()
'本过程从数据库中读取学生数据，存储在相应的变量中，并在 List1 中显示'代码略
End sub
Private Sub Command1_Click()
Dim key As Integer, mid As Integer
Dim i As Integer, L As Integer, R As Integer, k As Integer
Dim tmp1 As String, tmp2 As Integer
'以“信息”为主要关键字、“通用”为次要关键字排序
For i = 1 To n - 1
k = i
For j = i + 1 To n
If xx(k) < xx(j) or Then
k = j
End If
Next j
If k <> i Then
tmp1 = xm(k) : xm(k) = xm(i) : xm(i) = tmp1
tmp2 = xx(k) : xx(k) = xx(i) : xx(i) = tmp2
tmp2 = ty(k) : ty(k) = ty(i) : ty(i) = tmp2
End If
Next i '查询记录
key = Val(Text1．Text) L = 1 : R = n
Do While L <= R
mid = (L + R) \ 2
If Then
L = mid + 1
Else
R = mid - 1
End If
Loop
List2．Clear
' vbTab 相当于是键盘上制表符 TAB 按键的功能
List2．AddItem "姓名" & vbTab & "信息" & vbTab & "通用"
For i = 1 to
List2．AddItem xm(i) & vbTab & xx(i) & vbTab & ty(i)
Next i
End sub

查看试题解析