2017年浙江省宁波市高考信息技术试卷

一．选择题（每题2分）

• 1．市民首次登录iNingbo免费WIFI热点，需要用手机获取验证码并注册，对验证码进行验证并判定是否注册成功这一过程属于（　　）

  A．信息的采集

  B．信息的存储

  C．信息的处理

  D．信息的发布
  组卷：9引用：2难度：0.9

  解析

• 2．用Word软件编辑某文档，部分界面如图所示． 下列有关图中批注与修订的说法，不正确的是（　　）

  A．若删除批注，则“明代”两字不被删除

  B．若删除“选自《山海关》”几个字，则批注框不被删除

  C．若接受所有修订，正文中将不出现“雄伟的”三字

  D．若执行①处的“拒绝插入”命令，正文中的“崇山”将变成“高山”
  组卷：10引用：1难度：0.9

  解析

• 3．某网页包含下列元素：①文字②图片③超链接④动画⑤背景音乐，保存网页时部分界面如图所示，则保存下来的网页内容包含（　　）   

  A．①②

  B．①③

  C．②⑤

  D．③④
  组卷：7引用：1难度：0.9

  解析

• 4．使用Access软件创建一张数据表，其设计视图如图所示．在数据表视图录入数据时，下列操作能实现的是 （　　）
  

  A．在“唱片编号”字段中输入“CD-10001”

  B．在“CD唱片类型”字段中输入“是”

  C．在“购买日期”字段中输入“2015\12\25”

  D．在“唱片简介”字段中输入“这是一张有传奇声誉的CD”
  组卷：7引用：1难度：0.9

  解析

• 5．某算法的部分流程图如图所示，执行该算法，输出S的结果是（　　）

  A．0

  B．8

  C．10

  D．15
  组卷：8引用：8难度：0.7

  解析

二．非选择题

• 16．用VB编写程序，在文本框Text1中输入任意字符串s,统计s中数字字符串的数值和（如输入字符串“ab123dr34fg9de”则输出166，即123+34+9=166．）并在Labe13输出结果．程序设计界面如下：
  根据算法将下列程序补充完整．
  Private Sub Command1_Click（　　）
  Dim s As String,ch As String,s As Integer
  Dim ch2 As String,sum As Double
  Dim n As Integer,i As Integer
  s=Text1．Text
  

   

  
  i=1；sun=0
  Do While i=n
  ch=Mid（s,i,1）
  If ch＞=“0“And ch＜=“9“Then
  j=i
  ch2=Mid（s,j,1）
  Do While ch2＞=“0“And ch2“9“
  j=j+1
  ch2=Mid（s,j,1）
  Loop
  sum=sum+
  

   

  
  i=j
  End If
  i=i+1
  Loop
  Label3．Caption=Str（sum）
  End Sub.
  组卷：15引用：3难度：0.1

  解析

• 17．某字符串（字节数为3的倍数）编码规则如下：（1）将该字符串内码分成3个字节一组，顺次连接后得到24位二进制数；
  （2）将得到的24位二进制数字分成4组，每组6个位；
  （3）在每组数字前补上两个0，得到4个字节的二进制数；
  （4）将（3）中得到的四个二进制数分别转化为十进制数；
  （5）将每个十进制数转换为1个加密字符，对应的“密码表”按数值由小到大依次为“ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/”
  小明按照上述方法，设计了一个字符串（仅包含ASCⅡ字符）加密的VB程序，功能如下：单击“加密按钮”Command1，程序依次将文本框Text1中每3个字符的ASCⅡ码值按编码规则转换为四个加密字符，连接这些加密字符，最后在文本框Text2中输出加密结果．程序运行效果如图所示．
  实现上述功能的VB程序如下：
  （1）在上述加密算法步骤（4）中，得到的十进制数最大是
  （2）实现上述功能的VB程序如下．请在横线处填入合适代码．
  Function Code2Char（c As Integer）As String
  Dim s As String
  s=“ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/“
  Code2Char=

   

  
  End Function
  Private Sub Command1_Click（　　）'加密过程
  Dim n As Integer,s As Integer,i As Integer,ss As String
  Dim a1 As Integer,a2 As Integer,a3 As Integer'存储加密前字符的ASC码
  Dim b1 As Integer,b2 As Integer'分别存储分割、转换后的前两个十进制数
  Dim b3 As Integer,b4 As Integer'分别存储分割、转换后的后两个十进制数
  s=Text1．Text
  n=Len（s）
  ss=““
  For i=1 To n

   

  
  a1=Asc（Mid（s,i,1））
  a2=Asc（Mid（s,i+1，1））
  a3=Asc（Mid（s,i+2，1））
  b1=a1\4
  b2=（a1 Mod4）*4+（a2\16）
  b3=

   

  
  b4=a3 Mod 64
  ss=ss+Code2Char（b1）+Code2Char（b2）+Code2Char（b3）+Code2Char（b4）
  Next i
  Text2．Text=ss
  End Sub.
  组卷：6引用：1难度：0.1

  解析