2017年浙江省高考信息技术模拟试卷（二）

试卷日期：2017-10-30 考试类型：高考模拟

前去【出卷网】下载

一、选择题

1. 鸡年春晚启用了多个分会场，各会场的实况都通过处理变成了数字信号，以方便通过网络传送。这体现了信息的（）

A、共享性 B、时效性 C、可加工处理性 D、载体依附性

查看试题解析
2. 张经理最近很烦，业务联系全靠邮箱，可最近邮箱爆满，绝大部分是自动回复的邮件，听说有一种方法可以在邮件发送时就避免收到自动回复，是下列方法中的（）

A、将收件人邮箱地址放入“收件人”栏 B、将收件人邮箱地址放入“抄送人”栏 C、将收件人邮箱地址放入“密送人”栏 D、点击“群发单显”功能

查看试题解析
3. 小李家中新装修，准备安装智能居，希望可以通过语音来开启灯光、调节灯光的亮度、开关窗帘、控制家用电器等等。这主要采用的技术是 ( )

A、光电控制技术 B、语音识别技术 C、射频技术 D、虚拟现实技术

查看试题解析
4. 如下图所示，ID字段为自动编号，如果删除了ID为3的行，则（）

A、倪利的ID不会变化，后面的各条记录ID也不会发生变化 B、倪利的ID会变为3，后面的各条记录ID都会依次发生变化 C、倪利的ID不会变化，前面的各条记录ID会发生变化 D、前后各条记录的ID都会发生变化

查看试题解析
5. 将输入的字符连接成字符串，直到输入-1为止（输入字符保存在C变量中），如果依次输入以下字符: 3,S,2,D,1,-2,-1,f,-1
则最后得到的字符串是：（）

A、” 3S 2D 1-2-1f-1” B、”3S 2D 1” C、”3S 2D 1-2” D、”3S 2D 1-2-1”

查看试题解析
6. XX公司要为新开发的产品做一个多媒体广告，产品针对的是家族主妇，公司给全国各地不同省市的5万家族主妇发出了有奖问卷调查，收到了43212份答卷。从而了解了用户对产品的需求，有针对性的设计出了广告作品。这个调查属于多媒体作品设计的（）

A、作品规划设计 B、应用需求分析 C、创作需求分析 D、脚本编写

查看试题解析
7. 下图可知I的内码是49H，那么字母j的内码会是（）

A、4AH B、50H C、6AH D、70H

查看试题解析
8. 下列关于图形图像描述错误的是（）

A、矢量图放大不会影响图的质量。 B、位图用photoshop打开后，放大到200%，再保存容量将增加一倍。 C、用画图软件不能编辑矢量图。 D、户外大幅面广告在制作时一般都是用矢量图。

查看试题解析
9. 在将一个图片导入到舞台时出现如下对话框，点击“是”后，导入了8张图片，这8张图片生成了（）

A、逐帧动画 B、动作补间动画 C、形状补间动画 D、物理模型动画

查看试题解析
10. 【加试题】有一个8秒钟的视频文件1024*768 25pfs，经某压缩算法压缩后容量为4.41MB，已经方式压缩算法压缩比为34 : 1，则该视频单帧的位深度是多少（）

A、3 位 B、4位 C、8位 D、16位

查看试题解析
11. 【加试题】数组里有12个元素，依次为：34、40、41、43、53、55、65、70、72、74、80、95，下列选项中不正确的是（）

A、如使用顺序查找法，53需要查找5次 B、如使用对分法查找，53需要查找3次 C、如使用顺序查找法，70需要查找8次 D、如使用对分法查找，70需要查找4次

查看试题解析
12. 【加试题】有如下程序段，当循环执行到第5次时（   ）
For i = 150 To 300
    a = i \ 100
    b = i \ 10 Mod 10
    c = i Mod 10
    If i = a * a * a + b * b * b + c * c * c Then
        Label1.Caption = Str(i)
    End If
Next i

A、Label1显示150 B、Label1显示出错信息 C、Label1显示155 D、Label1显示153

查看试题解析

二、非选择题

13. 某区四所高中基本考试各科平均分比较如下图，完成下列各小题。

图1

(1)、总分偏移=某校总分-标准总分，L3处输入了公式，L4~L14由L3自动填充得到，发现从L4开始的数据都错了，L3处的公式应改为：

(2)、如果只想显示数学平均分80分以上的行，应该（A按数学排序|B删除除数学外的其它学科|C对数学列进行筛选）

(3)、如第13题图2所示，要为图表添加一个标题应该选择

(4)、根据图2的图表，可以判断选择的数据区域是
图2

查看试题解析
14. 用雨量计或雨量器测定，以mm为单位。目前，我国电视和广播节目中发布的日雨量为08~08时，代表前一天的雨量。从键盘输入前一天雨量（用来模拟传感器），点击判断雨量，然后从label3输出雨量
小雨:1d(或24h)降雨量小于10mm者。
中雨:1d(或24h)降雨量10~25mm者。
大雨:1d(或24h)降雨量25~50mm者。
暴雨:1d(或24h)降雨量50~100mm者。
大暴雨:1d(或24h)降雨量100~250mm者。
特大暴雨:1d(或24h)降雨量在250mm以上者。
Private Sub Command1_Click()
Dim a As Single
Dim s as      ①
a =         ②
If a > 250 Then
    s = "特大暴雨"
ElseIf a > 100 Then
    s = "大暴雨"
ElseIf a > 50 Then
    s = "暴雨"
ElseIf a > 25 Then
    s = "大雨"
ElseIf a > 10 Then
    s= "中雨"
ElseIf    ③       Then
    s = "小雨"
Else
    s = "无雨"
End If
Label3.caption=    ④
End Sub

(1)、要想让A处在程序运行时显示空白，应设置Text1的属性。

(2)、①处应填

(3)、②处应填

(4)、③处应填

(5)、④处应填

查看试题解析
15. 根据下图完成1-4小题。
图1

(1)、如图1中，要单独将lamp图层另存为1个png图像，最方便的方法是（选择A用套索工具选择台灯，复制到另一个新文件。｜B按住ctrl点击lamp图层直接选中台灯，再复制到新文件中。｜C隐藏bk图层，直接另存为。）

(2)、图1中对bk图层使用了滤镜，最可能的是（镜头光晕｜锐化｜光照效果）。

(3)、图1中bk图层是位置锁定的，不可以进行操作（重命名图层｜给图层做滤镜｜调整图层中图的位置）

(4)、图2是一个鼠标悬停的影片剪辑，图3是开灯按钮，开灯按钮的图层1第2帧的内容就是图2的鼠标悬停的影片剪辑，当鼠标悬停在按钮上时绿色逐渐从四周填充入椭圆，关灯按钮是从开灯按钮直接复制后修改了文字。图3是要完成的是点开灯按钮，转到第5帧并显示关灯按钮，点关灯按钮转到第1帧并显示开灯按钮。根据各图完成以下①-③题。
图2
图3
图4
①lamp.png的大小如图4，刚刚好覆盖整个舞台，则这个文档的宽度是。
②由图4可知这个文档中有个元件。
③文档测试时发现，鼠标悬停在按钮上时会反复播放逐渐填充绿色的动画，如果只希望播放一次，那么应该修改元件，在最后一帧加。
④希望点击开灯按钮后到第5帧停着，则在开灯按钮上应加脚本。

查看试题解析
16. 有一种压缩算法，基本原理是：特殊字符+重复次数+字符。
比如有文本字符串：A A A A A B C C C C B C C C，编码后得到：B B 5 A B B 4 C B B 3 C。编码串的最开始说明特殊字符B，以后B后面跟着的数字就表示出重复的次数。编程实现将从Text1输入的一个字符串，点压缩按钮后用上述方法压缩，压缩后的编码在Text2中输出，text3中输入特殊字符。压缩算法：
a)       给压缩串添加开关的特殊字符
b)      逐个判断输入字符串的字符（当前的字符与后一个比较），如果两个字符不同，则连到了压缩串中，如果有连续的重复字符则计数n+1
c)       最后一组重复字符或单个字符再连到压缩串中。
u 连入压缩串方法：单个的直接连入，有重复的连入特殊字符开头+数字+重复的字符

图1
程序如下：
Private Sub Command1_Click()
Dim src As String, t As String   ‘src保存输入的字符串
Dim desc As String       ‘desc保存压缩后的字符串
Dim c As String ‘c保存特殊字符
Dim n As Integer ‘n用来记连续重复字符个数
src = Text1.Text
c = Text3.Text
n = 0
desc =   ①
For i = 1 To      ②
    n = n + 1
    t = Mid(src, i, 1)
    If t <>     ③    Then
         desc = desc & zipstring(n, c, t)
         n = 0
    End If
Next i
Text2.Text = desc & zipstring(n, c,     ④   )
End Sub
Private Function zipstring(n As Integer, c As String, sr As String) As String
         If n <= 1 Then
            zipstring = sr
         Else
            zipstring = c & Trim(Str(n)) & sr
         End If
End Function
①
②
③
④

查看试题解析
17. 小丽在假期看到小朋友们在玩一个游戏，8个小朋友围成一圈，从某个小朋友开始报数，报到指定数时，该小朋友出圈，接着从出圈的位置开始再接着报。她希望通过VB程序模拟这个过程，思路如下：
1）用一个一维数组来模拟，编号1~N保存在数据a(1)~a(n)中，来代表N个小朋友。
2）K代表报数的起始位置，从数组的a(k)开始遍列，报到m出圈，将当前位置的元素删除，后面的元素依次往前移位。总数减1。
3）当报数报到数组元素的最后一个时，返回数组开头接着报数。
4）当总数只剩下一个数时，直接输出。
界面如下：
Private Sub Command1_Click(   )
Dim i As Integer
Dim n As Integer
Dim m As Integer, k As Integer
Dim A(1 To 50) As Integer   '存放编号的数组
n = Val(Text1.Text)                       '编号个数
k = Val(Text2.Text)                '报数起始位
m = Val(Text3.Text)                   '报到出圈数
If n > 0 And k > 0 And m > 0   ① n <= 50 Then
    For i = 1 To n              '初始化编号a(1)=1,a(2)=2,……
         A(i) = i
    Next i
    Label1.Caption =    ②          '调用出圈函数，得到返回的出圈顺序
Else
    MsgBox "编号、起始位、报到出圈数都必须大于0！编号不能超过50！"
End If
End Sub
Private Function chuquan(b() As Integer, n As Integer, m As Integer, k As Integer) As String
Dim i As Integer, j As Integer
Dim s As String                  '出圈顺序存放
i = k - 1
s = "出圈顺序为："
Do While n > 1
       i = i + 1
       m = m - 1
       If    ③ Then
         s = s + Str(b(i)) + ","
         For j = i To n - 1
            b(j) = b(j + 1)
         Next j
         b(j) = 0
         n = n - 1
         i = i - 1
         m = 4
      End If
      If i = n Then i = 0
Loop
chuquan =        ④
End Function
①
②
③
④

查看试题解析