相关试卷
-
1、2015年春节，全国观众在喜迎春节看春晚的同时，通过“微信”及时参与到春晚活动中，与春晚直播现场互动，这说明“微信”主要是一种：（ ）A、信息的存储方式 B、信息的表达技术 C、信息的编码标准 D、信息的转换技术
-
2、在我国古代《孙子算经》中曾经提出这样一个问题。原文是这样的：“今有物，不知其数，三三数之，剩二；五五数之，剩三；七七数之，剩二；问物几何？”。现分析如下，所寻找之数为满足如下条件的自然数：以3除余2，以5除余3，以7除余2，程序将从自然数1开始依次寻找，逐一判断某一自然数是否满足全部条件，直至在指定范围内找到满足条件的所有自然数。程序界面如右图，文本框名为Text1，用于录入最大自然数；列表框名为List1,用于输出结果。
程序代码如下：
Private Sub Command1_Click()
Dim sum As Integer 'sum用来统计符合条件的自然数个数
Dim n, max As Integer
List1.Clear
sum = 0
max = _______①______ '指定查找范围的最大自然数，在text1框中输入
n = 0
Do While n <= max
n = n + 1
If _______ _② ___ Then
List1.AddItem Str(n) '
________③_______
End If
Loop
List1.AddItem ("共计" + Str(sum) + "个")
End Sub
(1)、解决该问题所用到的是（填解析算法/枚举算法）。(2)、程序中①划线处应填入。(3)、程序中②划线处应填入。(4)、程序中③划线处应填入。 -
3、小王使用Photoshop软件制作一幅作品，如下图所示。请回答下列问题：
(1)、由上图可知此图格式应为（填：JPG/PSD/BMP/GIF）。(2)、“倒影”图层中的图像未出现的原因是。(3)、发现“宝石”图层中的宝石尺寸过大，则需进行（填：自由变换/图像大小）操作。(4)、“中国”图层中的文字（填：可以/不可以）用文字工具进行修改。(5)、加了图层样式效果的图层是。(6)、小王使用魔棒工具建立了一个选区（如图），发现选区范围过小，如需扩大选区，那么他应该设置魔棒工具中的参数，参数值比原值应设的（填：更大/更小）。 -
4、某超市用Excel软件对部分生活用品销售情况的数据进行了分析，界面如下图所示，请回答下列问题：
(1)、正确计算各种生活用品占销售总额的百分比值，需在I3单元格输入公式 ， 并从I3单元格地址自动填充到I14单元格。(2)、为更加直观地比较各商品毛利润情况，小峰制作了 “2014年12月生活用品利润比较”图表（如下图所示），则该图表的数据区域是
(3)、选中D2:D14区域，按照下图所示进行自定义筛选后，将显示行数据（不包含标题）。筛选完毕后，“2014年12月生活用品利润比较”图表（填：会或不会）发生变化。
-
5、某宾涫的房间号由5位字符组成（例如A0823表示A幢8层23号房间）末位数字为奇数时表示房间朝南，为偶数时表示房间朝北，字符串变量s中存储了1个房间号，下列能正确判断房间朝南的VB表达式是（ ）A、Val（Mid（s，5，1））Mod 2 = 1 B、Val（Mid（s，5，1））Mod 2 = 0 C、Val（Mid（s，5，1））\ 2 = 1 D、Val（Mid（s，5，1））\ 2 = 0
-
6、将数学表达式 写成VB表达式正确的是（ ）A、（y – Int（x））/x*x B、（y – Abs（x））/ x*x C、（y – Int（x））/x^2 D、（y – Abs（x））/ x^2
-
7、某同学发送邮件时的部分界面如下图所示:
分析图中信息，下列说法不正确的是（ ）
A、该邮件的接收人有4个 B、接收密送的人看不到其它收件人 C、该邮件的主题为“开学通知” D、该邮箱有定时发送邮件功能 -
8、将图片A进行两次操作后得到图片B，如下图所示：
则该两次操作可能是（ ）
A、缩放，顺时针旋转 B、裁剪，水平翻转 C、缩放，逆时针旋转 D、裁剪，垂直翻转 -
9、下列软件中可以用来编辑HTML文件的是（ ）A、
B、
C、
D、
-
10、下图是杭州二中环保调查小组所制作的废旧电器回收WORD文档中的部分界面截图，文中漫画图片使用的环绕方式为（ ）
A、四周型环绕 B、紧密型环绕 C、上下型环绕 D、穿越型环绕 -
11、将课本上的一篇文章扫描后，经过OCR软件识别后存储为电子文档，正确的操作步骤是（ ）
①用OCR软件打开扫描图像，进行智能识别；②用扫描仪扫描文章，获取扫描图像；③校对文章；④保存文件；
A、①②③④ B、②①③④ C、③④②① D、③④①② -
12、小乐在使用Word2010软件的修订状态下编辑文档，部分界面如下图所示，对于带框部分的文字，下列说法正确的是：（ ）
A、修订前的原文为：江山如画，望中烟树历历 B、修订前的原文为：江山如画，望中烟树 C、接受该处所有修订后，内容为：江山如画，望中烟树历历 D、接受该处所有修订后，内容为：江山如画，望中烟树沥沥 -
13、用UltraEdit观察字符内码，结果如下图所示，则字符“PPt”的十六进制内码值为（ ）
A、50 50 54 B、50 50 74 C、51 51 54 D、51 51 74 -
14、“优先点菜”是一款集点菜、支付、分享于一体的手机应用软件，我们可以通过优先手机客户端查看到当地优质品牌餐饮门店及图文菜单，并预先点菜、支付，避免了餐前点菜、餐后结账时等候的麻烦。小利使用该APP事先点好菜的过程属于（ ）A、信息的采集 B、信息的发布 C、信息的加工 D、信息的存储
-
15、编写VB程序,实现如下功能: 单击“排序数组a”按钮Command1时，对已有数组a的数据进行升序排列，并显示在文本框Label1中；单击“显示数组b”按钮Command2时，将升序数组b的数据显示在文本框Label2中；再单击“合并a和b”按钮Command3时，对数组a和数组b升序合并到字符串中，将合并后的数据在文本框Label3中显示。(运行效果如图所示)。实现上述功能的VB代码如下, 请在划线处填入合适代码。
Dim a(1 To 6) As Integer
Dim b(1 To 6) As Integer
Private Sub Command1_Click() '对数组a中的数据进行排序
Dim i As Integer, j As Integer ，k as integer
a(1) = 53 :a(2) = 18:a(3) = 62:a(4) = 22:a(5) = 6:a(6) = 25
s = ""
For i = 1 To 5
k = i
For j = i + 1 To 6
If a(k) > a(j) Then
Next j
If i <> k Then
t = a(k): a(k) = a(i): a(i) = t
End If
Next i
For i = 1 To 6
s = s + Str(a(i))
Next i
Label1.Caption = s
End Sub
Private Sub Command2_Click()
b(1) = 3: b(2) = 8: b(3) = 15: b(4) = 27: b(5) = 38: b(6) = 49
'此处部分代码省略
End Sub
Private Sub Command3_Click()
'将数组a和b中的数据逐个比较后添加到新的字符串s中，并将s在label3中显示
i = 1: j = 1: s = ""
Do While i <= 6 j <= 6 '如果两数组都还有数据未合并
If Then
s = s + Str(a(i)) : i = i + 1
Else
s = s + Str(b(j)) : j = j + 1
End If
Loop
Do While i <= 6 '只有数组a还有数据未合并
s = s + Str(a(i)) : i = i + 1
Loop
Do While j <= 6 '只有数组b还有数据未合并
s = s + Str(b(j)) : j = j + 1
Loop
Label3.Caption = s
End Sub
-
16、如果两个质数的差为2，则这两个质数称为孪生质数对；编写VB程序，实现如下功能：单击“显示孪生质数对”按钮Command1，在列表框list1中显示100以内的所有孪生质数对(运行效果如图所示)。
实现上述功能的VB代码如下, 但划线处代码有错，请改正。
Dim a(1 To 50) As Integer
Private Sub Command1_Click()
Dim i As Integer
k = 0: i = 3
Do While i <= 100
If ① prime(i) Then ‘⑴
k = k + 1
a(k) = i
End If
i = i + 2
Loop
For i = 2 To k
If ②a(i) = a(i +1)+2 Then ‘⑵
List1.AddItem Str(a(i - 1)) + "和" + Str(a(i))
End If
Next i
End Sub
Function prime(x As Integer) As Boolean
prime = False
For i = 2 To Int(Sqr(x))
If x Mod i = 0 Then
prime = True
Exit For
End If
Next i
End Function
① ②
-
17、小华创作“老鹰抓小鸡”故事的多媒体作品。制作过程界面如图1所示，动画库面板部分界面如图2所示，请回答下列问题：
图1
(1)、Flash场景中的小鸡实例是由图像“xj.jpg”图片导入得到，小华认为“Flash软件可用于生成矢量图，所以将场景中小鸡实例放大后依然是清晰的”，该说法。（填：对/错）。(2)、 如图2所示，库中属于图形元件的元件名称为。(3)、测试场景时，在“小鸡声音”出现后还能听到“老鹰声音”，据此判定“老鹰声音”中“同步”属性设置为 (填：事件 / 数据流)。(4)、库中“老鹰”元件具有翅膀拍动效果，编辑该元件界面如图3所示，在测试影片时，发现老鹰翅膀拍动速度太慢，要使老鹰翅膀拍动速度提高一倍的操作方法是A、删除第7帧到第12帧 B、将第6帧移动到第4帧，然后删除第7帧到第12帧 C、将第7帧移动到第13帧，并在第24帧插入帧 D、删除第1帧到第12帧之间所有普通帧(5)、测试影片时，该场景只播放一遍便停止，小华发现在“脚本”图层的最后一帧上有动作脚本标志，则该动作脚本为。(6)、测试影片时，单击“返回”按钮，动画跳转到“main”场景的第1帧继续播放，则“返回”按钮上的动作脚本为。 -
18、编写VB程序,实现如下功能：在文本框text1中输入自然数n，单击“产生n个随机数,并求和与最大数计算”按钮Command1，则在列表框List1中输出n个小于100的随机整数，并输出n个随机数的和与最大值，界面如图所示。
(1)、观察运行界面，选项中没有用到的控件是 ( 选项A、
B、
C、
D、
)。
(2)、设计该窗体界面时，需要将窗体form1的属性设置为“最大随机数”。(3)、请完善下列程序代码：Private Sub Command1_Click()
Dim a(1 To 10) As Integer
Dim s As Integer
Dim max As Integer
n = Val(Text1.Text)
i = 1
Do While i <= n
a(i) = Int(Rnd * 100)
List1.AddItem Str(a(i))
s = s + a(i)
①
Loop
max = a(1)
For i = 2 To n
If a(i) > max Then ②
Next i
List1.AddItem "和为：" + ③
List1.AddItem "最大值为：" + Str(max)
End Sub
供①②选填：
a．n=n+1 b． i=i+1 c．max=a(i) d． a(i)=max
空格③处应填写的代码为:。
-
19、李老师平时喜欢网购，对快递价格比较关注，他收集相关数据如图1所示：
图1(1)、观察图1，可推断单元格H4中的计算公式为。(2)、观察第图1可知表中数据有序，排序时所设置的主要关键字是。(3)、李老师有2.5kg物品需要退货，在快递费自付时，他在江浙沪地区应该选择的快递是（选填：快递A、快递B）(4)、图2为快递物重均为3.5kg时两个快递的价格情况图表，则该图表的数据源区域为 A3︰A22 和。
图2
-
20、有如下程序段：
Dim a(1 To 9) As Integer, m As Integer, k As Integer, i As Integer
a(1)=2 : a(2)=8 : a(3)=3 : a(4)=4 : a(5)=5 : a(6)=6 : a(7)=1 : a(8)=7 : a(9)=9
m = 1: k = 1
For i = 2 To 9
If a(i) > a(i - 1) Then
k = k + 1
If k > m Then m = k
Else
k = 1
End If
Next i
Text1.Text = Str(m)
该程序段运行后，文本框Text1中显示的内容是（ ）
A、4 B、6 C、8 D、9