1.选择题- (共12题)
1.
使用Word 软件编辑某文档,部分界面如图所示,下列说法正确的是( )


A.文档中图片的文字环绕方式为“嵌入型” |
B.用户t1 和用户s2 添加了批注 |
C.文章中共有两处修订,两处批注 |
D.拒绝所有修订后,开头的文字是“记者从今天浙江省政府新闻信息办召开的…” |
2.
关于Access数据表的操作,下列说法正确的是
A.同一张表中两个字段的字段名称可以完全相同 |
B.字段数据类型若为“自动编号”,则新值一定是递增的 |
C.在数据表视图删除字段是不能撤销的 |
D.设置为主键的字段是不能删除的 |
4.
以下说法正确的是
A.信息的表示、传播、存储必须依附于某种载体 |
B.在公共场所上网时,应尽量把表单上的用户名和密码设置为自动完成 |
C.文字出现以后,才能进行传递信息 |
D.“盲人摸象”体现了信息的时效性 |
5.
已知英文小写字母比对应的大写字母ASCII码大32(十进制),某数据加密方法描述如下:
(1)将字符的ASCII码值加20(十进制);
(2)以字节为单位进行加密处理;
(3)将1个字节的8位二进制数左移一位,最低位用左移出的最高位填充;
(4)将处理后的8位二进制数分割成前4位与后4位两个二进制数;
(5)分别将上述两个4位二进制数转换为十六进制数;
(6)所得两个十六进制数码交换顺序后连接,即为该字节的密文。
用UltraEdit-32软件观察“i-hangzhou”这几个字符的内码,如图所示

则字符H加密后的密文是
(1)将字符的ASCII码值加20(十进制);
(2)以字节为单位进行加密处理;
(3)将1个字节的8位二进制数左移一位,最低位用左移出的最高位填充;
(4)将处理后的8位二进制数分割成前4位与后4位两个二进制数;
(5)分别将上述两个4位二进制数转换为十六进制数;
(6)所得两个十六进制数码交换顺序后连接,即为该字节的密文。
用UltraEdit-32软件观察“i-hangzhou”这几个字符的内码,如图所示

则字符H加密后的密文是
A.B8 |
B.8B |
C.70 |
D.07 |
6.
(加试题)某排序算法的VB程序段如下:
n = 10
Text1.Text = ""
For i = 1 To 5
For j = n To i + 1 Step -1
If a(j) < a(i) Then
temp = a(j): a(j) = a(i): a(i) = temp
End If
Next j
Next i
For i = 1 To 10
Text1.Text = Text1.Text + Str(a(i))
Next i
数组元素a(1)到a(10)的值依次为“965,155,195,444,106,734,172,983,898,360”,执行该程序段,文本框Text1中显示的是
n = 10
Text1.Text = ""
For i = 1 To 5
For j = n To i + 1 Step -1
If a(j) < a(i) Then
temp = a(j): a(j) = a(i): a(i) = temp
End If
Next j
Next i
For i = 1 To 10
Text1.Text = Text1.Text + Str(a(i))
Next i
数组元素a(1)到a(10)的值依次为“965,155,195,444,106,734,172,983,898,360”,执行该程序段,文本框Text1中显示的是
A.106 155 172 195 360 444 734 898 965 983 |
B.106 155 172 195 360 734 444 983 898 965 |
C.983 965 898 734 444 360 172 195 155 106 |
D.106 155 172 195 360 965 444 734 898 983 |
7.
(加试题)有如下程序段:
Dim i As Integer, Sum As Integer
Dim a(1 To 11) As Integer
Sum = 6
a(11) = 49
For i = 10 To 1 Step -1
a(i) = a(i + 1) - 1
If a(i) Mod 3 = 0 Then Sum = Sum + a(i)
Next i
Text1.Text = Str(Sum)
该程序段运行后,文本框text1中显示的内容是
Dim i As Integer, Sum As Integer
Dim a(1 To 11) As Integer
Sum = 6
a(11) = 49
For i = 10 To 1 Step -1
a(i) = a(i + 1) - 1
If a(i) Mod 3 = 0 Then Sum = Sum + a(i)
Next i
Text1.Text = Str(Sum)
该程序段运行后,文本框text1中显示的内容是
A.174 |
B.180 |
C.36 |
D.42 |
9.
使用Flash软件编辑“播放”按钮元件,部分界面如图所示

将该按钮元件应用于舞台,下列描述正确的是

将该按钮元件应用于舞台,下列描述正确的是
A.测试影片,当鼠标经过该按钮时,该按钮上不一定会呈现图中所示文字“播放” |
B.测试影片,当鼠标按下该按钮时,可听见声音 |
C.测试影片,在按钮上单击鼠标,按钮将消失 |
D.在舞台上可以添加多个“播放”按钮实例 |
11.
使用会声会影软件进行作品制作,部分操作界面如下图所示

下列说法正确的是

下列说法正确的是
A.该作品中使用了2个视频素材 |
B.标题“欢迎欣赏”与“影片简介”之间可添加转场效果 |
C.播放修整后的素材,素材“V13.wmv”的内容会遮住素材“摩登时代.MPG”的内容 |
D.播放修整后的素材,“02_Music.mpa”开始播放时“01_Music.mpa”停止播放 |
12.
使用Photoshop软件制作“香港回归20周年”作品,部分界面如图所示

下列说法正确的是

下列说法正确的是
A.“1997年-2017年”图层中使用了滤镜效果 |
B.“紫荆花”图层可以拖动到“1997年-2017年”图层的上方 |
C.“背景”图层可以使用“自由变换”命令将其缩小 |
D.将作品存储为JPEG格式文件,会呈现“香港回归20周年”图层中的3种图层样式效果 |
2.填空题- (共5题)
13.
小龙收集了2017年8月我国50个城市部分食品平均价格变动情况的有关数据,并使用EXCEL软件进行数据处理,如图1所示

图1
请回答下列问题:
(1)区域F3:F12的数据是通过公式计算得到的:在F3单元格输入公式后,用自动填充功能完成F4:F12的计算,则F3单元格中的公式是________。
(计算公式:上旬价格与上旬平均价格之差=上旬价格-上旬平均价格)
(2)若将图1中的第13行删除,单元格F3:F12的值________(选填:会、不会)变化。
(3)根据图1中数据制作的图表如图2所示,创建该图表的数椐区域是________。

图2
(4)对图1中的A6:F12数据按照列C进行升序排序后,则图2中最下面的食品为________。

图1
请回答下列问题:
(1)区域F3:F12的数据是通过公式计算得到的:在F3单元格输入公式后,用自动填充功能完成F4:F12的计算,则F3单元格中的公式是________。
(计算公式:上旬价格与上旬平均价格之差=上旬价格-上旬平均价格)
(2)若将图1中的第13行删除,单元格F3:F12的值________(选填:会、不会)变化。
(3)根据图1中数据制作的图表如图2所示,创建该图表的数椐区域是________。

图2
(4)对图1中的A6:F12数据按照列C进行升序排序后,则图2中最下面的食品为________。
14.
(加试题)小龙编写了一个简易加法器VB程序,运行界面如图所示。在文本框Text1中输入一个数字后再输入空格表示一个加数输入完毕,连续不断输入不同的加数,待所有需要相加的数输入完毕后,单击“求和”按钮Command1后,在标签label1中显示加数的个数以及总和。(数字0和空格的ASCII码分别为48、32)
实现上述功能的VB程序如下,但加框处代码有错,请改正。
Private Sub Command1_Click()
Dim a As String
Dim x As Integer, s As Integer, k As Integer
a = Text1.Text
x = 1: s = 0: k = 0
For i = 1 To Len(a)
'如果输入的不是0到9的数字或者空格,则给出错误提示后结束子程序
If (Asc(Mid(a, i, 1)) < 48 Or Asc(Mid(a, i,1)) > 57) or(Asc(Mid(a,i,1))= 32) then’①________ Label1.Caption = "只能输入数字或空格"
Exit Sub
End If
If Mid(a, i, 1) = " " Then
s = s + Mid(a,x,i)’②________
x = i + 1
k = k + 1
End If
Next i
Label1.Caption = "这" + Str(k) + "个数的和为:" + Str(s)
实现上述功能的VB程序如下,但加框处代码有错,请改正。
Private Sub Command1_Click()
Dim a As String
Dim x As Integer, s As Integer, k As Integer
a = Text1.Text
x = 1: s = 0: k = 0
For i = 1 To Len(a)
'如果输入的不是0到9的数字或者空格,则给出错误提示后结束子程序
If (Asc(Mid(a, i, 1)) < 48 Or Asc(Mid(a, i,1)) > 57) or(Asc(Mid(a,i,1))= 32) then’①________ Label1.Caption = "只能输入数字或空格"
Exit Sub
End If
If Mid(a, i, 1) = " " Then
s = s + Mid(a,x,i)’②________
x = i + 1
k = k + 1
End If
Next i
Label1.Caption = "这" + Str(k) + "个数的和为:" + Str(s)
15.
(加试题)中秋节时,班级组织活动,其中有抽奖环节,小龙在7选3中选考了技术,班主任让小龙编写一个VB抽奖程序,功能如下:窗体装载过程从数据库读取所有同学的相关数据并显示在列表框List1中,抽奖时在文本框Text1中输入要抽出的人数,单击“摇奖”按钮command1,程序进行处理,结果输出在列表框list2中。程序运行界面如下图所示。

实现上述功能的VB程序如下,请回答下列问题:
(1)分析下面的程序代码,可知数据表名为________
(2)请在划线处填入合适的代码。
Dim a(1 To 100) As String '数组大小满足处理要求,学生学号
Dim b(1 To 100) As String '数组大小满足处理要求,学生姓名
Dim i As Integer '学生总数
Dim j As Integer
Dim dd(1 To 100) As Integer
Private Sub Form_Load()
‘从数据库读取全班同学的相关信息,存储在数组a、数组b和变量i中
Dim n As Integer
Private Sub Command1_Click()
Dim ShuruNum As Integer, k As Integer, y As Integer,n As Integer
Randomize
ShuruNum = Val(Text1.Text)
Label4.Caption = ""
For k = 1 To i
dd(k) = 0
Next k
If ShuruNum > 0 And ShuruNum <= i Then
j = 1
Do While j <= ShuruNum
y = Int(Rnd() * i) + 1
If________________ Then' ①
dd(j) = y
j = j + 1
End If
Loop
List2.Clear
For n = 1 To ShuruNum
List2.AddItem ________________ '②
Next n
Else
Label4.Caption = "错误:没有输入中奖人数或超过学生总数"
End If
End Sub
'核对重复,避免同一人再次中奖
Private Function CheckCF(p As Integer) As Boolean
Dim m As Integer,x As Boolean
x = True '初始化
For m = 1 To j
If ________________ Then '③
x = False
Exit For
End If
Next m
CheckCF = x
End Function

实现上述功能的VB程序如下,请回答下列问题:
(1)分析下面的程序代码,可知数据表名为________
(2)请在划线处填入合适的代码。
Dim a(1 To 100) As String '数组大小满足处理要求,学生学号
Dim b(1 To 100) As String '数组大小满足处理要求,学生姓名
Dim i As Integer '学生总数
Dim j As Integer
Dim dd(1 To 100) As Integer
Private Sub Form_Load()
‘从数据库读取全班同学的相关信息,存储在数组a、数组b和变量i中
Dim n As Integer
Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim strSQL As String
conn.ConnectionString = "Provider=Microsoft.ACA.OLEDB.12.0;Data Source=" & App.Path & "\1718.accdb" |
conn.Open
Set rs.ActiveConnection = conn
strSQL = "SELECT * FROM stuinfo"
rs.Open strSQL
'本过程的其他语句略
End SubPrivate Sub Command1_Click()
Dim ShuruNum As Integer, k As Integer, y As Integer,n As Integer
Randomize
ShuruNum = Val(Text1.Text)
Label4.Caption = ""
For k = 1 To i
dd(k) = 0
Next k
If ShuruNum > 0 And ShuruNum <= i Then
j = 1
Do While j <= ShuruNum
y = Int(Rnd() * i) + 1
If________________ Then' ①
dd(j) = y
j = j + 1
End If
Loop
List2.Clear
For n = 1 To ShuruNum
List2.AddItem ________________ '②
Next n
Else
Label4.Caption = "错误:没有输入中奖人数或超过学生总数"
End If
End Sub
'核对重复,避免同一人再次中奖
Private Function CheckCF(p As Integer) As Boolean
Dim m As Integer,x As Boolean
x = True '初始化
For m = 1 To j
If ________________ Then '③
x = False
Exit For
End If
Next m
CheckCF = x
End Function
16.
编写VB程序,实现如下功能:单击“启动”按钮Command1,在列表框List1内每隔2秒输出一个由30个大、小写字母组合成的字符串,运行界面如图所示,程序代码如下。
(字母A和字母a的ASCII码值分别为65、97)

(1)该程序除窗体外使用了________(填数字)个对象。
(2)为实现上述功能,请在划线处填入合适的代码。
Private Sub Command1_Click()
Timer1.Enabled = _________________________'①
End Sub
Private Sub Timer1_Timer()
Dim s As String, c As String
Dim a As Integer, e As Integer, h As Integer
Randomize
s = ""
For a = 1 To 30
e = Int(Rnd() * 52 + 1)
If e <= 26 Then
h = e + 64
Else
h = _________________________'②
End If
c = _________________________'③
s = s + c
Next a
List1.AddItem s
End Sub
(3)为了减缓字符串的出现速度,可将Timer1的Interval属性值________(选填,填字母:
(字母A和字母a的ASCII码值分别为65、97)

(1)该程序除窗体外使用了________(填数字)个对象。
(2)为实现上述功能,请在划线处填入合适的代码。
Private Sub Command1_Click()
Timer1.Enabled = _________________________'①
End Sub
Private Sub Timer1_Timer()
Dim s As String, c As String
Dim a As Integer, e As Integer, h As Integer
Randomize
s = ""
For a = 1 To 30
e = Int(Rnd() * 52 + 1)
If e <= 26 Then
h = e + 64
Else
h = _________________________'②
End If
c = _________________________'③
s = s + c
Next a
List1.AddItem s
End Sub
(3)为了减缓字符串的出现速度,可将Timer1的Interval属性值________(选填,填字母:
A.调大、 | B.调小)。 |
17.
第19届亚洲运动会将于2022年09月在杭州举行,为提高大家锻炼身体的热情,小龙使用Flash软件制作主题为“晨练”的多媒体作品。请回答下列问题:
(1)小龙在分析了作品的应用需求之后,接下来要分析作品的创作需求,包括确定主题思想、结构类型、作品内容、________(多选,填字母:
(2)如图1所示,“太阳”图层第1帧到第60帧的动画实现了“太阳”实例从完全透明到完全显示,该动画类型为________(选填:动画补间/形状补间/逐帧动画)。

图1
(3)如图2所示为制作“五环”影片剪辑元件的界面,第1帧为1个圆环,第5帧、第10帧、第15帧、第20帧逐渐增加一个圆环,形成完整的5个圆环。小龙在制作图1中的“五环”图层时使用了该“五环”影片剪辑元件,但发现5个圆环呈现完整后,又重新开始从1个圆环到5个圆环,小龙想5个圆环呈现完整后就一直显示5个圆环,应进行的操作是________。

图2
(4)如图1所示,测试影片时,单击“退出”按钮,进入到“鸣谢”场景的第1帧并开始播放,则“退出”按钮的动作脚本为________。
(5)单击“退出”按钮后,仍能听见图1中“音乐”图层的声音,可知其声音“同步”属性为________(选填:数据流/事件)。
(1)小龙在分析了作品的应用需求之后,接下来要分析作品的创作需求,包括确定主题思想、结构类型、作品内容、________(多选,填字母:
A.社会需求/ | B.设施要求/ | C.作品效益/ | D.发布方式/ | E.用户情况)。 |

图1
(3)如图2所示为制作“五环”影片剪辑元件的界面,第1帧为1个圆环,第5帧、第10帧、第15帧、第20帧逐渐增加一个圆环,形成完整的5个圆环。小龙在制作图1中的“五环”图层时使用了该“五环”影片剪辑元件,但发现5个圆环呈现完整后,又重新开始从1个圆环到5个圆环,小龙想5个圆环呈现完整后就一直显示5个圆环,应进行的操作是________。

图2
(4)如图1所示,测试影片时,单击“退出”按钮,进入到“鸣谢”场景的第1帧并开始播放,则“退出”按钮的动作脚本为________。
(5)单击“退出”按钮后,仍能听见图1中“音乐”图层的声音,可知其声音“同步”属性为________(选填:数据流/事件)。

试卷分析
-
【1】题量占比
选择题:(12道)
填空题:(5道)
-
【2】:难度分析
1星难题:0
2星难题:0
3星难题:0
4星难题:0
5星难题:0
6星难题:0
7星难题:0
8星难题:0
9星难题:17