相关试卷
-
1、小吴创作“狐狸和乌鸦”故事的多媒体作品。她首先使用Photoshop软件制作一张背景图片，然后使用Flash软件制作动画。请回答下列问题
1图
2图
(1)、如1图所示，Photoshop画布中的“背景”、“树”和“标题”3个元素分别放在不同的图层中，这种将组成作品的各元素分图层处理的手段有许多优点，其中包括:(多选，填字母：A .方便设置各元素的大小和颜色/B .节约作品的存储空间/C .提高图像的分辨率/D .灵活调整各元素之间的位置关系/E .独立设置各元素的滤镜效果）。
(2)、按第1图所示的图层设置，将作品存储为BMP格式的图像，该BMP图像中的文字 (选填:有/没有）投影效果。(3)、如2图所示，若将动画的帧频设置为6fps，则Main场景开始播放后，经过约秒，“狐狸声音”图层中的音频才开始播放。(4)、如2图所示，“背景”图层第1帧到第7帧的补间动画实现了“背景图片”实例从完全透明到完全显示，第1帧中“背景图片”实例的Alpha值是 。(5)、如2图所示，舞台上“重播”字样的实例来源于库中“重播”按钮元件。改变该实例的宽度,库中“重播”按钮元件的宽度 (选填:会/不会)作相应改变。(6)、如2图所示，测试Main场景时，动画播放到第45帧自动停止。则“控制”图层第45帧的帧动作脚本是 。 -
2、编写VB程序，实现如下功能:在文本框Text1和Text2中分别输入一个整数，单击命令按钮Command1，在列表框List1中显示结果，运行效果如1图所示。结果包含两列数据，第1列为两数之间的摄氏温度值（间隔1度、升序），第2列为对应的华氏温度值。
(1)、要使命令按钮Command1上显示的文本改为“转换”，可在其属性窗口（2图）中将属性的属性值修改为“转换”。(2)、为实现上述功能，请在划线处填入合适代码或选项。Private Sub Command1_Click()
Dim t1 As Integer, t2 As Integer
Dim i As Integer, t As Integer
Dim f As Single
List1.Clear
t1 = Val(Text1.Text)
t2 = Val(Text2.Text)
If Then '(选填字母,从下列A、B、C、D四个选项中选取一项）
t = t1: t1 = t2: t2 = t
End If
i = t1
Do While '(选填字母,从下列A、B、C、D四个选项中选取一项）
f = i * 9 / 5 + 32 '摄氏温度转换为华氏温度
List1.AddItem Str(i) + " " + Str(f)
'（填程序代码）
Loop
End Sub
划线①、②处的选项:
A .i <= t2 B .f <= t2 C .t1 > t2 D . i < f
-
3、要防止计机病毒入侵，可以从预防、检查和杀毒三方面着手，下列属于积极预防的措施是（ ）
①对重要数据进行定期备份 ②下载的共享软件要在查杀病毒后使用 ③发现计算机运行不正常后安装杀毒软件查杀病毒 ④为操作系统设置自动更新，及时安装补丁程序，堵住系统漏洞
A、①②③ B、①②④ C、②③④ D、①②③④ -
4、十进制正整数n转换为二进制数，该二进制数末位是“1”。下列说法正确的是（ ）A、无法确定n是奇数还是偶数 B、若该二进制数的位数是4，则n的最大值是15 C、n与n-1分别转换为二进制数，这两个二进制数的位数可能不同 D、该二进制数末位加上“0”后，再转换为十进制数，所得的值是n*10
-
5、使用Access软件创建的“Person”数据表，其设计视图的部分界面如图所示，下列说法正确的是（ ）
A、该数据表创建完成后，字段类型不可被编辑 B、该数据表中，可能会有两条记录的“ID”字段值相同 C、该数据表添加记录后，仍可对数据表的字段名进行修改 D、在该数据表中，“党员”字段可以输入“是” -
6、下列关于人工智能应用的说法正确的是（ ）A、OCR软件中扫描获取图像是人工智能 B、苹果ios系统中的语音助手（Siri）是一款人工智能软件 C、近期全球爆发的勒索病毒是人工智能的体现 D、AlphaGo占胜世界围棋冠军柯洁说明人工智能已超越人脑
-
7、使用UltraEdit软件观察字符“2019 加油！”的内码，部分界面如图所示。下列说法正确的是（ ）
A、字符“！”的内码占个字节 B、字符“加”的十六进制码是“20 BC” C、字符“9”的内码是“39”，所以字符“10”的内码是“3A” D、字符“4”的二进制码是“00110100” -
8、某算法的部分流程图如第下图所示。执行这部分流程后，输出c,s的值分别是（ ）
A、8,10 B、10,14 C、12,6 D、12,24 -
9、某考试的多选题有“A、B、C、D、E”5个答案选项。
例如，标准答案为“ABE”，则对应得分表如下所示。
学生答案
ABE
AB
AE
BE
A
B
E
AC
......
字符串
11001
11000
10001
01001
10000
01000
00001
10100
......
十进制数(x)
25
24
17
9
16
8
1
20
......
ans(x)
2
1
1
1
1
1
1
0
0
小温依据上述描述设计了“多选题阅卷”的VB程序，实现如下功能：在文本框Text1中输入标准答案（大写字母），先单击“初始化”按钮Command1，在数组ans中生成所有答案组合对应的分值，然后单击“阅卷”按钮Command2，从数据库中读取学生的答案并进行阅卷，在列表框List1中显示得分结果。程序运行界面如图所示。
(1)、若标准答案为“ACD”，则数组元素ans (18) 的值为(2)、请在划线处填入合适的代码。Dim ans(0 To 31) As Integer
Private Sub Command1_Click()
Dim b(0 To 4) As Integer
Dim s As String, c As String, sum As Integer, k As Integer
'初始化数组ans和数组b，各元素的初始值均为0。代码略
s = Text1.Text：k = Len(s)
For i = 1 To k
c = Mid(s, i, 1)
b(Asc(c) - 65) = 2 ^ (69 - Asc(c))
Next i
For i = 0 To 4
If b(i) <> 0 Then
ans(b(i)) = 1
sum = ①
End If
Next i
ans(sum) = 2
'当标准答案含3个及以上选项时，学生答案选其中2个选项可得1分
i = 0
Do While k >= 3 And i <= 4
For j = i + 1 To 4
If b(i) * b(j) <> 0 Then ans(b(i) + b(j)) = 1
Next j
i = i + 1
Loop
i = 0
Do While k >= 4 And i <= 4
For j = i + 1 To 4
If b(i) * b(j) = 0 Or k = 5 Then ②
Next j
i = i + 1
Loop
'当标准答案含5个选项时，学生答案选其中4个选项可得1分。代码略
End Sub
Private Sub Command2_Click()
Dim xh(1 To 1000) As String, answer(1 To 1000) As String
'从数据库中读取学生学号和答案的数据分别存储在数组xh和answer中
'记录总数存储在变量n中，代码略
List1.Clear
For i = 1 To n
List1.AddItem xh(i) + " " + answer(i) + " " + Str(ans(f(answer(i))))
Next i
End Sub
Function f(s As String) As Integer
Dim i As Integer, x As Integer
x = 0
For i = 1 To Len(s)
x = ③
Next i
f = x
End Function
① ② ③
-
10、小董编写了一个有关“筛选操作”的VB程序，实现如下功能：在文本框Text1中显示一组随机生成个位数为“9”的两位数（原始数据），在文本框Text2中输入筛选个数，单击“操作”按钮Command1后，在文本框Text3中按降序显示所筛选个数的不重复最大数据（以逗号分隔并以数据结尾），若在文本框Text2中输入的数大于原始数据中不相同数的个数，则在文本框Text3中显示“筛选的个数太大，请重新输入!”。程序运行界面如图所示。
(1)、如图所示，该VB程序的窗体中共有类对象（填数字）。(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。Const n = 10
Dim d(n) As Integer, c As Integer
Private Sub Form_Load()
Dim i As Integer, j As Integer, f As Boolean, s As String
Randomize
c = n
For i = 1 To n
f = False
d(i) = ① ' 随机生成个位数为“9”的两位数
For j = 1 To i - 1
If ② Then f = True
Next j
If f Then c = c - 1
Next i
'原始数据在文本框Text1中显示。代码略
End Sub
Private Sub Command1_Click()
Dim i As Integer, j As Integer, k As Integer, m As Integer
Dim cnt As Integer，t As String, s As String
d(0) = 100
cnt = Val(Text2.Text)
If cnt > c Then
Text3.Text = "输入筛选的个数太大，请重新输入！"
Exit Sub 'Exit Sub表示退出过程
End If
For i = 1 To cnt
k = i
For j = i + 1 To n
If d(j) < d(i - 1) And (
) Then k = jNext j
If k <> i Then
t = d(i): d(i) = d(k): d(k) = t
End If
Next i
For i = 1 To cnt
s = s + Str(d(i)) + "，"
Next i
Text3.Text = ③
End Sub
① ② ③
(3)、程序中加框处代码有错，请改正。 -
11、小陈使用Flash软件创作主题为“古诗欣赏”的多媒体作品，如图a所示。
图a
请回答下列问题：
(1)、在制作作品前，小陈进行了相应的分析和规划。下列说法正确的是________（多选，填字母）A、确定选择Flash软件来合成作品，属于创作需求分析 B、将所的原始素材列成表格，确定获取原始素材的方式并分类登记，属于脚本设计 C、作品的模块设计描述了该多媒体作品的组成部分、工作流程、主要界面 D、多媒体作品设计的一般过程包括需求分析、规划设计、脚本编写(2)、如图a所示，“蜻蜓”图层第1帧到第50帧实现了蜻蜓从舞台左上角飞到右边荷花上，该动画类型为（选填：动画补间 / 形状补间）。(3)、如图a所示，为使“标题”图层的文字从第1帧开始，并持续到最后1帧，正确的操作是。(4)、小陈使用Flash软件制作“播放”按钮的部分界面如图b所示。
图b
则在测试影片时，下列说法正确的是_________（单选，填字母）
A、该按钮能响应鼠标单击，响应的区域仅为“播放”文字的区域 B、若“声音”图层中的声音“同步”属性设置为“数据流”，则在测试影片时能听到声音 C、因为“背景”图层的“点击”帧为空白关键帧，所以该按钮不能响应鼠标单击 D、该按钮能响应鼠标单击，当鼠标指针经过该按钮时不能显示“播放”文字(5)、执行第⑶题操作后，测试影片时，要使动画在最后1帧停止播放，则需要在图层第50帧添加动作脚本。 -
12、小明收集了2019年第四季度轿车销售的数据，并使用 Excel软件进行数据处理，如图a所示。
请回答下列问题：
(1)、区域K3:K180的数据是通过公式计算得到的：在K3单元格中输入公式后，用自动填充功能完 成K4:K180的计算，则K3单元格中的公式是（计算公式：第四季度销量占全年比重％=第四季度累计销量/全年累计销量×100）
(2)、通过排序的方法找出“大众”品牌中2019年累计销量最多的“车系”，则合适的主、次要关键字依次为。(3)、在图a所示的状态下，下列说法正确的是___________(多选，填字母)。
图b
A、若F3单元格中的数据被误改为5269，则G3单元格和K3单元格中的数据会发生变化 B、区域I3:I180的数据可以通过复制区域G3：G180，然后选中单元格I3，执行“粘贴(P)”命令得到 C、设置“11月销量”和“12月销量”的筛选方式均如图b所示，则一定可筛选出最大的10行数据 D、选择区域“B8，D8，F8，H8”创建折线图，可看出桑塔纳2019年第四季度的销售趋势 -
13、某算法的VB程序段如下：
key = Int (Rnd*5)*2+ 11
i = 1: j = 8: c = 0
Do While i <= j
m = (i+j+1) \ 2
If a(m) >= key Then i = m+1 Else j = m-1
c = c+1
Loop
数组元素a(1)到a(8)的值依次为“23，21，19，18，16，15，14，11”。若该程序段执行后，下列说法错误的是（ ）
A、i的值为j+1 B、i的值可能是9 C、j的值可能是5 D、c的值一定是3 -
14、某冒泡排序算法的VB程序段如下：
i=6: flag =1: cnt=0
Do While i >=2 And flag=1
flag=0: cnt= cnt +1
For j =
If a(j)>a(j-1)Then
k=a(j):a(j)=a(j-1):a(j-1)=k
flag= 1
End If
Next j
i=i-1
Loop
数组元素a(1)到a(6)的值依次为“79，13，93，55，29，17”，执行该程序段后，cnt的值为3，数组元素实现有序，则方框中的代码是（ ）
A、2 To i-1 B、2 To i C、6 To 7-i Step-1 D、6 To 8-i Step -1 -
15、有如下VB程序段：
a="10001": b=0:t=0
For i=1 To Len(a)
c= Mid(a, i, 1)
If c="0" Then t = t -1 Else t = t +1
If t < 0 Then b = b * 2 Else b = b * 2+1
Next i
执行该程序段后，变量b的值为（ ）
A、15 B、17 C、20 D、24 -
16、下列有关VB表达式的描述，正确的是（ ）A、VB的基本表达式包括算术表达式、关系表达式和条件表达式 B、VB表达式“Int(3.14159＊1000) / 1000”的值为3.142 C、VB表达式“Abs(Int(-20.19)) + Len(Mid(＂20.19＂，2))”的值是25 D、VB表达式“20201 \ 10 + Int(Sqr(5))”和“Len(＂2020＂) + 2”的值相等
-
17、有如下VB程序段：
i = 1: t = 0
Do While i <= 10
If i Mod 3 = 0 Then i = i + 2
t = t + 1
i = i + 1
Loop
执行该程序段后，变量i和t的值分别为（ ）
A、12，5 B、12，10 C、11，10 D、11，5 -
18、某算法的部分流程图如图所示，执行这部分流程后，输出s的值为64，则①处应填入
A、i \ 4 = 2 B、Sqr(i) = Int(Sqr(i)) C、i Mod 2 = 1 D、i Mod 2 = 0 -
19、一个时长为30秒、800×600像素，16位色，25帧/秒的未经压缩的AVI格式无声视频文件，使用视频编辑软件进行压缩后，其部分配置属性如图所示，则其压缩比约为（ ）
A、6:1 B、80:1 C、160:1 D、1250:1 -
20、使用Photoshop软件制作“武汉加油”海报，界面如图所示。下列操作可行的是（ ）
A、栅格化“武汉”图层，然后添加“纹理化”滤镜效果 B、拷贝“爱心”图层的图层样式，然后直接粘贴到“加油”图层 C、直接交换“武汉”和“背景”图层的顺序，交换后“武汉”两字不显示 D、选中“人物”图层中最右侧人物图案，仅将该图案的不透明度设置为50%