相关试卷
-
1、有一段时长为40分钟，1920* 1080，32位真彩色，采用PAL制的未经压缩的AVI无声视频，此段视频通过5G网络下载（5G网络理论下载速度可达到10Cbps），所需的时间约为（ ）A、796s B、398s C、49s D、16s
-
2、在Goldwave中进行操作，当前操作界面如下图所示，下列说法正确的是（ ）
A、图中44100HZ，表示采用44100量化级别 B、这是一个双声道的无损压缩的音频格式文件 C、执行“删除”操作后，再选择左声道插入35秒静音，音频文件存储容量变大 D、执行“淡入”命令后，执行“更改音量”命令降低音量，文件存储容量不变 -
3、观察字符内码如下图所示，以下说法正确的是（ ）
A、图中有4个ASCII码，5个区位码 B、字符“40”的十六进制编码为“34 30” C、存储字符“3”需要1bit D、“℃”存储时占用了4字节 -
4、使用Word软件编辑文档，部分界面如图所示，下列就法正确的是（ ）
A、文中的图片的文字环绕方式为“四周型环绕” B、若接受所有修订，则第3行前半行文字将变为“服的时间都可能被感染，但是” C、删除批注内容“摘自鲁迅杂文（中国人失掉自信力了吗》”，该“批注[A1]：”也删除 D、第6行“不”字下方有波浪线，表示启用了拼写和语法有检查，这是人工智能技术 -
5、下列有关多媒体信息加工和多媒体技术的说法，正确的是（ ）A、一幅未经压缩的位图图像，内容越复杂，存储容量越大 B、某软件能自动朗读文本内容，该功能主要应用了多媒体技术中的语音识别技术 C、图像中某个区域的颜色、亮度、饱和度等相同，由此产生的数据重复称为空间冗余 D、矢量图放大后不会产生“锯齿形失真”，巨幅广告的图像一般都采用矢量图
-
6、下列有关信息和信息表达的描述，正确的是（ ）A、文字、语言、图形、声音、网络都是常见的信息表达技术 B、某计算机的CPU主频是3.90GHZ，体现了的存储容量大的特征 C、万维网采用SMTP协议将浏览器发出的请求发送到Web服务器 D、超链接可以实现不同网页间的链接，也可以链接到电子邮箱地址
-
7、病毒疫苗抗体检测。使用字符串序列表示志愿者注射疫苗后细胞的DNA和疫苗抗体的DNA（志愿者的DNA序列长度大于疫苗抗体的DNA序列长度），通过检测疫苗抗体DNA序列是否在志愿者的DNA序列中出现来分析疫苗效果。其中疫苗抗体的DNA序列是环状的，志愿者的DNA序列是线性的。只要疫苗抗体的DNA序列在志愿者的DNA序列中出现，说明己产生抗体。例如：疫苗抗体的DNA序列是环状的“cced”，即可以表示为“cced”，也可以表示为“cedc”、“edcc”、“dcce”。A志愿者的DNA序列为“mtrcnmdaced”， 没有出现抗体序列，结果为“阴性”，B志愿者的DNA序列为“acedssdfaef"，出现抗体序列，结果为“阳性”，C志愿者的DNA序列为“ce”，志愿者的DNA序列长度不够，无法比对，结果为“无效”。
按上述要求，编写一个VB程序，功能如下：程序运行时从数据库中读取志愿者的检测号、
DNA序列存入相应数组，在文本框Text1中输入抗体DNA序列，单击“检测结果”按钮Command11，在列表框List1中按检测号顺序显示每个志愿者的检测结果，并在标签Label1显示疫苗抗体的阳性率（以百分比表示，并保留2位小数），程序运行界面如图所示，请在划线处填入合适的代码。
Dim Pnum（1 To 100） As String 'Pnum数组存储志愿者的检测编号
Dim Pch（1 To 100） As String 'Pch数组存储志愿者的DNA序列
Dim Prs（1 To 100） As String 'Prs数组存储志愿者的检测结果
Dim n As Integer '存储志愿者的总人数
Private Sub Form_ Load( )
Dim i As Integer, j As Integer
Dim tmp As String, chtmp As String
Dim Conn As New ADODB.Connection
Dim Rs As New ADODB.Recordset
Conn.ConnectionString = "Provider=Mi crosoft. ACE.OLEDB.12. 0；Data Source=" + App．Path+"\DNADB.accdb"
Conn.Open
Set Rs.ActiveConnection = Conn
Rs.Open "SELECT * FROM Source" '从数据库的名为 “Source”数据表中读取数据
i =0
Do While Not Rs.EOF
i=i+1
Pnum（i） = Rs.Fields（0）
Pch（i） = Rs.Fields(1)
Rs.MoveNext
Loop
Rs.Close
Conn.Close
n=
For i=1 To n-1 '以检测号作为关键字对DNA序列数据进行升序排列
j=i+1
Do While j <= n
If Then
chtmp = Pch（i）：Pch（i）= Pch（j）：Pch（j）= chtmp
tmp = Pnum（i）：Pnum（i）= Pnum（j）：Pnum（j）= tmp
End If
j=j+1
Loop
Next i
End Sub
Private Sub Command1_ Click( )
Dim Ach As String, RVch As String, Vch As String
Dim i As Integer, j As Integer, k As Integer, m As Integer
Ach = Text1. Text： s = Len（Ach）： RVch = Ach + Ach
k=0：m=0
For i=1 To n
If Len（Pch（i）） <= Len （Ach） Then
k =k+ 1： Prs（i） = “无效”
Else
For j=1 To s '按环状序列依次进行比较
Vch =
If Test（Vch，Pch（i）） Then
m=m+1
Prs（i） =“阳性”： Exit For
Else
Prs（i） =“阴性”
End If
Next j
End If
Next i
For i =1To n
List1. AddItem Pnum（i） +" " + Prs（i）
Next i
Label1. Caption = Str（Int（m/（n-k）*10000 +0.5）/100） + "%"
End Sub
Function Test（str1 As String，str2 As String） As Boolean '字符串比对函数
Dim i As Integer
Test = False
For i = 1 To Len（str2） - Len（str1） + 1
If Then
Test = True： Exit For
End If
Next i
End Function
-
8、编写一个VB程序，实现如下功能：输入s位数字构成的数字字符串（第1位数字不为0），移除k（0<k<s）个数字后，在保证原数字相对位置不变的情况下，使剩余数字组成的新数为最小（注：新数第1位不能为0）。例如8个数字构成的数字字符串“71803296”，移除3个数字，得到5位数字构成的最小数是“10296”，具体算法如图a所示。
算法分析：要使得到的5位数字最小，首先需保证能取到5个数字，且首位应尽量小，那么取首位数的范围应保证余下有4个数字，即在前4位中选最小非0的数字。
程序运行时，在文本框Text1中输入一个数字字符串，在文本框Text2中输入要移除的数字个数，单击“运行”按钮CmdRun后，在标签Label1显示得到的最小新数，程序运行界面如图b所示。
(1)、程序运行时，若要在名为Form1的窗体标题上显示“删数”，可以在Form_Load事件处理过程中添加语句为（单选，填字母：A.Form1. Text =“删数”\B.Form1. Caption =“删数”\C.Form1. AddItem“删数”）(2)、实现上述功能的VB程序代码如下，请在划线处填入合适的代码。Private Sub CmdRun_Click( )
Dim Num As String,New_num As String ' Num为输入的数字字符串
Dim i As Integer, j As Integer, m As Integer,
Dim As Integer, s As Integer, k As Integer
Dim a（30） As String, b（30） As Integer
Num = Text1. Text： s = Len（Num）
k = Val （Text2. Text） 'k为删除数字个数
For i=1 To s
a（i） = Mid（Num，i，1）
Next
j =1
m=1
n=
For i=m+1 To n '取第一个非零最小数字
If
Then m=I '加框处程序代码有误，请改正Next i
b（j）= m
Do While '取其他最小数字
m=m+1
n=n+1
For i=m+1 To n
If a（i） < a（m） Then m= i
Next i
j =j+1：b（j）=m
Loop
For i= m+1 To s '最后直接取的数字
j =j+1：b（j）=i
Next i
For j=1 To s- k '输出最小数
New_num =
Next j
Label1.Caption = New_num
End Sub
(3)、加框处程序代码有误，请改正。 -
9、小李制作一个主题为“抗击新冠病毒”的多媒体作品。请回答下列问题：(1)、创作多媒体作品需要进行脚本编写。下列属于脚本编写的是 。（多选，填字母）A、确定作品的主要界面 B、确定作品创作及运行时所需的硬件设施 C、根据作品的主题思想与内容，制作作品的脚本大纲 D、用表格形式来展示作品的屏幕画面、链接关系和呈现说明等 E、将作品中各模块所需媒体元素的获取及处理方法列表进行表示(2)、如图a所示，“人物”图层第40帧的图形对象由“人物”实例形成，其中第30帧到第40帧的补间类型是动画补间，则该图层第40帧到第50帧的补间类型是。
(3)、如图a所示，“按钮”图层最后1帧已经添加动作脚本命令“Stop( )；”，测试影片时，播放到最后动画停止，“播放”按钮不再显示，造成按钮消失的原因是。(4)、“音乐”图层的声音同步方式如图b所示，若不想改变其动画播放效果，并让音乐在播放2秒后停止播放，以下操作可行是 。（多选，填字母）
A、在“音乐”图层的第25帧执行“清除帧”操作 B、在“音乐”图层的第25帧执行“插入帧”操作 C、在“音乐”图层的第25帧执行“插入关键帧”操作。 D、在“音乐”图层的第25帧执行“转换为空白关键帧”操作 E、将“音乐”图层第1帧的声音同步方式由“数据流”改为“事件”(5)、测试影片时，单击“Load”场景中“播放”按钮，影片跳转到“main”场景的第1帧并开始播放，同时实现在浏览器中显示位于同名文件夹下“病毒介绍。 html”文件的内容，则“播放”按钮上添加的动作脚本为：on（release） {}。 -
10、小周同学收集2018- 2019年某地区粮食作物播种面积与产量数据，使用Excel软件进行数据处理，其中粮食类别分为春粮、夏粮和秋粮3类，亩产由产量、面积通过公式计算得到，如图a所示。
请回答下列问题：
(1)、如图a所示，为了计算2019年三季粮食面积与产量占比（%）， 先在K4：K6单元格中分别输入相应公式，得到三季粮食面积占比，然后复制区域K4：K6到区域L4：L6，得到2019年三季粮食产量占比。则L4单元格中的公式是（其中三季粮食产量占比为：各季粮食产量合计：三季粮食产量总和× 100）。(2)、若要对秋粮类作物按照2018年“面积”从高到低进行排序，则排序的数据区域是。(3)、根据图a中的数据制作了“2019年各类粮食亩产”的图表，如图b所示。
以下有关图表的描述正确的是 （多选，填字母）。
A、该图表的数据区域为F4：F9，F12：F16 B、若以图c所示对图a中的数据进行筛选操作，该图表不会发生变化 C、若将H5：H17单元格的数值小数位数设置为1，该图表不会发生变化 D、若隐藏图a中的第10、11行，该图表会发生变化 E、将H6单元格中数据修改为0.26，该图表会发生变化 -
11、利用对分查找实现在数组a中查找成绩值为Key的学生姓名与成绩（注：学生成绩由高到低排序，并按姓名在前、成绩在后的顺序依次存储在数组aa中，例如： “张三”，“97”，“李四”，。“92”，“王五”，“87”……），编写的VB程序段如下：
Const n = 100
Dim a（1 To n） As String
Private Sub Command1_ Click( )
i=1：j = ⑴
flag = False
Key = Val （Text1. Text）
Do While i <= j And Not flag
m= ⑵
If Val（a（2 * m）） = Key Then
List1. AddItem a（2* m-1）+””+ a（2* m）： flag =True
Else
If ⑶ Then j= m-1 Else i=m+1
End If
Loop
If Not flag Then List1. AddItem”没有找到！”
End Sub
上述程序段（1）、（2）、（3）三个方框处的语句依次为（ ）
①j=n ②j=n/2
③m=(i+j）\2
④m=(（i+j）\2）*2
⑤Val（a（2 * m）） < Key
⑥Val（a（m）） < Key
⑦Val（a（2 * m）） > Key
A、①④⑦ B、②③⑥ C、②③⑤ D、②④⑦ -
12、有如下Visual Basic程序段：
Private Sub Command1_ Click( )
Dim a（1 To 10） As Integer， i As Integer， k As Integer
a(1)=1：a(2)=17：a(3)=8：a(4)=9：a(5)=18
a(6)=15：a(7)=20：a(8)=13：a(9)=7：a(10)=11
k=0
For i= 2 To 9
If（a（i）-a（i-1））*（a（i+1）-a（i））< 0 Then k=k+1
Next
Text1. Text = Str （k）
End Sub
该程序段运行后后，文本框Text1中显示的内容是（ ）
A、6 B、7 C、8 D、9 -
13、有如下Visual Basic程序段：
Private Sub Command1_Click （）
Dim x As Integer，r As Integer， s As String
x = Val（Text1. Text）： s =""
Do While x<>0
r=(x+1） Mod 2
s=Str（r）+s
x=x\2
Loop
Text2. Text = s
End Sub
该程序段运行后，在文本框Text1中输入25，则文本框Text2显示的内容是（ ）
A、0 0 1 0 1 B、1 1 0 1 0 C、0 0 1 1 0 D、1 1 0 0 1 -
14、已知变量a、b、c、d数据类型为Integer， 变量flag数据类型为Boolean。 下列选项中与其他语句功能不相同的是（ ）A、If（a>b Or b>c）And flag=False Then d=a\2 B、If（a>b Or Not b<=c）And Not flag Then d=a\2 C、If Not（a<=b And b<=c）And flag=False Then d=a\2 D、If（a>b And b>c）Or Not flag Then d=a\2
-
15、有关VB表达式：Int（Rnd*10+1）*2，下列说法中正确的是（ ）A、产生一个在[0，18]区间的随机偶数 B、产生一个在[0，20]区间的随机偶数 C、产生一个在[2，18]区间的随机偶数 D、产生一个在[2，20]区间的随机偶数
-
16、使用Photoshop软件编辑“环保.psd”文件，当前状态部分界面如图所示：
下列说法正确的是（ ）
A、直接用“文字工具”调整文字图层的文字大 B、不能直接清除“花”图层的图层样式小 C、直接设置“蝴蝶”图层的滤镜效果 D、直接更改“背景”图层的不透明度 -
17、有A、B两段音频，参数如下表所示：
音频
编码标准
采样频率
量化位数
声道
时长
是否压缩
A
PCM
22.05kHz
16bit
单声道
40秒
不压缩
B
PCM
44.10kHz
8bit
双声道
10秒
不压缩
则这两段音频文件的存储容量之比（A ：B）约为（ ）
A、1：1 B、1：2 C、2：1 D、4：1 -
18、设计“小微图书管理系统”时，新建“图书借阅”Access数据表，存放下列表格数据：
图书编号
图书名称
借阅人
借书日期
还书日期
是否损坏
JS0001
Python编程从入门到实践
黄晓琳
2019-5-14
2019-6-5
否
JS0002
深入理解Java虚拟机
李语敏
2019-11-21
2019-12-25
是
……
……
……
……
……
……
JX0712
历史的原声
王甜甜
2020-1-19
2020-6-1
否
以下有关“小微图书管理系统”和Access数据表结构设计描述正确的是（ ）
A、“图书编号”字段的数据类型设置为“自动编号” B、是否损坏”字段的数据类型设置为“是/否”或“文本” C、“小微图 书管理系统”属于数据库管理系统，可以为多个用户共享使用 D、“小微图书管理系统”设计完成后，用户必须直接打开该数据表添加记录 -
19、下列关于浏览器及信息获取的说法中正确的是（ ）A、浏览器通过HTML协议获取Web服务器的网页内容信息 B、利用浏览器保存网页中的文字和超链接就是保存网页的URL C、利用浏览器获得的信息肯定可以通过统计评价来评判其真伪性 D、IE测览器可以在收藏夹中创建不同文件夹用于不同种类网址的分类保存
-
20、如图所示，利用 Windows 资源管理器对计算机中多媒体信息资源进行分类管理。其中“多媒体信息”文件夹下子文件夹个数是个。
