高三信息技术模拟试卷二(含答案)

高三信息技术模拟试卷二
一、选择题（本大题共12小题，每小题2分，共24分。

在每小题给出的四个选项中，只有一个符
合题目要求）
1．某款玩具机器人，具有阅读故事、语音对话、中英文翻译、数据存储等功能。

比如，当小朋友按住“对话”按钮说“10分钟后提醒我”，机器人将在10分钟后进行闹铃提醒。

该款机器人主要应用了下列哪种技术( ）
A. 光电子技术
B.人工智能技术
C.多媒体通讯技术
D.遥感技术
2．下列途径：①在flash软件中导出②用扫描仪扫描③用“录音机”录制④用“记事本”软件导出。

能获取图片素材的是( ）
A.①②
B. ②③
C. ②④
D. ①④
3．让收件人从电子邮箱中将电子邮件读到他的本地计算机上的协议是( ）
A．SMTP B．HTTP C．POP3 D．HTML
4. 关于Access数据表的操作，下列说法正确的是（）
A. 新增记录，不会对已有记录的字段值产生影响
B. 在数据表视图中，不可以对字段名进行重命名
C. 数据库文件名称不能和它的数据表名相同
D. Access数据库文件可以设置密码，这样数据库就无法共享
1
2018年高考模拟试卷技术卷第页共14 页
2
5. 某算法流程图如图5所示。

执行该算法，当s 的值为0时 （ ）
A ．k 的值为10
B ．程序出错
C ．语句“k ＝k ＋1”共被执行了2次
D ．输出k 的值
6. 某十进制数X 转换为4位二进制数为“”，其中有两位数字不清楚，则有关该数说法不正确．．．的是（ ） A. X 一定是奇数 B. X 的最大值为（16）10
C.若将X 和X+1分别转换为二进制数，两者数字位数不同，则X 的值为（F ）16
D.在该二进制数的末尾再添加一个“0”，则得到的新值一定是X 的2倍
7.下图是制作某flash 作品时的截图，从图中可知，“背景”图层中的背景图片仅在第1帧到第20帧出现，若要使背景图片一直延续到第45帧，可在该图层的第21帧上进行的操作是
A ．清除关键帧
B ．删除帧
C ．清除帧
D ．插入帧
8、下列对photoshop 操作说法正确的是
A.“图1”图层可以实现”自由变换”操作
B.背景图层可以添加图层样式
C.“图1”图层有部分锁定，因此无法隐藏
D.当前状态下，两个图层可以交换位置
9、某音频通过goldwave 软件进行了处理，界面如下
图5
3
下列说法正确的是
A.若在当前状态下执行插入5秒静音，按原参数保存，其文件大小不变
B.该音频每秒采样44100个点，每个采样点需要16位存储
C.该音频开始时加入了淡入效果
D.若在当前状态下执行删除操作，按原参数保存，文件大小约为1.72MB
10.【加试题】某BMP 图像文件属性如题10图所示，将其压缩成JPG 格式后，文件大小为
167KB ，则其压缩比约为（ ） A. 2:1 B. 4:1 C. 6:1 D. 8:1
题10图
11.【加试题】小王要对字符串“welcome ”进行重新排列，程序界面如题11图所示，则该程序执行后文本框 Text2 中显示的结果为（ ） Private Sub Command2_Click() Dim a(1 To 7) As String Dim i, j, t2, m,cd As Integer Dim s, t, p As String s = Text1.text cd=Len(s) For m = 1 To cd a(m) = Mid(s, m, 1) Next m
For i = 1 To 2 题11图
For j = cd To i + 1 Step -1
If a(j) < a(j - 1) Then t = a(j): a(j) = a(j - 1): a(j - 1) = t
Next j
Next i
For t2 = 1 To cd
p = p + a(t2)
Next t2
Text2.Text = p
End Sub
A．welcome B．ceelmow C． cewelmo D．womleec
12.【加试题】某查找算法的 VB 程序段如下：
i = 1: j = 7: n = 0
Key = Val(Text1.Text)
Do While i <= j
n = n + 1
m = Int((i + j) / 2)
If Key = a(m) Then Exit Do
If Key < a(m) Then j = m - 1 Else i = m + 1
Loop
数组元素 a(1)到 a(7)存放的数值依次为 8，21，27，36，79，28，98，若该程序段运行结束后，n 的值为 2，则 Text1 中输入的要查找的数是（）
A. 27 或 79
B.28
C.21 或 28
D. 21
二、非选择题（本大题共5小题，其中第13小题4分，第14小题5分，第15小题8分，
第16小题3分，第17小题6分，共26分）
13. 小明用Excel统计某中小学教育资源平台应用情况，数据表如第13题图1所示。

请回答下列问题：
（1）J3单元格中的公式是通过复制H3单元格得到的，则J3中的公式为。

4
5
（2）现要将高中的所有学校按“活跃空间比率”进行降序排列，排序对话框如第13题图2所示。

则应选择排序的数据区域为 。

（3）小明利用第13题图1中数据制作了第13题图3所示的图表。

该图表的数据区域
为 。

（4）小王对表格数据进行了筛选操作，筛选操作截图如第13题图4所示。

筛选以后显示的记录
有 条。

第13题图2
第13题图3
第13题图1
6
14、数字频率统计：小王编写 V B 程序，实现如下功能：在文本框 中输入一串任
意 字符串（含数字），单击“统计”按钮 C ommand1，在列表框 L ist1 中统计并输出数字 0~9 出现的次数。

运行界面如图所示，VB 程序代码如下。

（1）根据代码可知，，文本框对象的名称为 。

(2 )为实现上述功能，请在划线处填入合适的代码。

Private Sub Command1_Click() Dim a(0 To 9) As Integer, s As String Dim k As String, i As Integer s = Tabc.Text List1.Clear
For i = 1 To Len(s)
①
If k >= "0" And k <= "9" Then
② S=k+s End If Next i
For i = 0 To 9
List1.AddItem Str(i) & "出现了:" & a(i) & "
第13
题图4
次"
Next i
End Sub
(3)、如果输入的是“hello 8102!” ,执行完以上程序后，变量S的值为________ 15．愚人节马上到了，小新打算制作一个“愚人节攻略”的动画，他先用Photoshop CS5制作了
三个场景所需的图片素材，然后根据自己制定的脚本来制作flash动画，脚本如下：
第15题-1图
7
8
第15题-2图
第15题-3图
请回答下列问题：
（1）小新在使用Photoshop CS5的过程中，将卡通小妹复制到“卡通小妹”图层后，发现该图层图像过大，不符合图片的比例，如第15题-1图所示，她利用编辑菜单里的_______（选填：图像大小/画布大小/自由变换）功能将其等比例缩小了70%，得到了自己满意的比例。

（2）小新将“相框”图像复制到“相框”图层，发现相框并没有显示出来，结合第15题-1图分析原因：________________________。

（3）“文字1”出现一闪一闪的效果，说明对该文字“颜色”属性的值设置了0%—100%的变化。

（4）在执行“测试影片”命令时，发现播“卡通小妹”出现后便消失了，不符合脚本要求，观察第15题-2图分析如何改正：______________________________。

（5）在执行“测试影片”命令时，出现了如第15题-3图这样的错误，说明被设置动作命gotoAndPlay("main", 1)；的对象是___________（选填：场景/图层/帧/按钮）,根据脚本要求，正确的动作命令应设置为_________________________________________。

16.【加试题】某校秋季运动会共n名运动员参赛，高老师编写了一个运动会号码牌查询软件，输入号码牌就能查询该号码牌所属的班级和运动员姓名。

数组hm、bj、xm分别保存了本次运动会所有运动员的号码牌、所在班级和姓名的信息。

第i个选手的号码牌保存在a(i)中，对应的班级和姓名保存在bj(i)和xm (i)中。

运动会号码牌查询程序界面如第16题图所示，在文本框Text1中输入号码牌，单击“查询”按钮（Command1），电脑就开始查找该号码牌的信息，如果找到对应的信息，就显示该运动员所属班级和姓名，如果没有找到，则显示“没有该号码牌的信息”。

第16题图
相应程序如下，在程序①和②划线处填入适当的语句和代码，把程序补充完整。

（1）学生运动会数据存入的数据库文件是；
（2）在程序画线①处应填入；
（3）在程序画线②处应填入。

Dim n As Integer ‘运动员人数
9
Dim hm(1000) As Integer, bj(1000) As String, xm(1000) As String
Private Sub Form_Load()
Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
conn.ConnectionString = "Provider = Microsoft.Jet.OLEDB.4.0;DATA Source=" & App.Path & "\games.accdb"
conn.Open
strSQL = "SELECT * FROM Student"
Set rs.ActiveConnection = conn
rs.Open strSQL
n = 0
Do While Not rs.EOF '到记录集最后一条记录后退出循环
n = n + 1 '计数
hm(n) = rs.Fields("号码")
bj(n) = rs.Fields("班级")
xm(n) = rs.Fields("姓名")
rs.MoveNext '移动到下一条记录
Loop
‘用冒泡排序法按a数组（号码牌）升序排列，显示在列表框List1中，代码略。

End Sub
Private Sub Command1_Click()
Dim w As Integer
w = Val(Text1.Text)
pos = ①
If pos > 0 Then
Text2.Text = bj(pos)
Text3.Text = xm(pos)
Else
Text2.Text = "找不到"
End If
End Sub
Function Search(Key As Integer) As Integer
Dim i As Integer, j As Integer,
i = 1
j = n
Do While i <= j
found = Fix((i + j) / 2)
10
If Key = a(found) Then
Search = found
Exit Function
ElseIf ② Then
j = found - 1
Else
i = found + 1
End If
Loop
Search = 0
End Function
17.【加试题】某同学设计了一个VB程序用于分析“纸牌游戏”中发到手的牌的信息，各牌面值在程序中的输入值和输出值如图所示。

程序运行界面如图所示，在文本框Text1中输入数字代表玩家手中的牌的信息，点击“分析”按钮后，在列表框list1按牌面值顺序输出各中牌的相关信息。

请回答下列问题：
（1）在打牌中5张以上的连续牌称为顺子，若输入的牌是“8991012141511610113”，则这些牌中的顺子是（使用上图中“输出值”表示各种牌）:____________________
（2）请在划线处填上合适的代码。

Private Sub Command1_Click()
Dim zpAs String, pai As String, t As String
Dim a(1 To 50) As Integer, b(3 To 15) As Integer
‘a数组存储按序输入的各个牌，b数组存储每个牌型（3~10，JQKA2）的数量
Dim i As Integer, c As Integer, k As Integer, flag As Boolean
Const s = "34567890JQKA2" '输出牌型，牌10用0代替
zp= Text1.Text
i = 1: c = 1: flag = True
Do While i <= Len(zp) And flag = True
pai = Mid(zp, i, 1)
If pai >= "3" And pai <= "9" Then
a(c) = Val(pai): i = i + 1
11
ElseIf pai = "1" Then ‘要用2位数字代表某个牌k = ①
If k >= 10 And k <= 15 Then
a(c) = k
i = i + 2
Else
flag = False
End If
Else
flag = False
End If
c=c+1
Loop
If flag = False Then
List1.AddItem "输入数据有误"
Else
For i = 1 To c -1 '洗牌，统计每个牌型的张数
Next i
List1.AddItem "共有" + Str(c -1) + "张牌"
For i = 1 To _ ③ __
t = ""
输出每个牌型及其数量
t = t + Mid(s, i, 1)
Next k
If Len(t) > 0 Then List1.AddItem t
Next i
End If
End Sub
高三信息技术模拟试卷二
评分标准
12
一、选择题（每小题2分，共24分）
题号 1 2 3 4 5 6 7 8 9 10 11 12 答案 B A C A D B A A B A C D 二、非选择题（本大题共5 小题，其中第13 小题4 分，第14 小题5 分，第15 小题8 分，第16 小题4分，第17 小题5分，共26 分）
13．（1） =I3/$C3 （1分）
（2） B3:J7 （1分）
（3） B2:C2,B8:C13,G2,G8:G13 （1分）
（4） 2 （1分）
14、①Tabc （1 分）
②k=mid(s,I,1) （1分）
③a(val(k))= a(val(k))+1 （2分）
2018 （1分）
15.
（1）自由变换（1分）
（2）相框图层的不透明度为0% （1分）
（3）Alpha （1分）
（4）选中“卡通小妹”图层的第40帧，右键插入帧或关键帧。

（2分）
（5）按钮（1分）on（release）｛gotoandplay（“main”，1）;｝（2分）
16.（1） games.accdb (1分)
（2） Search(w) (2分)
(3) Key < hm(found) (1分)
17．（1）890JQ （1分）
（2）①Val(Mid(zp, i, 2))或Val(Mid(text1.text, i, 2))（2分）
②b(a(i)) = b(a(i)) + 1（2分）
③13或len(s) （1分）
13。