相关试卷
-
1、编辑Access数据表“精品书籍表”(如图a所示),将Excel表(如图b所示)A2:F9区域数据复制到“精品书籍表”中,则正确的是( )
图a
图b
A、“出借否”字段打“√”记录有4条 B、“书籍编号”字段的值不能修改 C、《小妇人》所在记录的书籍编号为1 D、存储“出借否”字段数据类型需要1字节 -
2、使用Word 软件编辑某文档,部分界面如下图所示。下列说法正确的是( )
A、文中有插入和删除两类修订 B、文中有一处拼写和语法检查提示 C、正文中鹳雀楼的图片版式为嵌入型 D、文中有用户为“V1”和“V2”的两处批注 -
3、现需要对某企业大型招聘活动面试成绩进行排名,面试数据包含专业编号(整数,顺序编号)、专业名称、姓名(字母编写)和面试分。整理面试数据的要求是:先按专业编号从小到大排列;然后,同专业的面试者按面试成绩从大到小排列(同分同名次)。按上述要求,编写一个VB程序,功能如下:在列表List1中显示整理前的数据,单击“整理”按钮Command1,整理结果显示在列表框List2中,程序运行界面如图所示。
(1)、n个元素两两比较大小,需要比较的次数是(2)、请在划线处填入合适的代码。Const n=200 '报名人数
Const nz=10 '专业数
Dim zybh(1 To n) As Integer, zyname(1 To n) As String, sname(1 To n) As String, zymark(1 To n) As Integer
Dim b(1 To nz) As Integer '存储每个专业的人数
Dim c(1 To nz) As Integer
Dim d(1 To n) As Integer
Dim q(1 To n) As Integer
Private Sub Form_ Load()
'本过程读取专业编号、专业名称、姓名和面试分的数据分别存储在数组zybh,zyname,sname, zymark中,并在List1中显示,代码略
End Sub
Private Sub Command1_ Click( )
Dim i As Integer, j As Integer, k As Integer, t As Integer, pos As Integer
For i=1 To nz
b(i)=0
Next i
For i=1 To n
d(i)=0 : q(i)=0
Next i
For i=1 To n
k= zybh(i)
b(k)=b(k) + 1
Next i
k=1
For i=1 To nz
c(i)=k
Next i
For i=1 To n-1
For j=i+1 To n
If zybh(i)= zybh(j) And zymark(i) < <> zymark(j) Then
If Then
d(j)=d(j)+1
Else
d(i)=d(i)+1
End If
End If
Next j
Next i
For i=1 To n
j=0
Do While
j=j+1
Loop
q(c(zybh(i))+d(i)+j)=i
Next i
For i=1 To n
List2.AddItem "" & zybh(q(i)) & " " & zyname(q()) & " " & sname(q(i))& "" & zymark(q(i) & "" & d(q(i)) + 1
Next i
End Sub
-
4、某网站注册密码需要符合以下两点条件:①密码不少于4位字符组成;②必须同时包含4种字符,大写字母“A-Z”,小写字母“a-z”,数字“0-9”,特殊符号“! @# $%~&.*”,为了方便批量注册,小迪同学编写了自动生成密码的VB程序,程序运行界面如图所示,当在文本框Text1中输人需生成密码长度,点击“生成密码”按钮(Command1),在文本框Text2中输出符合要求的密码串。
(1)、下列对象不具有Caption属性的是(单选,填字母:A.Command1/B.Form1/C.Text1/D.Label1)(2)、实现上述功能的VB程序如下,请在划线处填入合适代码。Private Sub Command1_ Click( )
Dim a(0 To 4) As Integer, b(1 To 4) As Integer
Dim key As String, s As String, n As Integer, k As Integer, i As Integer, j As Integer, sum As Integer
key="ABCDEFGHJKIMNC)PQRSTUVWXYZabdefghijklmnopqrstuvwxyz0123456789! @# $ %&.*"
Randomize
n= Val(Text1.Text)
a(0)=0:a(1)=26 :a(2)=52 :a(3)=62:a(4)=70 '记录每种符号的结束位置
s= ""
For i=1 To 4
b(i) =0 'b数组记录某类符号是否使用
Next i
sum=4 '当前未使用字符类型,初始为4种
Do While Len(s)+sum< n
k= '随机选择一个密码序号
s=s+ Mid(key, k, 1)
i= 1
Do While

i=i+ 1
Loop
b(i)= 1
sum=4-b(1)-b(2)-b(3)-b(4)
Loop
'生成剩余未出现元素密码,保证4种符号均有出现
For i=1 To sum
j=Int(Rnd*4)十1
Do While ( )
j=j Mod 4+1
Loop
b(j)=1
k=Int(Rnd * (a(j)-a(j- 1)))+a(j-1)+1
s=s+Mid(key, k, 1)
Next i
Text2.Text=s
End Sub
(3)、程序代码中的加框处代码有误,请改正。(4)、如果文本框Text1中输入值2,文本框Text2中输出字符长度为(单选,填字母:A . 2/ B . 4 /C .运行错误/D .没有输出) -
5、使用Flash软件制作“流感常识宣传”动画:
(1)、创作多媒体作品需要进行需求分析和规划设计。下列属于应用需求分析的是(多选,填字母:A .了解用户的计算机应用水平/B .考虑作品创作及运行需要的硬件设施/C .分析该作品的受欢迎程度及教育意义/D .设计作品的主要界面/E.确定作品的发布方式)。(2)、测试该场景时,“按钮”图层内容直到45帧才出现,要使按钮从第1帧就出现并延续到第45帧,下列操作可行的是 。(多选题,填字母)A、选中“按钮”图层第1帧执行“清除关键帧”操作 B、选中“按钮”图层第45帧执行“清除关键帧”操作 C、删除“按钮”图层第1至44帧 D、选中“按钮”图层第45帧执行“复制帧”操作,在第1帧执行“粘贴帧”操作 E、选中“按钮”图层第45帧,并移动到第1帧(3)、“教师”图层中的“人物”实例实现了由透明逐渐显示的动画效果,该图层第一帧“人物”实例的Alpha属性值为。(4)、删除“音效”图层,第40帧到第45帧,对动画整体音效(有/无)影响。(5)、单击“play”按钮,跳转到“第一幕”场景第1帧并开始播放,该按钮上的动作脚本命令是。 -
6、小张收集了2020美国大选8个摇摆州民调数据,并用EXCEL软件进行处理,如图所示。
(1)、支持率大于50的总统候选人获得该州的选票,如拜登获得了佛罗里达州(FL)、亚利桑那州(AZ)、北卡罗来纳州(NC).俄亥俄州(OH)的选票,并将预计得票显示在G3、G4中。G3单元格是使用SUMIF函数计算得到的,其公式是。(提示:SUMIF(条件区域,求和条件,实际求和区域),第二个求和条件参数作用在第一个条件区域里。SUMIF(A2:A13,“>50",B2:B13)表示A2:A13区域大于50的对应实际求和区域B2:B13数据求和)
(2)、H4单元格是通过H3自动填充得到的,现在出现了“#DIV/0!”错误,请分析原因,并修改H3公式:。(3)、根据图a数据,制作图b所示图表(2020美国大选摇摆州民调情况),则该图表的数据源是。
-
7、某对分查找算法的VB程序段如下:
Key= Val(Text1.Text)
i=1: j=10: n=0
Do While i<=j
m=(i+j)\2
n=n+1
If a(m) : > Key Then
j=m-1
Else
i=m+ 1
End If
Loop
Text2.Text=str(n)
数组元素a(1)到a(10)的值依次为“2,3,5,8,9,10,13,17,19,25”。在文本框Text1中输入待查找的整数,执行该程序段,则文本框Text2中显示3,待查找数不可能是( )
A、2 B、4 C、9 D、i9 -
8、统计字符串s中的升序段个数(例如47923123 ,则满足条件的升序段是479,23,123)。编写的部分VB程序段如下:
s= "47923123"
f=True : n=Len(s) : m=0
For i=2 To n
If Mid(s, i, 1)> >Mid(s, i - 1, 1) Then
Else
End If
Next i
Print "升序段个数有"十Str(m)
上述程序段中方框处可选语句为:
①f= True
②f= False
③If f Then m=m+1
则(1)(2)(3)处语句依次为( )
A、①②③ B、②③① C、③②① D、②③① -
9、有如下VB程序段:
s=0:t=0
For i=1 To 5
If a(i)-a(i+1)<t Then
t=a(i)-a(i+l)
s=s+1
End If
Next i
数组元素a(1)到a(6)的值依次为“4,5,3,2,7,5”,执行该程序段后,变量s的值为( )
A、1 B、2 C、3 D、4 -
10、有如下VB程序段:
s= "abcde"
m=0
L=Len(s) :n=L
Do While n>0
m=(m+3) Mod n+1
s=Mid(s,1,m-1)+ Mid(s,m+1,L) +Mid(s,m,1)
n= n-1
Loop
执行该程序段后,变量s的值是( )
A、edcba B、debca C、dbeca D、Edbac -
11、符合产生随机整数n,其范围为(100≤n≤200)的VB表达式是( )A、int(Rnd * 100)+ 100 B、int(Rnd * 100)+101 C、int(Rnd* 101)+100 D、int(Rnd* 101)+101
-
12、尺寸为1280×720像素、颜色位深度为24位的图像,要求其上传大小不超过450KB。根据一要求,压缩为JPG格式其压缩比至少为( )A、3:1 B、4:1 C、5:1 D、6:1
-
13、用Photoshop软件制作“足球”宣传海报,如图所示,下列说法正确的是( )
A、可以对“F OT BALL"图层使用“自由变换”命令调节文字大小 B、调换“球员”图层与“F OT BALL"图层顺序作品显示效果不变 C、可直接用“油漆桶”工具改变“F OT BALL"图层的字体颜色 D、对“F OT BALL"图层执行修改字号命令无法单独将“O”字母变大 -
14、用Access软件设计某图书管理信息系统的数据库,其中“图书登记表”中需要存储如图所示的数据。
序号
图书编号
书名
作者
入库日期
借阅状态
27
BK001 113
安娜·卡列尼娜
列夫·托尔斯泰
2014-07-31
是
28
BK003839
城南旧事
林海英
2016-08-01
否
29
BK002028
时间简史
霍金
2020-08-02
是
…
…
…
…
…
…
下列关于该图书管理信息系统的描述,正确的是( )
A、“图书登记表”中存在如图数据,不可以将“序号”字段改为“自动编号” B、“图书登记表”的字段顺序与图中数据的列顺序需要一致 C、“图书登记表”中借阅状态数据的字段类型不可以设置为“数字”类型 D、同一数据表中各记录的字段数可以不同 -
15、下列应用中,没有体现人工智能技术的是( )A、停车管理系统通过识别车牌进行计费 B、“识花”软件通过识别花草图像显示花草名称 C、自动翻译机将普通话翻译成英语 D、佩戴智能导游进人预设无线发射点后自动播放讲解
-
16、下列有关信息与信息处理的说法,错误的是( )A、搜索引擎运用了全文检索技术 B、古人“事大,大结其绳,事小,小结其绳,结之多少,随物众寡”,属于信息编码 C、鲲鹏云手机摆脱了对芯片的依赖,不再需要CPU支持 D、计算机感知现实世界需要用到传感器技术
-
17、小李设计“移数游戏”程序,实现如下功能:在列表框中有24个数字(8个“1”,8个“2”,8个“3”)随机排成“井”字形方阵,通过单击游戏界面中的八个按钮实现往箭头方向循环移动所在行(或列)的数据,例如“→③”按钮所在行的数据依次为“2,2,3,3,3,2,1”,若单击一次“→③”按钮后,该行的数据向右循环移动一次,依次变为“1,2,2,3,3,3,2”。玩家通过按钮移动数据,最终若使游戏界面中虛线框内的八个数字为相同数字则完成游戏。程序运行界面如图所示。
(1)、在如图所示的游戏界面中,单击某按钮一次后,即可完成游戏,则该按钮的Caption属性值是 。(2)、程序部分代码如下,请在划线处填入合适的代码。Dim a(1 To 49) As String
Private Sub Form _Load ()
Dim k(1 To 3) As Integer
Randomize
t=0
For i=1 To 49
x=
y=(i-1) Mod 7+1
If x=30rx=50ry=30ry=5Then
t = Int (Rnd*3) + 1
Do While
t=t Mod 3+ 1
Loop
k(t)=k(t)+1
a(i) = Str(t)
Else
a(i) =””
End If
Next i
‘在列表框中输出数据,得到“井”字形方阵。代码略
End Sub
‘下面为单击“↑①”按钮,实现数据的移动
Private Sub Command1_ Click()
j=3
temp =a (6*7+j)
For i=1 To 6
p =i-1
If p<1 Then p= 7
A ((p-1)*7+j)=a ((i-1)*7+j)
Next i
= temp
’在列表框中输出数据,更新“井”字形方阵。代码略
End Sub
‘其他按钮所实现功能的代码略
-
18、数组a中存储的是两个数列交替排序的n个正整数,下标为奇数的数组元素都是奇数且为升序排列,下标为偶数的数组元素都是偶数且为降序排列。排序示例如下。
a(1)
a(2)
a(3)
a(4)
a(5)
a(6)
a(7)
a(8)
a(9)
a(10)
1
10
3
8
5
6
7
4
9
2
依据对分查找思想,设计一个在数组a中查找数据key的程序,实现该功能的VB程序如下,请回答下列问题:
Private Sub Search_Click()
Const n = 10
Dim a(1 To n) As Integer
Dim i As Integer, j As Integer, m As Integer, f As Boolean, key As Integer
‘读取一组正整数,按上述规则存入数组a中。代码略
key = Val (Text1.Text)
If key Mod 2=1 Then i=1 Else i=2
j =n:f= False
Do While i<=j And Not f
If key Mod 2=0 Then
m=(i+j)\2-(i+j)\2Mod2
Else
m= ①
End If
If key = a(m) Then
f = True
ElseIf
Thenj=m-2
Else
i= ②
End If
Loop
If f Then Label1.Caption = Str(m) Else Label1.Caption =“不存在”
End Sub
(1)、观察程序代码,该事件处理过程名为。(2)、程序加框处代码有错,请改正。(3)、请在划线处填入合适的代码。① ②
-
19、小温制作主题为“70周年华诞”的多媒体作品,首先使用Photoshop软件处理图片,然后使用Flash软件制作动画。(1)、小温使用Photoshop处理背景图片,如图a所示,下列说法正确的有(多选题,填字母)

A.选择“背景”图层,使用“矩形选框”工具选中左边的松树,进行“内容识别”填充,可使松树消失
B.选中“周年华诞”图层,可以直接通过“自由变换”改变“周年华诞”的文字大小
C.选中“周年华诞”图层,可以直接设置图层样式
D.选择“70”图层并解锁后,可用文字工具修改该图层中文字大小
E.选中“背景”图层,可以直接添加滤镜
(2)、其中,“main”场景的部分制作脚本和界面如下:
请根据“main”场景制作脚本和图b所示界面,回答下列问题:场景: main 类别序号: 2 进入方式:单击“load"场景的“Play” 按钮进入 呈现方式: ⒈“文字”图层中的文字实例由完全透明到完全显示、再到完全透明,用时2秒。 ⒉“年份”图层的动画由文字“1979~2019”逐渐变为文字“普天同庆”,用时5秒。
⒊“播放”按钮出现在舞台右下方,单击该按钮,跳转到“end”场景第一帧并停止播放,同时“我和我的祖国”音乐停止。
⒋其他动画略。呈现顺序说明: ⒈进入场景时,动画停止在第1帧,“我和我的祖国”音乐响起,“开始” 按钮出现。
⒉单击“开始”按钮后动画开始播放,同时“开始”按钮消失。
⒊“文字”图层的动画结束后,“年份”“气球”“战斗机”图层的动画开始。 ⒋最后出现“播放”按钮,场景动画停止在最后一帧。

“文字”图层第10帧中,该文字实例的Alpha值为 (单选,填字母:A . 0%/ B . 100%)。(3)、在“音乐”图层中,“我和我的祖国”音乐的同步方式为 (单选,填字母:A .事件/B .数据流/C .停止)。(4)、“年份”图层第20帧到第70帧的动画类型为(单选,填字母: A .形状补间/B .动画补间/C .逐帧动画)。(5)、测试场景时,发现“按钮”图层的动画与脚本设计不符,请改正。。(6)、“播放”按钮上添加的动作脚本为。 -
20、小董收集了某购书网站主要畅销书销售数据,并使用Excel软件进行数据处理,如图a所示。
(1)、区域I3:I17的数据是通过公式计算得到的,在I3单元格中输入公式 , 再利用自动填充功能完成区域I4:I17的计算。(2)、根据图a中的数据制作了图表,如图b所示,创建该图表的数据区域是。
(3)、小董若在图a所示工作表中对数据进行进一步的操作,下列说法正确的是 (多选,填字母)。A、若要对“历史人文”类别的书籍以“折扣”为关键字升序排序,应选择排序的区域是A6:I9 B、若在该工作表中,对D3单元格的数值小数位数设置为1,I3 单元格的数值不变 C、若在该工作表中的C列和D列之间插入一列,则书籍《大国战略》的“年销售金额”数据将在单元格J17中,该单元格公式变为: =C17*$E17*SUM(F17:I17) D、若以“定价(元)”为最小1项进行筛选,则图b所示的图表不会变化