[浙江]2015届浙江省杭州市高三下学期模拟（二）信息技术试卷

2015年春节，全国观众在喜迎春节看春晚的同时，通过“微信”及时参与到春晚活动中，与春晚直播现场互动，这说明“微信”主要是一种：（ ）

将图像a.bmp、b.bmp加工处理后得到c.bmp，如图所示：

1024*768*24b a.bmp	800*600*24b b.bmp	1024*768*24b c.bmp

则下列说法正确的是：（ ）
A．图像c.bmp的像素个数为a.bmp与b.bmp的像素个数之和
B．文件c.bmp的存储容量为a.bmp与b.bmp的存储容量之和
C．图像b.bmp与c.bmp的像素个数相等
D．文件a.bmp与c.bmp的存储容量一样大

下列选项中比十六进制数1AFFH大1的是：（ ）

小乐在使用Word2010软件的修订状态下编辑文档，部分界面如下图所示：

对于带框部分的文字，下列说法正确的是：（ ）

某网站对用户搜索的笔记本型号进行分析，被搜索的次数越多表明这款笔记本被关注越多，被搜索的次数决定了其排行榜中的位置，如图所示，这种排名采用的因特网信息资源评价方式是：（ ）

“Parkour”一词翻译成中文为“跑酷”，《地铁冲浪》就是一款流行的移动设备跑酷游戏，其软件开发团队在制作前先调查研究了用户对该产品的需求情况，这属于多媒体作品制作过程：（ ）

某中央处理器参数如下表所示：

以下说法错误的是：（ ）
A．CPU频率为3.2GHz体现了计算机运算速度快这一基本特征
B．“制作工艺22纳米”说明CPU的制造技术属于微电子技术
C．“四核心”表示这款CPU可以拆分为四个后分别使用
D．“酷睿i5 4570”指的是这款CPU的型号

下表中能用软件打开对应文件并进行编辑的是：（ ）

软件
	PhotoShop CS5	Word 2010	Access 2010	会声会影	Flash CS3
对应文件
	①	②	③	④	⑤

A．②③④   B．①③④   C．②③⑤   D．①④⑤

小陈申请了一个网银账号，登录网银账号时，要输入密码，一般情况下，如果密码输入的错误次数超过3次，那么当日网银账号将被锁定，次日自动解锁。下图是登陆网银的流程图，小陈不小心输入密码错误了2次，第3次才正确，那么她的操作流程应该是：（ ）

A．①②③①②③①②③④⑤

B．①②③①②③④⑤

C．①②③④⑤

D．①②③④⑤⑥

周敏同学利用音频处理软件对一段20秒的音频文件“伴奏.wav”进行如下操作：
①增加前10秒音频音量2dB
②将右声道设置为静音
③删除声音后5秒的音频
④保存处理后的音频文件
则处理后的音频文件与原文件的存储容量之比约为：（ ）

小西利用Access 2010软件打开畅销书列表，界面如图1所示。

请回答下列问题：
（1）如图1所示，小西在创建这个数据表时把“最新出版”字段的数据类型设置为_______（填：日期时间/自动编号/数字），这张数据表里共有___________条记录。
（2）小西将所有数据复制到Excel 2010工作表中并进行相关处理结果如图2所示，他想只显示所有“金额”低于30元的书籍记录，可使用_________（填：排序/筛选/查找）来实现。

（3）如图2所示，小西为了计算表中书籍的平均价格，在D12单元格中输入“AVERAGE(D2:D11)”并确认后，D12单元格中显示的结果为____________。

（4）小西想更加直观的分析下各款图书的价格对比情况，建立了如图3所示的柱形图。从图中可以看出该图表的源数据区域是____________________。

现要求编写VB程序（界面如图1所示），实现下列功能：计算一个大写字母在26个字母中的位次。程序运行时，在文本框Text1中输入一个大写英文字母，单击“计算”按钮Command1，在标签Label1上输出其在26个字母中的位次。

（1）在进行应用程序界面设计时，需要添加“计算”按钮，可使用如图2所示的“控件工具箱”中的_______________（填写相应编号），并在如图3所示的“属性窗口”中，将__________属性值设置为“计算”。
  
（2）该程序的源代码如下，请根据题意将代码中①处补充完整，使程序能正常运行。
Private Sub Command1_Click()
Dim ch As String, pos As Integer
       ①      = Text1.Text
pos =" Asc(ch)" – 64
Label2.Caption = "第" + Str(pos) + "个字母"
End Sub

羊年已经来到，小周同学利用Photoshop CS5制作了羊年新春贺卡赠送亲友，效果图如图1所示，图层窗口如图2所示，请回答下列问题

（1）“谨贺”图层所在的文字在效果图中显示偏小，可通过_______________（填：图像大小/自由变换/画布大小）命令的操作对该图层的图像进行适当的放大。
（2）已知文字“2015年”采用的字体为“黑体”，能否使用文字工具将文字“羊年吉祥”设置为相同字体？_____________（填：能/不能）。
（3）效果图中右上角的红灯笼放置在“右灯笼”图层中，而左上角的红灯笼可通过以下几步操作得到：
①执行菜单命令【编辑】→【变换】→【水平翻转】
②复制“右灯笼”图层，得到一个新的图层，重命名为“左灯笼”
③将翻转后的新图像移动左上角适当位置
④选择“左灯笼”为当前层
请写出正确的操作步骤次序___________________________________。

为了迎接一年一度的元宵佳节，小周同学使用Flash CS3软件制作了主题为“闹元宵”的多场景动画，某个场景制作界面如图所示，请回答下列问题。

（1）放置在“背景人物”图层的对象在动画播放到最后一帧时消失不见了，要解决这一问题，可在“背景人物”图层的第60帧上右击，然后在快捷菜单中选择_______________（填字母：A．删除帧 /  B．清除关键帧 /  C．清除帧）。
（2）“控制”图层的最后1帧放置了“重播”按钮，若要实现鼠标按下该按钮，动画重头播放该场景，需给“重播”按钮添加动作命令_______________。

（3）“文字”图层第20到40帧上做形状补间没有成功，第20帧上舞台中的对象“愿你天天充满欢乐”如所示，可知导致该形状补间没有成功的原因_________。

若x表示能被5整除的正整数，则下面逻辑表达式的值一定为真的是：（ ）

如图所示的VB程序中，输入以下程序代码，运行后单击命令按钮Command1，出现错误的提示图是：（ ）

Private Sub Command1_Click()
Dim a(1 To 4) As Integer
Dim i As Integer
a(1) = 1
For i =" 2" To 4
a(i) =" 2" * a(i - 1) + 1
Next i
List1.AddItem Str(a(i))
End Sub

A．

B．

C．

D．

有100个大小形状一样的透明玻璃球，其中有1个玻璃球的重量轻于其他99个玻璃球，小明想利用一台无砝码的天平，运用合理的算法保证一定能找出这颗轻玻璃球的最少的次数为：（ ）

下列VB程序中，f是一个递归函数：
Private Sub Command1_Click()
Dim y As Integer
y = Val(Text1.Text)
Label1.Caption = Str(f(y))
End Sub
Function f(n As Integer) As Integer
If (n =" 1)" Or (n =" 2)" Then
f = 1
Else
f =" f(n" - 1) + f(n - 2)
End If
End Function
程序运行时，在文本框中输入8，单击命令按钮Command1后，Label1中显示的内容是：（ ）

下列VB程序运行时，单击命令按钮Command1后，文本框Text1中显示的内容是____________________。
Private Sub Command1_Click()
Dim i As Integer, c As Integer, n As Integer
c =" 0:" n = 10
For i =" 1" To 10 Step 2
If n Mod i =" 0" Then
c =" c" * i
Else
c =" c" + i
End If
Next i
Text1.Text = Str(c)
End Sub

辗转相除法，又名欧几里德算法（Euclidean algorithm），是求两个正整数最大公约数的算法。它是已知最古老的算法之一，其可追溯至3000年前。用辗转相除法来得一个分数的约分后的最简形式的算法如下：

第一步：设两数为a、b，且令a>b；
第二步：a÷b，令r为所得余数，若r=0，算法结束，b 即为最大公约数；若r>0则a←b，b←r，并返回第二步；
第三步：即为约分后的最简形式。
编写VB程序，程序运行界面如第6题图1所示，请根据算法将下列程序补充完整。
Private Sub Command1_Click()
Dim a As Integer, b As Integer, r As Integer 'a、b为分子和分母，r为最大公约数
a = Val(Text1.Text)
b = Val(Text2.Text)
If b =" 0" Then c = MsgBox("分母不能为0"): Exit Sub
'如果分母为0，则提示“分母不能为0”并退出该过程
r =         ①      
Text3.Text =" Str(a" / r)
Text4.Text =" Str(b" / r)
End Sub
Function gys(ByVal m As Integer, ByVal n As Integer) As Integer
'gys函数用于求最大公约数
Dim s As Integer
If m < n Then
t =" m:" m =" n:" n = t
End If
Do While n <> 0
s =" m" Mod n
m = n
n = s
Loop
       ②     
End Function

小明利用所学的知识帮助语文老师设计一个语文学考等级查询系统，要求如下：输入某个等级，就能查出该等级的所有学生学号和姓名，并统计出该等级学生的人数，以便语文老师方便了解学生的学考情况。语文学考成绩分A、B、C、D、E五个等级，学生信息存储在数据库文件“stugrade.accdb”的数据表“Chinese”中，数据表“Chinese”的结构如图1所示。

VB程序运行界面如图2所示，在文本框Text1中输入查询的等级，单击“查询”按钮Command1，在列表框List1中显示所有该等级的学生学号和姓名，并按照学号从小到大排序，并在标签Label2处显示学生的人数，如果人数为0,则在列表框中显示“没有该等级的学生”。按此要求编写程序如下，但加框处代码有错误，请改正。

Private Sub Command1_Click()
Dim stuna(1 To 100) As String '存放学生姓名的数组定义为stuna
Dim stunum(1 To 100) As String '存放学生学号的数组定义为stunum
Dim i As Integer, j As Integer, n As Integer
Dim t As String
'连接数据库
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim strSQL As String
cn.ConnectionString = "Provider="Microsoft.ACE.OLEDB.12.0;Data" Source=" + App.Path + "\stugrade.accdb"
cn.Open
strSQL = "select * from Chinese where 语文等级='" + Text1.Text + "'"
Set rs.ActiveConnection = cn
rs.Open strSQL
n = 0
Do While Not rs.EOF
n =" n" + 1
stuna(n) = rs.Fields("姓名").Value
stunum(n) = rs.Fields("学号").Value
rs.NextMove          '①
Loop
rs.Close
cn.Close
Set rs = Nothing
Set cn = Nothing
List1.Clear '清除列表框
If n =" 0" Then
List1.AddItem "没有该等级的学生"
Else
For i =" 1" To n - 1       '按姓名排序
For j =" n" To i + 1 Step -1
If stuna(j) < stuna(j - 1) Then       '②
t =" stunum(j):" stunum(j) =" stunum(j" - 1): stunum(j - 1) = t
t =" stuna(j):" stuna(j) =" stuna(j" - 1): stuna(j - 1) = t
End If
Next j
Next i
For i =" 1" To n
List1.AddItem stunum(i) + "  " + stuna(i)
Next i
Label2.Caption = "该等级的学生共有" + Str(n) + "名"
End If
End Sub
（1）加框处①有错，应改为____________________________。
（2）加框处②有错，应改为____________________________。