2018年浙江省温州市高考信息技术二模试卷

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

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

  A．退回到发件人的邮箱

  B．保存在 qq.jye.ai 邮件服务器上

  C．保存在家长电脑或移动终端上

  D．不断自动重发，直至家长收取该邮件
  组卷：25引用：1难度：0.9

  解析

• 2．下列关于浏览器和网页的说法，正确的是（　　）

  A．网页的超链接可以添加在文字或图片上

  B．在 IE 浏览器中清空历史记录，收藏夹中的网址被同时清空

  C．网页可能含有图片、动画等素材，故不能用记事本编辑网页

  D．网页通过 HTML 协议传输，可以通过浏览器解释执行网页文件
  组卷：27引用：3难度：0.9

  解析

• 3．ABBYY FineReady 是一款字符识别软件，打开软件，常用界面如图所示，下列说法错误的是（　　）

  A．“图象文件到 PDF”选项功能没有应用人工智能

  B．“扫描并保存为图象”选项功能应用了人工智能技术

  C．“扫描到 Microsoft Word”选项功能应用了人工智能技术

  D．“图象或 PDF 文件到 Microsoft Word”选项功能应用了人工智能技术
  组卷：14引用：1难度：0.9

  解析

• 4．使用 Access 软件打开数据库，数据表视图如图 a 所示，设计视图如图 b 所示，下列说法正确的是（　　）

  A．该数据库表名为“技术成绩。accdb”

  B．不能在当前选中记录前插入一条新记录

  C．可以添加一条新记录“陈宣甸 2 班 50 45 95”

  D．图 a 状态下可以添加一个类型为“自动编号”的字段
  组卷：32引用：3难度：0.9

  解析

• 5．某流程图如图所示。执行该算法，下面说法错误的是（　　）
  

  A．s 的值最终为-5

  B．语句“k=k+1”共执行了 4 次

  C．语句“s≤0”共判断了 5 次

  D．该算法转成 VB 代码时能用 Do 循环语句实现
  组卷：7引用：2难度：0.7

  解析

【加试题】

• 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（1To n） As Integer'生成 n 个随机数，存储在 a 数组，代码略
  Private Sub Command1_Click （　　）
  Dim i As Integer,j As Integer,t As Integer
  For i=2To 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=1To n
  List2．AddItem Str（a（i））
  Next i
  End Sub
  组卷：41引用：2难度：0.1

  解析

【加试题】

• 17．编写一个技术成绩查询的 VB 程序。程序功能如下：在文本框 Text1 中输入分数 key（0-50 的整数），单击“查询”按钮 Command1，查询出信息成绩大于等于 key 的所有记录，并以“信息”为主要关键字、“通用”为次要关键字均进行降序排序，结果输出在列表框 List2 中。运行界面如图所示。
  
  实现上述功能的 VB 程序如下，请回答下列问题：
  （1）观察图，排序后第 5 位的学生姓名是

   

  。
  （2）请在横线处填入合适的代码。
  Dim xm（1To 600）As String'存储学生姓名
  Dim xx（1To 600）As Integer'存储信息成绩
  Dim ty（1To 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 tmp1As String,tmp2As Integer
  '以“信息”为主要关键字、“通用”为次要关键字排序
  For i=1To n-1
  k=i
  For j=i+1To 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=1to③

   

  
  List2．AddItem xm（i） & vbTab & xx（i） & vbTab & ty（i）
  Next i
  End sub
  组卷：17引用：1难度：0.1

  解析