1.选择题- (共12题)
1.
二维码扫描是指通过智能手机客户端应用软件获取二维码图片中的内容和信息。小汪正在使用新浪微博手机客户端扫描二维码，如图所示。
扫描二维码这个过程体现了（ ）
扫描二维码这个过程体现了（ ）
| A．虚拟现实 | B．人工智能 | C．基于内容的检索 | D．光学字符识别 |
2.
小黄最近在信息技术课堂中学习了ASCTT码，知道了字母“a”的ASCII码为61H，好学的他想知道自己姓的首字母“H”在计算机中存储时的二进制代码为（ ）
| A．41H | B．1001000B | C．48H | D．01001000B |
3.
在WORD中输入文字“123高三<6>班加油！”，自动更正的属性面板如图所示。
则最终显示的文字内容为（ ）
则最终显示的文字内容为（ ）
| A．123高三<6>班加油！ |
| B．123高三<6>班123 |
| C．高三<6>班加油！ |
| D．加油！高三<6>班加油！ |
4.
【加试题】某视频网站只允许用户上传AVI格式视频文件，但容量限制最大只有100MB。小明有一个1分钟的视频，以下哪种参数能够上传成功（ ）
| A．画面像素800X800,24b | B．画面像素1024X600,24b |
| C．画面像素800X600,24b | D．画面像素1024X1024,16b |
”按钮的作用是（ ）
8.
【加试题】某婚礼现场，司仪邀请10位嘉宾上台赢取大礼品。采用的办法是让嘉宾按顺序掷5个骰子，如果后者的骰子数目比前者大，那么前者下台，后者继续站在台上，按照此顺序逐个进行，直到最终留在台上的嘉宾获胜。这种游戏其实采用的算法思想是（ ）
| A．冒泡排序 | B．选择排序 | C．顺序查找 | D．对分查找 |
9.
【加试题】数组a共有6个元素构成：49、45、61、46、58、57，若采用选择排序算法进行从大到小排序，则元素的比较次数和排序需要几遍才能完成（ ）
| A．15次，4遍 | B．15次，5遍 | C．30次，4遍 | D．30次，5遍 |
10.
诸老师使用Flash软件制作了一个多媒体作品，进行语法检查时出现了错误提示，如图所示。
由错误提示可以得出
由错误提示可以得出
| A．动作命令“gotoandplay（）；”不能用于按钮实例 |
| B．该动作命令添加在“场景2”场景“图层1”图层的第60帧 |
| C．动作命令书写格式有误 |
| D．“图层1”中没有按钮实例 |
12.
物理老师希望使用多媒体课件展示物理实验辅助其教学。若他要模拟带点粒子在电场中加速和偏转的现象，最合适的媒体是（ ）。在课件展示的过程中，老师和同学可以自由选择观看加速过程和偏转过程，这主要体现了多媒体技术的（ ）特征。
| A．视频、交互性 |
| B．动画、交互性 |
| C．视频、集成性 |
| D．动画、集成性 |
2.填空题- (共5题)
13.
黄同学在学完多媒体PhotoShop和Flash两款软件后想制作实际的作品，他决定用PhotoShop制作一幅以“保护野生动物”为主题的宣传海报，用Flash软件制作一个“安全文明驾驶”的多媒体作品。
首先，宣传海报的最终效果如图所示，编辑界面如图所示：
请回答下列问题：
（1）观察图中的图层窗口，图像总共有 （填字母：A、4个；B、6个；C、无法确定）图层。
（2）黄同学想使用画笔工具在“图标”图层的白色区域制作一个保护野生动物的标志，效果如图所示，结合图层窗口，她 （填：能/不能）完成标志的制作。
然后，Flash作品的“Main”场景的制作脚本如下表所示，制作界面如图所示。
请回答下列问题：
（3）根据制作脚本，当前的“场景1”场景应更名为“Main”场景，则汪洋可以选择 （填字母：
（4）结合图1中的图层面板和制作脚本，车开动的时间长度为 秒。
（5）由制作脚本可知，“开始”按钮上添加的动作命令为 。
首先，宣传海报的最终效果如图所示，编辑界面如图所示：
请回答下列问题：
（1）观察图中的图层窗口，图像总共有 （填字母：A、4个；B、6个；C、无法确定）图层。
（2）黄同学想使用画笔工具在“图标”图层的白色区域制作一个保护野生动物的标志，效果如图所示，结合图层窗口，她 （填：能/不能）完成标志的制作。
然后，Flash作品的“Main”场景的制作脚本如下表所示，制作界面如图所示。
| 模块名称：“Main”场景 | |
| 呈现方式： 1．人位于舞台上方偏右位置，车位于舞台上方偏下位子，马路位于舞台下方中央位置。 2.按下按钮，人从舞台右方渐渐移动到舞台左方；车一开始不动，后来从舞台下方渐渐移动到舞台中间。 3.“开始”按钮在舞台中央，单击按钮动画开始播放。 | 呈现顺序说明： 1.动画一开始静止，直到按下“开始”按钮，才播放。 2.当动画播放完最后一帧，跳转到该场景的第1帧播放。 |
请回答下列问题：
（3）根据制作脚本，当前的“场景1”场景应更名为“Main”场景，则汪洋可以选择 （填字母：
| A．编辑； | B．修改； | C．窗口；）菜单完成场景的重命名操作。 |
（5）由制作脚本可知，“开始”按钮上添加的动作命令为 。
14.
芳芳根据杭州市环境保护局官网提供的杭州市区及周边部分地区空气质量数据，使用Excel软件制作了一张表格，如图所示。
请回答下列问题：
（1）她在输入数据时遗漏了C6单元格中的内容。若需补充完整，单元格的内容应为 。
（2）各个地区的首要污染物都为“颗粒物PM10”，在D2单元格输入“颗粒物PM10”后，其余单元格她想通过自动填充来完成，如图所示，自动填充后，她应选择 才能获得准确的内容。
（3）在图中的D13单元格中，芳芳使用函数COUNTIF计算空气质量为二级的地区所占比例，则应在该单元格中填入的公式是 。
（COUNTIF函数的功能是：计算区域中满足给定条件的单元格的个数。使用方法为：COUNTIF（区域，条件），其中条件是以数字、表达式或文本形式定义的。如：COUNTIF(I2：I51，"优秀")是统计I2：I15区域中内容为“优秀”的单元格个数；如：COUNTIF(H2：H51，"张**")是统计H2：H15区域中内容为“张**”的单元格个数，其中“*”表示任意内容。）
请回答下列问题：
（1）她在输入数据时遗漏了C6单元格中的内容。若需补充完整，单元格的内容应为 。
（2）各个地区的首要污染物都为“颗粒物PM10”，在D2单元格输入“颗粒物PM10”后，其余单元格她想通过自动填充来完成，如图所示，自动填充后，她应选择 才能获得准确的内容。
（3）在图中的D13单元格中，芳芳使用函数COUNTIF计算空气质量为二级的地区所占比例，则应在该单元格中填入的公式是 。
（COUNTIF函数的功能是：计算区域中满足给定条件的单元格的个数。使用方法为：COUNTIF（区域，条件），其中条件是以数字、表达式或文本形式定义的。如：COUNTIF(I2：I51，"优秀")是统计I2：I15区域中内容为“优秀”的单元格个数；如：COUNTIF(H2：H51，"张**")是统计H2：H15区域中内容为“张**”的单元格个数，其中“*”表示任意内容。）
15.
编写VB程序，实现计算器的简单计算功能：通过0~9的数字和小数点符号输入计算数据，单击选择“+、-、*、/”等运算，最后点击“=”按钮在文本框Text1中显示运算结果。界面如第14题-1图所示，回答下列问题：
（1）要修改窗体的显示名称为“计算器”，应选择第14题-2图所示的 属性。
（2）为实现上述功能，输入数据是非常重要的部分，以下是数字按钮“1”中的代码，用于在Text1中输入数字“1”，请在划线处输入合适的代码。
Private Sub Command11_Click()
Dim fuhao As ① '用于存储+、-、*、/等运算符号
Dim x As Single '用于存储第一个运算数
Dim y As Single '用于存储第二个运算数
Text1.Text = ②
If fuhao = "" Then
x = Val(Text1.Text)
③
y = Val(Text1.Text)
End If
End Sub
（3）运行测试通过之后，如果想让其他人能够直接运行使用，应该生成 格式文件。
（1）要修改窗体的显示名称为“计算器”，应选择第14题-2图所示的 属性。
（2）为实现上述功能，输入数据是非常重要的部分，以下是数字按钮“1”中的代码，用于在Text1中输入数字“1”，请在划线处输入合适的代码。
Private Sub Command11_Click()
Dim fuhao As ① '用于存储+、-、*、/等运算符号
Dim x As Single '用于存储第一个运算数
Dim y As Single '用于存储第二个运算数
Text1.Text = ②
If fuhao = "" Then
x = Val(Text1.Text)
③
y = Val(Text1.Text)
End If
End Sub
（3）运行测试通过之后，如果想让其他人能够直接运行使用，应该生成 格式文件。
16.
（加试题）小明想用VB编程制作一个名次计算器，首先将同学的成绩录入到计算机中，同时存放在数组a中，显示在左边列表框中。点击“排序”按钮后，程序会将成绩从高到低依次排序显示在右边的列表框中。运行界面如图所示，请在两个划线处填入代码。
Dim a(1 To 100) As Single
Dim shu As Integer
Private Sub Command1_Click()
Dim i, j, k As Integer
Dim t As Single
For i =" 1" To shu - 1
k = i
For j =" i" + 1 To shu
If___________Then
t =" a(j):" a(j) =" a(k):" a(k) = t
End If
Next j
Next i
For i =" 1" To shu
List2.AddItem "第" & Str(i) & "名：" & Str(a(i))
Next i
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim cj As Single
If KeyAscii =" 13" Then
cj = Val(Text1.Text)
If cj > 0 Then
________
List1.AddItem Str(shu) & "：" & Str(cj)
a(shu) = cj
End If
Text1.Text = ""
End If
End Sub
Dim a(1 To 100) As Single
Dim shu As Integer
Private Sub Command1_Click()
Dim i, j, k As Integer
Dim t As Single
For i =" 1" To shu - 1
k = i
For j =" i" + 1 To shu
If___________Then
t =" a(j):" a(j) =" a(k):" a(k) = t
End If
Next j
Next i
For i =" 1" To shu
List2.AddItem "第" & Str(i) & "名：" & Str(a(i))
Next i
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim cj As Single
If KeyAscii =" 13" Then
cj = Val(Text1.Text)
If cj > 0 Then
________
List1.AddItem Str(shu) & "：" & Str(cj)
a(shu) = cj
End If
Text1.Text = ""
End If
End Sub
17.
【加试题】小王模拟超市收银机扫描商品条形码后计算总价的过程制作了一个VB程序。功能如下：在文本框Text1中输入商品条形码，按回车键后会将已经输入的条形码显示在列表框List1中，同时将商品明细显示在列表框List2中。点击按钮“计算商品总价”后，会将所有商品的总价显示在文本框Text2中。程序界面如图所示：
实现上述功能的部分VB程序如下，请在三个划线处填入合适代码。
'定义全局数组变量
Dim a(1 To 10) As Long
Dim b(1 To 10) As String
'自动加载条形码信息以及对应的商品信息
Private Sub Form_Load()
Dim i As Integer
a(1) = 503741
For i =" 2" To 10
a(i) =" a(i" - 1) + 1
Next i
b(1) = "可乐 5.00"
b(2) = "薯片 7.50"
b(3) = "牛奶 5.60"
b(4) = "橙汁 7.50"
b(5) = "面包 4.00"
b(6) = "蜂蜜 28.00"
b(7) = "蛋糕 12.00"
b(8) = "绿箭 3.50"
b(9) = "饼干 6.00"
b(10) = "雪碧 5.00"
End Sub
'输入条形码，查找条形码，并显示条形码及其对应的商品信息
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim txm As Long:
Dim i As Integer:
Dim j As Integer
txm = Val(Text1.Text)
If KeyAscii =" 13" Then
If txm >=" 503741" And txm <=" 503750" Then
List1.AddItem txm
Text1.Text = ""
i =" 1:" j = 10
Do While i <= j
①
If txm =" a(m)" Then
List2.AddItem b(m)
Exit Do
ElseIf txm > a(m) Then
i =" m" + 1
Else
②
End If
Loop
Else
MsgBox "条形码输入错误，无此商品"
Text1.Text = ""
End If
End If
End Sub
'计算所购商品的总额
Private Sub Command1_Click()
Dim i As Integer, mx As String, jg As String, sum As Single
For i =" 0" To 9
If List2.List(i) <> "" Then
mx = List2.List(i)
sum =" sum" + Mid(mx, 4)
End If
Next i
Text2.Text = ③
End Sub
实现上述功能的部分VB程序如下，请在三个划线处填入合适代码。
'定义全局数组变量
Dim a(1 To 10) As Long
Dim b(1 To 10) As String
'自动加载条形码信息以及对应的商品信息
Private Sub Form_Load()
Dim i As Integer
a(1) = 503741
For i =" 2" To 10
a(i) =" a(i" - 1) + 1
Next i
b(1) = "可乐 5.00"
b(2) = "薯片 7.50"
b(3) = "牛奶 5.60"
b(4) = "橙汁 7.50"
b(5) = "面包 4.00"
b(6) = "蜂蜜 28.00"
b(7) = "蛋糕 12.00"
b(8) = "绿箭 3.50"
b(9) = "饼干 6.00"
b(10) = "雪碧 5.00"
End Sub
'输入条形码，查找条形码，并显示条形码及其对应的商品信息
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim txm As Long:
Dim i As Integer:
Dim j As Integer
txm = Val(Text1.Text)
If KeyAscii =" 13" Then
If txm >=" 503741" And txm <=" 503750" Then
List1.AddItem txm
Text1.Text = ""
i =" 1:" j = 10
Do While i <= j
①
If txm =" a(m)" Then
List2.AddItem b(m)
Exit Do
ElseIf txm > a(m) Then
i =" m" + 1
Else
②
End If
Loop
Else
MsgBox "条形码输入错误，无此商品"
Text1.Text = ""
End If
End If
End Sub
'计算所购商品的总额
Private Sub Command1_Click()
Dim i As Integer, mx As String, jg As String, sum As Single
For i =" 0" To 9
If List2.List(i) <> "" Then
mx = List2.List(i)
sum =" sum" + Mid(mx, 4)
End If
Next i
Text2.Text = ③
End Sub
试卷分析
-
【1】题量占比
选择题:(12道)
填空题:(5道)
-
【2】：难度分析
1星难题：0
2星难题：0
3星难题：0
4星难题：0
5星难题：0
6星难题：0
7星难题：0
8星难题：0
9星难题：17