相关试卷
-
1、小王收集了某书店2018年部分计算机类图书销售的相关数据298条，并用Excel软件进行数据处理，如图a所示。
请回答下列问题：
(1)、书店推出促销活动，单价大于50元的图书75折、小于等于50元的图书85折。根据活动方案，小王利用IF函数和自动填充功能完成对F3:F300区域的计算，则在F3单元格中的公式是=IF(E3>50，)。（提示：IF函数用于判断是否满足某个条件，如果满足返回一个值，如果不满足则返回另一个值。例如：=IF(B4>10,1,2)表示如果单元格B4的值大于10则返回1，否则返回2）(2)、如图a所示，要使G3:G300区域数据格式与E列和F列一样（保留两位小数），下列操作不可行的是（单选，填字母：A .设置G3:G300区域单元格格式为数值，保留两位小数/B .设置G3:G300区域为百分比格式，保留两位小数/C .设置G3单元格格式为数值，保留两位小数，并对区域G4:G300进行自动填充）。
(3)、根据图a中的数据制作图表如图b所示，创建该图表的数据区域为A2，E2:G2，。(4)、小王想快速获知2017年及之后出版的图书中，降价幅度最大的五本图书信息，下列操作方案可行的是（单选，填字母：A .使用筛选工具筛选“出版年份”大于等于2017年的图书，再对“降价幅度”按“最大的5项”进行筛选/B .以“出版年份”为主关键字进行降序排序、“降价幅度”为次要关键字进行升序排序/C .先用筛选工具筛选“出版年份”大于等于2017年的图书，再对“降价幅度”进行降序排序）。 -
2、数组a中依次存放6个有序数据“23 33 44 55 66 77”。
Dim a(1 To 10) As Integer
Dim s As String, n, key As Integer
a(1) = 23: a(2) = 33: a(3) = 44: a(4) = 55: a(5) = 66: a(6) = 77
i = 1: j = 6: c = 0: key = 35
Do While i <= j
c = c + 1
m = (i + j) \ 2
If (j - i + 1) Mod 2 = 0 Then m = m + 1
If a(m) = key Then Exit Do
If key < a(m) Then j = m - 1 Else i = m + 1
Loop
该程序段运行后，下列各变量的值不正确的是：（ ）
A、i=3 B、j=2 C、c=3 D、m=2 -
3、某对分查找算法的VB程序如下：
i = 1:j = 8:s = ""
key = Text1. Text
Do While i <= j
m = (i +j)\2
If key = a(m) Then
s = s+ "M"
Exit Do
ElseIf key <a(m) Then
j = m -1:s = s+ "L"
Else
i = m+1:s = s + "R"
End If
Loop
Text1. Text = s
数组元素a(1)到a(8)的值依次为“4，22，27，32，35，44，56，59”，该程序段执行后，文本框Text1中显示的内容不可能是（ ）
A、M B、LR C、RM D、LM -
4、（加试题） 有如下 VB 程序段：
Dim a(1 To 10) As Integer
Dim s As String, n, i As Integer
s = "54851845236": n = Len(s)
For i = 1 To n - 1
a(i) = Val(Mid(s, i, 2))
Next i
For i = 1 To n - 2
k = i
For j = i + 1 To n - 1
If a(k) < a(j) Then k = j
Next j
If k <> i Then
t = a(k): a(k) = a(i): a(i) = t
End If
Next i
Text1.Text = Str(a(1))
该程序段运行后，文本框 Text1 中显示的内容是：（ ）
A、18 B、54 C、85 D、8 -
5、有如下VB程序段：
For i= 1 to 3
List1. AddItem b(a(i))
Next i
数组元素a(1)到a(6)的值依次为“4，2，3，6，1，5”，数组元素b(1)到b(6)的值依次为“Ella”“Sally”“Lily”“Tom”“Anna”“Jack”，则执行上述程序段，List1中显示的内容是（ ）
A、Ella sally Lily B、Tom Sally Lily C、Ella lily Anna D、Tom Lily Sally -
6、下列能正确表示数学表达式100≥x≥1的VB表达式是（ ）A、100≥x And x≥1 B、100>=x And x>1 C、x>=1 And x<=100 D、x>=1 Or x<=100
-
7、使用UltraEdit软件观察字符“2018FIA世界杯！”的内码，部分界面如图所示。
下列说法正确的是（ ）
A、字符“世界杯”的内码占3个字节 B、该条信息共有9个ASCII码字符 C、字符“A”的二进制码是“01000001” D、字符“Fi”的十六进制码是“46 49” -
8、对一段字符（仅包含大小写字母和数字）加密，加密规则为： ①字母和数字都往后循环顺移3位，如“a”变为“d”，“y”变为“b”；“0”变为“3”，“7”变为“0”②加密后字母在前，数字在后③字母按逆序排列，数字按顺序排列，如输入明文“ab7Z8x3”，这密文为“aCed4016”。
小王利用VB程序实现这一加密功能，程序界面和代码如下所示：
Private Sub Com_ jm_ Click()
Dim x As String, ch As String, cl As String
Dim sl As String, s2 As String, s As String
Dim i As Integer, n As Integer, y As Integer
x= Text1. Text
n=Len(x)
For i=1 To n
ch= Mid(x, i, 1)
If ch >= "0" And ch <= "9" Then
①
s2=s2 & y
Elself ch >="a" And ch<="z" Then
y=(Asc(ch)-Asc("a")+3)Mod 26
②
s1=c1+s1
Else
y=(Asc(ch)- Asc("A")+3) Mod 26
c2=Chr(Asc("A")+y)
s1=c2+s1
End If
Next i
③
Text2 Text=s
End sub
(1)、根据程序代码分析，“加密”按钮的名称是。(2)、根据加密规则，明文“9G78fbY5”，则密文为。(3)、请在画线处填入合适的代码：① ② ③
-
9、素数迁移：小王编写了一个VB程序，在左边List1中显示随机生成的10个介于[2,99]的随机整数，单击命令按钮Command1后，其中的素数全部迁移到右边的List2中并进行显示，同时只有那些非素数（合数）的才继续在List1中显示，运行界面如图所示。
实现上述功能的VB程序如下，请回答下列问题。
(1)、根据代码可知，若要产生20个随机数，只需将的值修改为20即可。(2)、请在划线处填入合适代码。Const n = 10
Dim a(1 To n) As Integer
Private Sub Command1_Click() '素数迁移模块
Dim i As Integer
List1.Clear '清除列表框
List2.Clear
For i = 1 To n
For j = 2 To a(i) - 1
If Then
Exit For 'Exit For的功能是退出For循环
End If
Next j
If Then
List2.AddItem Str(a(i))
Else
List1.AddItem Str(a(i))
End If
Next i
End Sub
Private Sub Form_Load() '随机数初始化模块
Randomize '随机数种子初始化
For i = 1 To n
a(i) =
List1.AddItem Str(a(i))
Next i
End Sub
-
10、小王制作主题为“父亲节”的多媒体作品，使用Flash软件制作动画。请回答下列问题：(1)、在制作作品前，小王进行了相应的分析和规划。下列属于脚本编写环节的是。（单选，填字母：A .确定该作品的制作工具/ B .确定该作品的主题思想/ C .进行媒体元素分解/ D .确定该作品发布方式）。(2)、如图a所示，“文字”图层第20帧到第35帧的动画实现了由“父爱如山”字样变为“父爱如海”字样的动画效果，该动画类型为。
图a
(3)、测试“主界面”场景时，“小鸟1”和“小鸟2”动画同时出现并向舞台左侧飞去，为了使“小鸟2”比“小鸟1”晚1秒出现，下列操作方法可行的有（多选，填字母：A .将“小鸟2”图层的第10帧移动到22帧/B .选中“小鸟2”图层第10帧执行“复制帧”操作，在第22帧执行“粘贴帧”操作，然后在“小鸟2”图层第10帧执行“清除关键帧”操作/C .选中“小鸟2”图层第10帧到第21帧执行“清除帧”操作/D .删除“小鸟2”图层第10帧到第21帧）。(4)、“退出”按钮元件的部分编辑界面如图b所示。将该按钮元件应用于舞台，测试影片，当鼠标指标经过该按钮时，指针形状不会变成手形，为使该按钮有效，可行的操作是。
图b
(5)、“音乐”图层中声音的同步属性为“事件”，测试影片时，动画播放到第60帧时自动停止，关闭声音，出现“退出”按钮，则“按钮”图层第60帧的帧动作脚本是。 -
11、小张收集了近几年人均收入数据，并使用 Excel软件进行数据处理，如图a所示。
请回答下列问题：
(1)、若将生活水平按照恩格尔系数分成“温饱”和“小康”，如图a所示，单元格15： I11中的数据是将I4单元格向下自动填充得到的，那么I4单元格的公式为。(2)、若先选择数据区域（A2： I11），再进行自定义排序，（填： 能/不能）实现按E列数据大小实现排序。(3)、对图a表格数据进行筛选，C列和E列的筛选条件设置如图b所示，则筛选结果有项。
图b
(4)、根据图a中数据制作的图表如图c所示，创建图表的数据区域是。
-
12、有如下VB程序段：
s=“Good Luck 2019!”
n=0：m=0：k=0
For i=1 To Len(s)
ch=Mid(s，i，1)
If ch >=“0”And ch<=“9” Then
m=m+1
Else If ch>=“a” And ch<=“z” Then
n=n+1
Else
k=k+1
End If
Next i
执行该程序段后，变量k的值为( )
A、2 B、3 C、4 D、5 -
13、在文本框Text1中输入十进制数，将其转换为二进制数后在标签Label1上输出。VB程序段如下：
Dim x As Integer，s As String，t As Integer
x=Val(Text1.Text)
Do While x>0
Loop
Label1.Caption= s
方框中的代码由以下三部分组成：
①x=x\2
②s=Str(t)+s
③t=x Mod 2
代码顺序正确的选项是( )
A、②①③ B、①③② C、③②① D、①②③ -
14、有如下 Visual Basic程序段，该程序段运行后，文本框Text1中显示的内容为（ ）
s="Hello, Kitty!"
n=Len (s)
Text1. text= Mid (s,7,n-7)
A、Kitty B、"Kitty" C、"Kitty！ " D、Kitty -
15、某算法的流程图如图所示， 执行这部分流程后，输出 a 的值是（ ）
A、0 B、7 C、14 D、21 -
16、使用 Photoshop软件对某图像进行处理，编辑界面如图所示。下列说法正确的是（ ）
A、可以使用“自由变换”工具调整“树叶”图层中树叶的大小 B、背景图层被锁定，当前状态下无法被删除 C、不能使用“文字”工具修改“人人有责”图层中文字的大小 D、当前状态下，可以直接将“投影”效果设置为可见 -
17、使用Goldwave软件进行作品制作，部分操作界面如下图所示。下列说法不正确的是（ ）
A、在当前状态下插入5秒静音，文件体积将变大 B、该音频文件采用无损压缩格式，采样频率为44.1KHz C、执行“删除”命令后直接保存，音频文件体积将变小 D、现对该音频的后5秒设置“淡出”效果并按原参数保存，存储空间不变 -
18、用UltraEdit软件观察字符内码，如图所示：
下列说法正确的是（ ）
A、图中共有5个字符使用 ASCII编码 B、图中字符“a”的内码使用十进制描述，值为61 C、图中字符“i”使用的是半角字符，占2个字节 D、由图中内码可以推测，字符“p”的内码的十六进制值为“70” -
19、对于数据库和数据表，下列说法正确的是（ ）A、数据库不能被多个用户同时访问 B、计算机中的数据只能存放在数据库中 C、Access数据表中，同一列的数据类型肯定相同 D、Access数据表视图中，不能对字段进行添加、删除操作
-
20、编辑某Word文档，部分界面如图所示，下列说法正确的是（ ）
A、文中图片环绕方式为“四周型” B、将Word文档的用户名缩写改为FC后，对末尾“容器”两字添加批注，则批注编号为“FC1” C、可以使用“替换”功能将文中所有“人工智能”都设置为红色 D、接受所有修订后，第一行部分文字将变为“人工智能是计算机科学的一个分支，”