2017年浙江省杭州市萧山区高考信息技术模拟试卷（1）

一、选择题（本大题共9小题，每小题2分，共24分．在每小题给出的四个选项中，只有一个符合题目要求）

• 1．下列有关信息和信息技术的说法中，不正确的是（　　）

  A．为了保证计算机中信息的安全，需要定期的对计算机进行格式化

  B．数据库在我们生活中有广泛的应用，包括搜索引擎的使用、校园一卡通系统等

  C．计算机是一种信息处理工具，它能帮助我们更加高效地处理和加工信息的前提是信息的数字化

  D．小明把资料保存在U盘中，U盘的意外损坏导致存储的信息全部丢失，这说明信息的储存必须依附于某种载体
  组卷：5引用：1难度：0.9

  解析

• 2．如图所示为使用IE浏览器浏览某网页的部分截图，则下列说法不正确的是（　　）
  

  A．http://news.qq.jye.ai/a/20160531/048095．htm是一个网址

  B．http是超文本传输协议，输入的时候可省略

  C．单击按钮  ，将收藏当前浏览的网页

  D．单击按钮  ，可以查看历史记录
  组卷：7引用：1难度：0.9

  解析

• 3．小明请王老师帮忙修改他们小组的研究性学习报告（DOCX格式），部分界面如图所示：
  
  以下说法中正确的是（　　）

  A．当前图片的环绕方式是上下型

  B．该处文档中添加了2个批注

  C．批注内容的字体和字号是不可以设置的

  D．只有文字才能添加批注，图片是不能添加批注的
  组卷：11引用：1难度：0.9

  解析

• 4．在“资料”数据库中，小明建立“藏书”数据表并输入数据的操作步骤如下：
  ①填写字段名、设置字段类型
  ②切换到“设计”视图
  ③保存、命名数据表
  ④添加新记录
  则正确的顺序应该是（　　）

  A．①②③④

  B．②①④③

  C．②①③④

  D．①②④③
  组卷：6引用：2难度：0.9

  解析

• 5．有如下VB程序段：
  Private Sub Command1_Click（　　）
  Dim i As Integer,x As Integer
  x=1
  For i=1To 5Step 2
  x=x+i
  Text1．Text=Str（x）
  Next i
  End Sub
  则该程序运行后，文本框Text1中显示的数据个数是（　　）

  A．1个

  B．2个

  C．3个

  D．5个
  组卷：9引用：1难度：0.5

  解析

【加试题】

• 15．n个数从小到大选择排序需要经过n-1遍加工，每遍加工从未排序的数据元素中找出最小的元素与当前元素进行交换．小天同学学习了选择排序算法和函数的知识后，编写了一个VB程序，功能如下：运行程序时首先在列表框List1中显示10个不小于10且不大于99的随机自然数，单击“排序”按钮Command1后，在列表框List2中显示这些数据按从小到大排序后的结果，运行结果如图所示．
  实现上述功能的VB代码如下，但加框处有错，请改正．
  Dim a（1 To 10）As Integer'定义数组a
  Private Sub Form_Load （　　）
    Randomize
    For i=1 To 10'产生10个不小于10且不大于99的随机自然数，并依次存放在数组a中
      a（i）=Int（Rnd*100）'①
      List1．AddItem Str（a（i））
    Next i
  End Sub
  'Find_min函数寻找与当前元素a（x）需要交换的数组元素下标
  Function Find_min（x As Integer）
    Dim k As Integer,j As Integer
    k=x
    For j=x+1 To 10
      If a（j）＜a（k） Then k=j
    Next j
    Find_min=k
  End Function
   Private Sub Command1_Click （　　）
    Dim i As Integer,k As Integer,t As Integer
    For i=1 To 9
      k=Find_min（i+1）'②
      If k＜＞i Then
        t=a（i）：a（i）=a（k）：a（k）=t
      End If
    Next i
    For i=1 To 10
       List2．AddItem Str（a（i））
    Next i
  End Sub
  （1）加框处①有错，应改为

   

  
  （2）加框处②有错，应改为

   

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

  解析

• 16．某学校开设多样化选修课程，学生可以根据个人兴趣和特长选择选修课．假设每门选修课的选课人数不超过40，学生选课的相关信息存放在数据库文件“student.jye.ai”的data表中，选课查询程序运行时界面如图所示．
  程序功能：在文本框Text1中输入课程号，单击“查询”按钮Command1，在列表框List1中显示选修本课程的名学生信息．如果没有找到，在列表框中显示“该课程当前无人报名”．按此要求将程序补充完整．
   
   Private Sub command1_click （　　）
  Dim xh（1 to 40），xm（1 to 40）As String'学号和姓名的数组
  Dim i,num as integer
  Dim conn As New ADODB．Connection,rs As New ADODB．Recordset
  Dim strSQL As String
  conn.ConnectionString=“Provider=Microsoft.ACE．OLEDB.12.0；Data Source=“+App.Path+“\student.jye.ai“'打开到数据库的链接
   conn.Open
  strSQL=“select xh,xm from data where'课程=&（Text1．Text） &'“'设置查询的SQL语句
   Set rs.ActiveConnection=conn'设置rs的ActiveConnection属性，指定与其关联的数据库链接
    rs.Open strSQL'打开记录集，将从表student中读取的结果集保存到记录集rs中
    List1．Clear
  num=0
  Do while not rs.EOF①
        xh（num）=rs.Fields（“xh“）
        xm（num）=rs.Fields（“xm“）
    rs.MoveNext
  loop
  rs.Close
    conn.close
  set rs=nothing
  set conn=nothing
  For  i=1 to num
  ②
  Next i
  if num=0 then list1．additem（“该课程当前无人报名“）
  End Sub
  （1）改程序打开数据库链接的数据库名是

   

  
  （2）程序中①横线处应填入

   

  
  （3）程序中②横线处应填入

   

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

  解析