2015-2016学年浙江省台州市书生中学高二（下）期中信息技术试卷

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

• 1．今天是英语老师的生日，但她已回英国了，李明随即制作了一张贺卡，并通过电子邮件发给她．如果英语老师的电脑关机一个星期，那么电子邮件将（　　）

  A．退给李明

  B．由于关机时间太长，因此丢失

  C．保存在邮件服务器上

  D．检测英语老师电脑有没有开机，一旦开启立即发到她电脑中
  组卷：8引用：3难度：0.9

  解析

• 2．汉字“学”的区位码为4907（十进制），如果用2个字节的二进制可以表示为00110001 00000111．某汉字的处理码是将区位码的区号49和位号07分别加上160（十进制） （ 即二进制10100000），则汉字“学”的处理码用十六进制表示为（　　）

  A．D1A7H

  B．A7D1H

  C．4531H

  D．2751H
  组卷：4引用：4难度：0.9

  解析

• 3．赠花卿诗句在Word软件中修订结果如图所示，则未修改前诗句为（　　）
  

  A．锦城斯管日纷纷，半入江风半入江．此曲只天上有，人间能得几回闻

  B．锦城丝管日纷纷，半入江风半入江．此曲只应天上有，人间能得几回闻

  C．锦城斯管日纷纷，半入江风半入江．此曲只应天上有，人间能得几回闻

  D．锦城丝管日纷纷，半入江风半入江．此曲只天上有，人间能得几回闻
  组卷：3引用：1难度：0.9

  解析

• 4．某Access数据表打开后如图所示：下列描述中正确的是（　　）
  

  A．该数据表中共有10条记录

  B．“序号”字段的类型是数字型

  C．该数据库的名称是“商品销售登记1．accdb”

  D．删除第6条记录后，“序号”字段的“6”将无法重新生成
  组卷：4引用：2难度：0.7

  解析

• 5．某同学利用视频处理软件制作了一段视频，未压缩前该视频信息的基本属性如下：PAL制，分辨率为640×480，帧频为25fps,色深为24位，则以下理解正确的是（　　）

  A．该视频未压缩时每秒钟播放的数据量约为21.97MB

  B．该视频每帧彩色图象的色彩数为24种

  C．该视频压缩时可以利用JPEG压缩标准使数据量大大减小

  D．该视频只能在屏幕宽高比为640：480的显示器上播放
  组卷：4引用：3难度：0.9

  解析

• 6．小顶使用GoldWave软件处理名为a.wav的双声道音频，他删除了右声道中的声音，并按原采样频率、量化位数和声道数以a1．wav为文件名保存．试问a1．wav与a.wav相比，存储容量（　　）

  A．不变

  B．减小一半

  C．增大

  D．减小 1 3
  组卷：8引用：4难度：0.9

  解析

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

• 17．小明设计了一个VB程序解决如下数学趣味问题：已知三个正整数a,b,c.现有一个大于1的整数x,将其作为除数分别除a,b,c,得到的余数相同．求满足上述条件的x的最小值是多少？程序界面如图所示，在文本框text1中输入a的值，在文本框text2中输入b的值，在文本框text3中输入c的值，点击“求解”按钮，在2到三个数中的最小值之间，逐个检测是否存在符合条件的值．如果存在符合条件的值，则在文本框text4中输出结果，如果不存在，则在文本框text4中输出“找不到符合条件的值”．实现上述功能的程序如下，请在横线处填入合适的代码．
  Private Sub Command1_Click （　　）
  Dim a As Long,b As Long,c As Long
  Dim d As Long,min As Long
  '处理3个输入数据，并求出3个数的最小值
  a=Val（Text1．Text）
  b=Val（Text2．Text）
  c=Val（Text3．Text）
  min=①
  '在2到三个数中的最小值之间，逐个检测
  是否存在符合条件的值
  d=2
  x=0
  Do While d＜=min And x=0
  If ISOK（a,b,c,d） Then x=d
  ②
  Loop
  If x=0Then
  Text4．Text=“找不到符合条件的值“
  Else
  Text4．Text=Str（x）
  End If
  End Sub
  '求三个数的最小值
  Public Function GetMin（x As Long,y As Long,z As Long） As Long
  If x＞y Then GetMin=y Else GetMin=x
  If z＜GetMin Then GetMin=z
  End Function
  '判断前3个参数除第4参数的余数是否都相等
  Public Function ISOK（x As Long,y As Long,z As Long,cs As Long） As Boolean
  ③
  If x Mod cs＜＞y Mod cs Then ISOK=False
  If x Mod cs＜＞z Mod cs Then ISOK=False
  If y Mod cs＜＞y Mod cs Then ISOK=False
  End Function
  程序横线处应填入的代码是：
  ①

   

  
  ②

   

  
  ③

   

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

  解析

• 18．用VB编写一个字符串分行程序，功能如下：单击“分行”按钮Command1将文本框Text1中的英文文本在列表框List1中分行显示（分行时单词不得跨行，每行字符尽可能多但不超过40个）并在标签Label1中输出总行数，运行效果如图所示．分行算法如下：
  （1）将文本框中的字符串保存到变量s中；
  （2）当s中字符个数超过40时，循环执行下列①、②、③步，否则跳转到（3）：
  ①如果第41个字符不是英文字母，则分行位置p=40；否则，向左逐个查找，直至找到第一个非英文字母，将其位置作为分行位置p；
  ②截取s的前p个字符，作为新增行显示在列表框List1中，同时总行数加1；
  ③将s中未分行部分重新赋值给变量s.
  （3）将s作为新增行显示在列表框List1中，同时总行数加1．
  
  实现上述功能的VB程序如下，请在空格处填入合适代码．
  Private Sub Commandl_Click （　　）
  Dim s As String,c As String
  Dim r As Integer,total As Integer,p As Integer
  total=0
  s=①

   

  
  Do While Len（s）＞40
  r=41
  c=Mid（s,r,1）
  If  Not（（c＞=“a“And c＜=“z“） Or （c＞=“A“Andc＜=“Z“）） Then
  p=40
  Else
  ’从第41个字符开始向左找到第1个非英文字母，并将其位置值赋给p
  Do While （c＞=“a“And c＜=“z“） Or （c＞=“A“
  And c＜=“Z“）
  r=②

   

  
  c=Mid（s,r,1）
  Loop
  p=r
  End If
  List1．Addltem  Mid（s,1，p）
  total=total+1
  s=③

   

  
  Loop
  List1．AddItem  s
  total=total+1
  Labell.Caption=“共“+Str（total）+“行“
  End Sub.
  组卷：8引用：3难度：0.1

  解析