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

一、选择题（本大题共12小题，每小题2分，共24分．每小题列出的四个备选项中只有一个是符合题目要求的，不选、多选、错选均不得分）

• 1．下列一般能作为OCR软件识别对象的文件是（　　）

  A．

  B．

  C．

  D．
  组卷：5引用：1难度：0.9

  解析

• 2．小明用Fox Mail软件帮助自己管理电子邮件，但是他发现能收到邮件却发送不了，最有可能出问题的协议是（　　）

  A．HTTP

  B．FTP

  C．SMTP

  D．POP3
  组卷：7引用：2难度：0.9

  解析

• 3．某Flash作品的部分编辑界面如图所示：
  
  以下说法正确的是（　　）

  A．按钮图层中的25帧设置了脚本

  B．测试影片时，标题图层中的内容无法显示

  C．背景音乐从第1帧开始播放

  D．整段动画播放时间约为2秒
  组卷：8引用：2难度：0.9

  解析

• 4．下列关于Access数据库说法正确的是（　　）

  A．在设计数据表时，电话号码字段类型必须为“数字”

  B．Access是一个大型数据库系统，广泛用于企业级数据管理中

  C．一个数据库中可以包含若干张数据表

  D．打开某数据表后发现共有5列，则该表应有5条记录
  组卷：16引用：2难度：0.5

  解析

• 5．某Access数据表如图所示：
  
  以下说法不正确的是（　　）

  A．该数据表记录数共有123条

  B．“借阅片名”的字段类型为“文本”

  C．该数据表名称为“读者借书．accdb”

  D．当前编辑的记录是第8条
  组卷：8引用：2难度：0.9

  解析

二、非选择题（本大题共5小题，其中第13小题4分，第14小题5分，第15小题8分，第16小题4分，第17小题5分，共26分）

• 16．用VB编写的函数bubble_sort是一个用冒泡方法实现排序的函数，其调用时需要三个参数：布尔类型参数sx来确定是升序还是降序，sx为True时为升序，否则为降序；整数型数组a

   

  是待排序的数据，数据从a（1）开始存放；整数型参数n表示传入的数组长度，该函数的返回值也是一个整数型数组．所以调用此函数实现排序非常方便：
  比如有一个整数型数组a（1 to 10）需要降序排序，可以直接这样调用：
  a

   

  =bubble_sort（False,a

   

  ，10）
  该函数VB代码如下：
  Function bubble_sort（sx As Boolean,a

   

   As Integer,n As Integer） As Integer

   

  
  Dim i,j,t As Integer
  For i=1 To n-1
  For j=

   

  Step-1
  If

   

  Then
  If a（j）＜a（j-1）Then t=a（j）：a（j）=a（j-1）：a（j-1）=t
  Else
  If a（j）＞a（j-1）Then t=a（j）：a（j）=a（j-1）：a（j-1）=t
  End If
  Next j
  Next i
  bubble_sort=a

   

  
  End Function
  请将代码补充完整：
  ①

   

  ．
  ②

   

  ．
  组卷：23引用：2难度：0.3

  解析

• 17．丢失的成绩．某校运动会上，高一男子100米决赛的成绩已出，前8名的成绩记录单由于不小心丢失一张，只剩下7个成绩，分别是（单位：秒）11.5，11.8，12.1，12.5，13.1，13.5，13.9．后来找到了，需将找到的成绩插入相应的位置，使数据序列仍保持有序，并求出该成绩的名次．
  为实现这一目标，设计如下VB程序，界面如图所示：先输入7位选手成绩，自动将成绩从小到大排序后输出到列表框List1中．输入丢失成绩后，点击“插入”按钮将该成绩添加到适当位置并输出选手成绩到List2中，并在Label4中显示该成绩的名次．
  
  实现上述功能的VB程序如下，请完成以下问题：
  Dim a（1To 8）As Single
  Dim n As Integer,i As Integer,x As Single
  Private Sub Form_Load （　　）
  Dim j As Integer,temp As Single
  ’输入7位选手100米成绩，代码略
  ’将7位选手成绩从小到大排序
  For i=1To 6
  For j=7To i+1Step-1
  If a（j）＜a（j-1）Then
  temp=a（j）
  a（j）=a（j-1）
  a（j-1）=temp
  End If
  Next j
  Next i
  ’将排序好的选手成绩输出到列表框List1
  List1．Clear
  For i=1To 7
  List1．AddItem Str（a（i））
  Next i
  End Sub
  Private Sub Command1_Click （　　）’确定该遗漏选手的成绩排名第几位？
  x=Val（Text1．Text）
  i=1
  Do While x＞a（i）
  ①
  Loop
  Label4．Caption=“该选手位列第”+Str（i）+“名！”
  ’将该遗漏选手成绩添加到适当位置，使数组仍保持有序并输出到列表框List2
  For j=8To i+1Step-1
  a（j）=a（j-1）
  Next j
  ②
  For i=1To 8
  List2．AddItem a（i）
  Next i
  End Sub
  （1）Form Load事件处理过程中代码采用的算法是

   

  （选择排序/插入排序/冒泡排序）
  （2）①处代码应为：

   

  ．
  ②处代码应为：

   

  ．
  组卷：6引用：1难度：0.1

  解析