互联网上网页和其他资源的地址，称为统一资源定位器，其英文简称是（ ）

A．HTML

B．URL

C．FTP

D．HTTP

下列有关信息的说法，不正确的是（ ）

A．信息可以重复使用，不会产生损耗

B．信息可以脱离其所反映的事物而存在

C．信息具有时效性，过期的信息价值会降低

D．信息可以不需要载体

使用 Access 软件创建的数据表，其设计视图的部分界面如图所示。下列说法不正确的是（    ） 

A．如果该表已经有数据，可以把“编号”字段的类型改为“数字”类型

B．“发行时间”字段值可以输入“2018\2\30”

C．“价格”字段的内容可以输入整数

D．“编号”字段在数据表视图中不能够被删除

用 UltraEdit 软件观察字符内码如下图所示，下列描述正确的是（）

A．可推断“j”的内码为 70H

B．“陈旻”字内码为 B3C2H

C．“M”内码用二进制表示为：01001101B

D．“name”占用 4b 存储空间

使用 OCR 软件进行字符识别，以下哪些操作可以提高识别的正确率（   ）
①进行倾斜校正 ②把识别结果导出为 rtf 格式 ③提高扫描分辨率 ④去噪声

A．①②③

B．①②④

C．①③④

D．②③④

.某程序代码如下：（  ） Dim count As Integer
Dim a(1 To 13) As String
s = "where are you"：count= 0
For i = 1 To Len(s)
a(i) = Mid(s, i, 1)
Next i
For i = 1 To Len(s) - 1
k = i
For j = i + 1 To Len(s)
If a(k) < a(j) Then k = j
Next j
If i <> k Then
t = a(i): a(i) = a(k): a(k) = t
End If
Next i
For i = 1 To Len(s) - 1
If a(i) = a(i + 1) Then count = count + 1
Next i
程序运行结束后,变量 count 的值是（ ）

A．13

B．2

C．3

D．4

某对分查找算法的 VB 程序段如下：（   ）
i = 1: j = 7
key = Int(Rnd() * 100) Do While i <= j
m = (i + j) \ 2
If a(m) = Key Then
Exit Do
ElseIf a(m) > Key Then
j = m - 1
Else
i = m + 1
End If
数组元素 a(1)到 a(7)的值依次为“25,42,53,66,77,83,98”，运行上述程序段后，下列条件表达式肯定不成立的是

A．j-i=0

B．i-j=2

C．i=8

D．m<=7

将一段图像分辨率为 1024﹡768、32 位真彩色的视频 AVI 影像压缩为 MPEG格式，压缩比 5：1，若该视频采用 NTSC 制式，则每秒钟播放的数据量约为（ ）

A．18MB

B．25BM

C．75MB

D．90MB

使用 Photoshop 软件处理图像，编辑界面如下图所示，下列说法正确的是（   ）

A．把“文字”图层的图层样式，复制到“花朵”图层时，“外发光”效果会丢失

B．不能使用“文字”工具，修改“文字”图层中的文字字体

C．可使用“仿制图章”工具将“花朵”图层中的花朵仿制到“背景”图层

D．“背景”图层需要解锁后，才可以设置滤镜和调整不透明度

某 Flash 作品“片头”场景的部分时间轴界面如下图所示。（    ）

下列描述正确的是

A．在当前状态下添加动作命令“stop();”，该命令将出现在“按钮”图层第 1 帧

B．将“音乐”图层第 20 帧移动到第 1 帧后，音乐将会从第 1 帧开始播放

C．测试影片时，“按钮”图层中的实例始终呈现在舞台上

D．“动画”图层不能移动到“背景”图层下方

使用 GoldWave 软件处理音频文件“配音．wav”，选中其中一段音频后的部分界面如图所示：

下列说法正确的是（ ）

A．执行“复制”操作后再直接执行“粘贴”操作，音频文件的存储容量保持不变

B．单击“剪裁”按钮后，音频文件的时长将保持不变

C．插入 2 秒静音操作后，再执行“删除”命令，文件的存储容量保持不变

D．将该音频文件另存为单声道文件后，量化位数必将变为原来的一半

小张收集了 2017 年各季度居民人均收支基本情况的数据，并使用 excel 软件进行数据处理，如图 1 所示。请回答下列问题：
 
图 1
（1）“居民人均消费总支出”表示该季度各项支出总和，参照“居民人均总收入”的计算方法，C17 单元格中的公式应为：_________

如图
（2）根据如图中的数据，制作了一张反映2017季度居民人均支出基本情况的图表，如图所示，创建该图表的数据区域是：________
（3）对区域 B3：F7 按第二季度的数据进行升序排序，则如图____________（填：会/不会）发生变化。
（4）将区域 A3:F15 的数据复制到新工作表并进行筛选操作，筛选设置界面

如图所示，则按此设置筛选出的数据共有__________行。

用 VB 编写“检查句子格式”的程序，实现如下功能：在文本框 Text1 中输入要检查的英文句子，单击“检查”按钮 Command1。判断句子“”和“？”后的字母是否是大写，如果是小写字母，那么将其转换为大写字母，并在文本框 Text2 中输出。程序运行界面如下图所示。 
（1）要使程序运行时，文本框 Text1 的 Height 属性值为 900，可在 Form_Load 事件处理过程中添加语句________（单选，填字母：

A．Height=900 /

B．Textl. Height = 900 /

C．Height. Textl=900）。

（2）实现上述功能的 VB 程序如下，请在划线处填入合适的代码。
Private Sub
Command1_Click()
Dim s As String, ch As String, flag As Boolean Dim ch2 As String, res As String, i As Integer s = Text1.Text: res = ""
______________ 
Do While i <= Len(s)
flag = False
ch = Mid(s, i, 1)
If i = 1 And ch >= "a" And ch2 <= "z" Then
ch = Chr(Asc(ch) - 32)    '小写字母转换为大写字母
End If
If ch = "." Or ch = "?" Then flag = True
ch2 = Mid(s, i + 1, 1)
If flag And ch2 >= "a" And ch2 <= "z" Then
ch2 = Chr(Asc(ch2) - 32) '小写字母转换为大写字母
res =_________________   
i = i + 2
Else
i = i + 1
res = res + ch
End If Loop
Text2.Text = res End Sub
（3）若在文本框 Text1 中输入句子:“you are best.”，第 1 个单词前有空格，则经过上述程序处理后，输出结果首字母“y”是否会变为大写“Y”？_____________(选填：是/ 否)。

有一组正整数，要求仅对其中的偶数进行降序排序。排序后偶数在前，奇数在后。排序示例如下。

排序前	75	78	60	86	61	75	36	88
排序后	88	86	78	60	36	75	61	75

 
程序运行界面如下图所示。
实现上述功能的 VB 程序如下，但加框处代码有错，请改正。
Const n = 8
Dim a(1 To n) As Integer Private Sub Form_Load()
'排序前数据存储在数组 a 中，并在文本框 Text1 中显示代码略 End Sub
Private Sub Command1_Click()
Dim k As Integer, i As Integer, j As Integer, t As Integer
i = 1
Do While i <= n - 1
k = i
For j = i + 1 To n
  '①
k = j
ElseIf a(k) Mod 2 = 0 And a(j) Mod 2 = 0 And a(j) > a(k) Then
k = j
End If
Next j
If k <> i Then
t = a(k): a(k) = a(i): a(i) = t
End If
  '② 
Loop

'依次输出排序后的数据。代码略 End Sub

小李编写一个统计学生选考科目的VB 程序，算法的基本思想是：检查每位学生选课组合的编码是否有效，对有效选择结果进行科目统计，根据各科次占有效人数的百分率求出各科排名。程序运行时，单击“显示”按钮 Commmad1，学生选课数据显示在列表框 list1 中，各科编号及对应科目名称显示列表框 list2 中，单击“统计”按钮 Commmad2，选课结果按各科百分率由高到低显示在列表框 list3 中，程序运行结果如图所示。
 
实现上述功能的 VB 程序如下,请回答下列问题:
（1）学生选课的编码数据存储在数据表中，其字段名为________。
（2）请在划线处填入合适的代码.
Dim ach(1 To 500) As String    '存储各学生选课编码 Dim bno(1 To 10) As Integer '存储各科目编号
Dim bname(1 To 10) As String    '存储各科目名称
Dim bnum(1 To 10) As Integer   '存储各科目被选次数 Dim bmc(1 To 10) As Integer '存储各科目被选的名次
Dim n As Integer, num As Integer Private Sub Command1_Click()
Dim i As Integer, km As String
km = "物理化学生物政治历史地理技术"
Dim cn As New ADODB.Connection, rs As New ADODB.Recordset, sql As String
cn.Open "provider=Microsoft.Jet.oledb.4.0;Data Source=" + App.Path + "\students.mdb"
rs.Open "select * from choose", cn
Do While Not rs.EOF
n = n + 1 : ach(n) = rs.Fields("subject") : rs.MoveNext Loop 
rs.Close    
cn.Close 
Set rs = Nothing Set cn = Nothing
For i = 1 To 7
bno(i) = i 
bname(i) = Mid(km, (i - 1) * 2 + 1, 2)
List2.AddItem Str(bno(i)) + "---" + bname(i) Next i
End Sub
Private Sub Command2_Click()
Dim i As Integer, j As Integer, k As Integer Dim c As String, per As Integer
For i = 1 To n
If check(ach(i)) = True Then
For j = 1 To 3
c = Mid(ach(i), j, 1)
bnum(Val(c)) =_______ ’统计科目被选次数
Next j
num = num + 1
End If Next i
i = 1    
Do While i <= 7 '该循环得到各学科被选人数的名次

bmc(i) = 1

    For j = 1 To 7
If bnum(j) > bnum(i) Then  _______ ’通过比较有多少个数比当前的数大
’得到该数在数组中的排名
Next j
i = i + 1 Loop
For i = 1 To 7
For j = 1 To 7
If _______ Then ’按名次输出
per = Int(bnum(j) * 100 / num * 100) / 100
List3.AddItem Str(bno(j)) + "---" + bname(j) + "---" + Str(per) + "%"
End If
Next j Next i
End Sub
Function check(s As String) As Boolean
'代码略! 若学生选科代码有效,函数返回 True,否则返回 False End Function

小刘要创作一个关于“浙江旅游”的多媒体作品。请回答下列问题：
（1）在制作作品前，小刘进行了相应的需求分析。下列属于应用需求分析的是____（多选，填字母：

A．该作品要求使用 Flash 软件制作/

B．该作品面向金融从业工作人员/

C．该作品的主题思想为“理财常识”/

D．该作品的使用价值和使用频率如何/

E．该作品发布方式的确定）。

请回答下列问题：
（2）若要让背景一直显示到动画结束，则应对背景图层进行________操作。
（3）如图时间轴所示,当前状态下“音乐”图层中的声音同步属性为数据流，则该音乐播放的时间约为__秒（填数字）。
（4）“乌镇”图层使用了“嘉兴乌镇”元件产生的实例制作补间动画，实现从舞台外，淡入出现在舞台中的动画效果，这种动画的补间类型是_____________。
（5）导出影片时，单击“退出”按钮，实现关闭动画的效果，则该按钮添加的动作脚本为_________。