资源简介

浙江省2019-2020学年普通高校招生选考科目信息技术考试试卷(六)
一、选择题(本大题共12小题，每小题2分，共24分。在每小题给出的四个选项中，只有一个符合题目要求)
1．（2020·浙江模拟）下列有关信息的说法，正确的是(　　)
A．同样的信息不能加载于不同的载体之上
B．设置邮箱，限制邮件大小，过滤垃圾邮件，无助于保护个人信息
C．加密后的文本不是信息
D．教务处为每位同学分配准考证号，属于信息的编码
【答案】D
【知识点】信息及其特征；信息的编码；信息系统安全防护
2．（2020·浙江模拟）下列有关浏览器的应用，说法正确的是(　　)
A．HTTP协议主要用于浏览器与Web服务器之间的信息传输
B．通过浏览器将电子邮件读取到本地计算机采用的是SMTP协议
C．使用浏览器可对当前正在浏览的网页进行编辑
D．选择“网页，仅HTML(*.htm；*.html)”的方式保存网页可将图片保存到本地磁盘
【答案】A
【知识点】网络资源的类型、下载与保存；浏览器
3．（2020·浙江模拟）使用Access软件创建的“无人机”数据表，其设计视图的部分界面如图所示，下列说法正确的是(　　)
A．可以修改“序号”字段的值
B．可以再建一个“自动编号”类型的字段
C．插入新记录时，可以在“优惠”字段输入文字“是”
D．可以在品牌和价格之间插入一个数字类型的新字段
【答案】D
【知识点】数据表、字段、记录的概念；数据表、字段、记录的编辑
4．下列有关多媒体技术的说法错误的是（　　）。
A．多媒体技术涉及声音、图像、视频等相关的信息处理
B．多媒体技术中的媒体可以是存储信息的载体，如光盘等
C．多媒体技术是指以计算机为平台，进行多种媒体综合处理的技术
D．多媒体技术有集成性、交互性、实时性三个显著的特征
【答案】C
【知识点】多媒体技术的概念和特征
【解析】【解答】多媒体技术中的媒体可以是表示信息的载体，如图片、声音等，也可以是存储信息的载体。多媒体主要有三大特性，但并不是一定需要计算机来加工处理。故答案选C。
【分析】本题考查的是多媒体技术的概念及应用。多媒体技术是指以计算机为平台综合处理多种媒体信息，如文本、图形、图像、声音、动画和视频，在多种信息之间建立起逻辑连接，并具有人机交互功能的集成系统。
5．（2020·浙江模拟）小王用Flash软件制作动画作品，时间轴编辑界面如下图所示，下列说法不正确的是(　　)
A．声音的同步方式设置为“数据流”和“事件”，效果是一样的
B．清除“按钮”图层第1帧，不会影响动画播放效果
C．在“男孩”图层第26帧插入空白关键帧，不会影响动画效果
D．交换男孩和配乐图层的位置，不会影响动画效果
【答案】B
【知识点】时间轴、帧、图层、库的概念及基本操作
6．（2019高二下·临海期中）将一个动画导出为AVI格式视频，导出设置如图所示。
若导出后的视频文件存储容量43.95MB，则该动画总帧数约为（　　）
A．38 B．150 C．300 D．1200
【答案】C
【知识点】声音、图像、视频编码
【解析】【解答】43.95MB=45004.8KB=46084915.2B，16位彩色占2个字节。该动画的总帧数=46084915.2/(320*240*2)=300.032，四舍五入为300帧，故答案选C。
【分析】本题考查的是视频文件的存储容量的计算公式。视频文件存储容量=（水平像素×垂直像素×每个像素所需位数／8）*帧频*时长（字节），其中帧频*时长就是动画的总帧数。
7．（2020·浙江模拟）某算法的部分流程图如下图所示，执行这部分流程后，输出的值为(　　)
A．循环体被执行了20次 B．输出变量s的值为30
C．语句i=i+1执行9次 D．该算法是计算0+10+20的值
【答案】C
【知识点】常量、变量及变量的赋值；流程图识读
8．（2020·浙江模拟）VB语句“If Int(Sqr(n))=Sqr(n) Then flag=True”，下列说法正确的是(　　)
A．该语句中的两个“=”均为赋值号
B．对于任意正整数n，条件总是成立的
C．当n的值为81时，执行该语句，flag的值为False
D．该语句的功能是判断正整数n是否是完全平方数(该数能表示为某个数的平方)
【答案】D
【知识点】常量、变量及变量的赋值
9．（2020·浙江模拟）实现某算法的部分VB 程序段如下：
i=1
Do While i <= 9
If a(i) <> 0 Then
j=10
Do While j > i
If a(j)=a(i) Then a(j)=0
j=j - 1
Loop
End If
i=i+1
Loop
For i=1 To 10
If a(i) <> 0 ThenText1.Text= Text1.Text+str(a(i))
Next i
数组元素a(1)到a(10)的数据依次为“4，1，6，4，4，9，1，7，6”，则程序运行后，文本框Text1中显示的内容是(　　)
A．4 9 1 7 6 B．4 1 6 9 7 C．6 7 1 9 4 D．7 9 6 1 4
【答案】B
【知识点】常量、变量及变量的赋值；查找算法及程序实现
10．（2020·浙江模拟）有如下VB程序段：
s = “QUOTES：keep on going never give up！”
flag = False: m = 0
For i = 1 To Len(s)
ch = Mid(s, i, 1)
If ch >= “a” And ch <= “z” Then
If Not flag Then
m = m + 1
flag = True
End If
Else
flag = False
End If
Next i
Text1.Text = Str(m)
程序执行后文本框Text1显示的内容是(　　)
A．5 B．6 C．7 D．21
【答案】B
【知识点】分支结构语句及程序实现；循环结构语句及程序实现
11．（2020·浙江模拟）在文本框Text1中输入n，生成一个n*n的矩阵。矩阵各元素的值均为0或1，第1个元素的值随机生成，垂直和水平方向相邻元素值均不同。程序运行的界面及实现该过程的VB程序段如下所示：
n = Val(Text1.Text)
m =
s = “ ”
For i = 1 To n * n
s = s + Str(m)
m = 1- m
If i Mod n = 0 Then
List1.AddItem s
s = “ ”
If Then m = 1- m
End If
Next i
实现该功能，则上述程序段横横线处的表达式分别为(　　)
A．①Int(Rnd) ②n Mod 2 = 0 B．①Int(Rnd) ②n Mod 2 = 1
C．①Int(Rnd+0.5) ②n Mod 2 = 0 D．①Int(Rnd+0.5) ②n Mod 2 = 1
【答案】C
【知识点】常见数据类型、数组；运算符、基本运算与表达式；常量、变量及变量的赋值
12．（2020·浙江模拟）数组d(1)～d(100)中存储某班级50位同学的语文和数学成绩，奇数位存储语文成绩，偶数位存储对应该同学的数学成绩。该数组已经按照两科总成绩升序排序。依据对分查找思想：设计一个在数组a中查找总成绩Key的程序，如果查找成功输出语文成绩在数组中的位置。实现该功能的VB程序段如下：
Key = Val(Text1.Text)
i = 1: j = 100
Do While i <= j
m = (i + j) \2
If Then m = m - 1
Sum =
If Key = Sum Then Exit Do ′Exit Do表示退出循环
If Then
i = m + 2
Else
j = m - 2
End If
Loop
If i > j Then Text2.Text = “没有找到！” Else Text2.Text = Str(m)
实现该功能，则上述程序段划线处的表达式分别为(　　)
A．①m Mod 2 = 1 ②d(m) + d(m - 1) ③Key < Sum
B．①m Mod 2 = 1 ②d(m) + d(m + 1) ③Key > Sum
C．①m Mod 2 = 0 ②d(m) + d(m - 1) ③Key > Sum
D．①m Mod 2 = 0 ②d(m) + d(m + 1) ③Key > Sum
【答案】D
【知识点】常量、变量及变量的赋值；查找算法及程序实现
二、非选择题(本大题共4小题，4+8+7+7，共26分)
13．（2020·浙江模拟）小明用Excel软件处理2017年度某县建城区初中小学各学校活跃空间使用情况，如图a所示。请回答下列问题。
图a
（1）区域I4：I20的数据是I3单元格向下填充得到的，则I3单元格的公式是　 　。(计算公式：活跃空间比例=活跃空间数/用户人数*100)
（2）如图a所示，若对小学年段各学校按“用户人数”为主要关键字，“活跃空间比例”为次要关键字进行了排序，若对初中各学校也进行相同方法进行排序，排序后C6单元格显示的学校代码是　 　。
（3）为直观地比较两个年段学校各学校活跃空间使用情况的差异，他制作了如图b所示的图表。该图表的数据区域是　 　。
图b
（4）把图a所示中A2：I18的区域复制到新工作表中，并按图c和图d所示的方式进行筛选，筛选后显示的学校有　 　所。
【答案】（1）=H3/D3*100
（2）CZ03
（3）C2：D2，C15：D16，H2：I2，H15：I16
（4）3
【知识点】表格数据的基本操作；表格数据的处理与计算
14．（2020·浙江模拟）小明制作了一个名为“端午．fla”的Flash动画，如图1所示。回答以下问题：
图1
（1）如图1所示，小王在“声音”图层添加了背景音乐，想实现声音与动画同步，应在声音的“同步”选项中选择　 　(填：事件/开始/数据流)类型；若声音同步设置成功，已知“按钮”图层第60帧上设置了帧命令“stop()；”，音乐播放时间是　 　秒。
（2）如图2所示，名称为“水波”的元件类型是　 　(填：图形/按钮/影片剪辑)，如图1所示，在“水波动画”图层的第5帧上放置了如图2所示的“水波”元件实例。测试影片时，会不会出现水面波动的动画效果？　 　
图2
（3）“play”按钮的编辑界面如图3所示：
图3
下面说法正确的是________(多选，填字母)。
A．在“按下”帧中不能直接添加声音效果
B．将“树叶”图层隐藏后，测试影片时将看不见该图层中的内容
C．测试影片时，鼠标移到该按钮实例上时，不会出现小手形状
D．测试影片时，鼠标移到该按钮实例上时，按钮外观可能会有变化
（4）如图1所示，为实现单击“play”按钮，动画跳转到“main”场景第1帧继续播放，小王需要在“play”按钮添加动作命令　 　。
【答案】（1）数据流；5
（2）影片剪辑；会
（3）A；D
（4）on(release){gotoandplay(“main”，1)；}
【知识点】时间轴、帧、图层、库的概念及基本操作；元件的类型与应用；常用影片控制函数的应用
15．（2020·浙江模拟）小军学习了冒泡排序算法后觉得算法还有优化的余地：假设区间[1，i]内的元素已经有序，接下来对[i+1，n]所有元素进行扫描比较，扫描完后记住最后一次交换的位置last_exchange，这个位置说明了区间[i+1，last_exchange-1]内的元素是有序的。标准冒泡排序算法下一遍的扫描区间是[i+2，n]，而有了last_exchange位置信息后，下一遍的扫描区间只要[last_exchange，n]即可。小军用VB实现了该算法，运行的界面如图所示。
Const maxn = 1000
Dim a(0 To maxn) As Long
Private Sub Form_Load()
′产生maxn个不相同的数据，并把他存储在a数组中，代码略
End Sub
Private Sub Command1_Click()
Dim i As Long, j As Long, tmp As Long, cnt As Long
Dim last_exchange As Integer ′记录最后一次交换位置
Dim tmp_pos As Integer ′本次交换的位置
cnt = 0: i = 1
last_exchange = 0: tmp_pos = 1
Do While ′改错
last_exchange = tmp_pos
For j = maxn To last_exchange + 1 Step -1
If a(j) < a(j - 1) Then
tmp = a(j): a(j) = a(j - 1): a(j - 1) = tmp
cnt = cnt + 1
End If
Next j
i = tmp_pos
Loop
′输出，代码略
End Sub
（1）代码“Private Sub Command1_Click()”中的Click是　 　。(单选，填字母：A . 对象名/B . 属性名/C . 事件名)
（2）程序代码中，Do While语句加框处有错，请改正。
（3）程序代码中，将横线处语句补充完整。
（4）程序代码中，cnt变量的含义是　 　。(单选，填字母：A . 表示一趟加工中交换次数/B . 排序中总共交换次数/C . 排序中总共比较次数)
【答案】（1）C
（2）i < maxn And last_exchange <> tmp_pos
（3）tmp_pos = j
（4）B
【知识点】排序算法及程序实现；分支结构语句及程序实现；循环结构语句及程序实现
16．（2020·浙江模拟）某会所采用会员制度，对会员消费实行积分奖励，利用VB编写一个程序，实现的功能：在文本框Text1、Text2中输入一个积分的范围，在列表框List2中显示该范围内的会员编号和对应的积分。多个会员可能有相同的积分，先用对分查找法找到该范围内的最小积分编号的下标，再循环输出该范围的会员编号情况。程序运行界面如图所示。
程序代码如下，为实现以上功能，请在横线处填写合适的代码：
Dim jf(800) As Integer, hyh(800) As String, n As Integer
Dim n As Integer ′表示会员的总人数
Private Sub Form_Load()
′从数据库中读取会员编号和积分，并按积分值从小到大排序，显示在列表框List1中
For i=1 To n
List1.AddItem hyh(i)+“ ”+Str(jf(i))
Next i
End Sub
Private Sub Command1_Click()
Dim i As Integer, j As Integer, m As Integer, k1 As Integer, k2 As Integer
k1=Val(Text1.Text): k2=Val(Text2.Text)
If k1 > k2 Then t=k1: k1=k2: k2=t
If k1 > jf(n) Or k2 < jf(1) Then
List2.AddItem “没有找到该范围的数据！”
Text3.Text=“0”： Exit Sub
End If
i=1
j=n
Do While i <= j
m=Int((i+j) / 2)
If jf(m) > k1 Then
j=m - 1
ElseIf jf(m) < k1 Then
i=m+1
Else
If　 　 Then
j=m - 1
Else
p=m
Exit Do
End If
End If
Loop
If i > j Then p =　 　
k=0
Do While 　 　 And p <= n
List2.AddItem hyh(p)+ “ ”+Str(jf(p))
　 　
p=p+1
Loop
Text3.Text=Str(k)0
End Sub
【答案】jf(m)=jf(m - 1)；i；jf(p) <= k2；k=k+1
【知识点】常量、变量及变量的赋值；查找算法及程序实现；分支结构语句及程序实现；循环结构语句及程序实现
1 / 1浙江省2019-2020学年普通高校招生选考科目信息技术考试试卷(六)
一、选择题(本大题共12小题，每小题2分，共24分。在每小题给出的四个选项中，只有一个符合题目要求)
1．（2020·浙江模拟）下列有关信息的说法，正确的是(　　)
A．同样的信息不能加载于不同的载体之上
B．设置邮箱，限制邮件大小，过滤垃圾邮件，无助于保护个人信息
C．加密后的文本不是信息
D．教务处为每位同学分配准考证号，属于信息的编码
2．（2020·浙江模拟）下列有关浏览器的应用，说法正确的是(　　)
A．HTTP协议主要用于浏览器与Web服务器之间的信息传输
B．通过浏览器将电子邮件读取到本地计算机采用的是SMTP协议
C．使用浏览器可对当前正在浏览的网页进行编辑
D．选择“网页，仅HTML(*.htm；*.html)”的方式保存网页可将图片保存到本地磁盘
3．（2020·浙江模拟）使用Access软件创建的“无人机”数据表，其设计视图的部分界面如图所示，下列说法正确的是(　　)
A．可以修改“序号”字段的值
B．可以再建一个“自动编号”类型的字段
C．插入新记录时，可以在“优惠”字段输入文字“是”
D．可以在品牌和价格之间插入一个数字类型的新字段
4．下列有关多媒体技术的说法错误的是（　　）。
A．多媒体技术涉及声音、图像、视频等相关的信息处理
B．多媒体技术中的媒体可以是存储信息的载体，如光盘等
C．多媒体技术是指以计算机为平台，进行多种媒体综合处理的技术
D．多媒体技术有集成性、交互性、实时性三个显著的特征
5．（2020·浙江模拟）小王用Flash软件制作动画作品，时间轴编辑界面如下图所示，下列说法不正确的是(　　)
A．声音的同步方式设置为“数据流”和“事件”，效果是一样的
B．清除“按钮”图层第1帧，不会影响动画播放效果
C．在“男孩”图层第26帧插入空白关键帧，不会影响动画效果
D．交换男孩和配乐图层的位置，不会影响动画效果
6．（2019高二下·临海期中）将一个动画导出为AVI格式视频，导出设置如图所示。
若导出后的视频文件存储容量43.95MB，则该动画总帧数约为（　　）
A．38 B．150 C．300 D．1200
7．（2020·浙江模拟）某算法的部分流程图如下图所示，执行这部分流程后，输出的值为(　　)
A．循环体被执行了20次 B．输出变量s的值为30
C．语句i=i+1执行9次 D．该算法是计算0+10+20的值
8．（2020·浙江模拟）VB语句“If Int(Sqr(n))=Sqr(n) Then flag=True”，下列说法正确的是(　　)
A．该语句中的两个“=”均为赋值号
B．对于任意正整数n，条件总是成立的
C．当n的值为81时，执行该语句，flag的值为False
D．该语句的功能是判断正整数n是否是完全平方数(该数能表示为某个数的平方)
9．（2020·浙江模拟）实现某算法的部分VB 程序段如下：
i=1
Do While i <= 9
If a(i) <> 0 Then
j=10
Do While j > i
If a(j)=a(i) Then a(j)=0
j=j - 1
Loop
End If
i=i+1
Loop
For i=1 To 10
If a(i) <> 0 ThenText1.Text= Text1.Text+str(a(i))
Next i
数组元素a(1)到a(10)的数据依次为“4，1，6，4，4，9，1，7，6”，则程序运行后，文本框Text1中显示的内容是(　　)
A．4 9 1 7 6 B．4 1 6 9 7 C．6 7 1 9 4 D．7 9 6 1 4
10．（2020·浙江模拟）有如下VB程序段：
s = “QUOTES：keep on going never give up！”
flag = False: m = 0
For i = 1 To Len(s)
ch = Mid(s, i, 1)
If ch >= “a” And ch <= “z” Then
If Not flag Then
m = m + 1
flag = True
End If
Else
flag = False
End If
Next i
Text1.Text = Str(m)
程序执行后文本框Text1显示的内容是(　　)
A．5 B．6 C．7 D．21
11．（2020·浙江模拟）在文本框Text1中输入n，生成一个n*n的矩阵。矩阵各元素的值均为0或1，第1个元素的值随机生成，垂直和水平方向相邻元素值均不同。程序运行的界面及实现该过程的VB程序段如下所示：
n = Val(Text1.Text)
m =
s = “ ”
For i = 1 To n * n
s = s + Str(m)
m = 1- m
If i Mod n = 0 Then
List1.AddItem s
s = “ ”
If Then m = 1- m
End If
Next i
实现该功能，则上述程序段横横线处的表达式分别为(　　)
A．①Int(Rnd) ②n Mod 2 = 0 B．①Int(Rnd) ②n Mod 2 = 1
C．①Int(Rnd+0.5) ②n Mod 2 = 0 D．①Int(Rnd+0.5) ②n Mod 2 = 1
12．（2020·浙江模拟）数组d(1)～d(100)中存储某班级50位同学的语文和数学成绩，奇数位存储语文成绩，偶数位存储对应该同学的数学成绩。该数组已经按照两科总成绩升序排序。依据对分查找思想：设计一个在数组a中查找总成绩Key的程序，如果查找成功输出语文成绩在数组中的位置。实现该功能的VB程序段如下：
Key = Val(Text1.Text)
i = 1: j = 100
Do While i <= j
m = (i + j) \2
If Then m = m - 1
Sum =
If Key = Sum Then Exit Do ′Exit Do表示退出循环
If Then
i = m + 2
Else
j = m - 2
End If
Loop
If i > j Then Text2.Text = “没有找到！” Else Text2.Text = Str(m)
实现该功能，则上述程序段划线处的表达式分别为(　　)
A．①m Mod 2 = 1 ②d(m) + d(m - 1) ③Key < Sum
B．①m Mod 2 = 1 ②d(m) + d(m + 1) ③Key > Sum
C．①m Mod 2 = 0 ②d(m) + d(m - 1) ③Key > Sum
D．①m Mod 2 = 0 ②d(m) + d(m + 1) ③Key > Sum
二、非选择题(本大题共4小题，4+8+7+7，共26分)
13．（2020·浙江模拟）小明用Excel软件处理2017年度某县建城区初中小学各学校活跃空间使用情况，如图a所示。请回答下列问题。
图a
（1）区域I4：I20的数据是I3单元格向下填充得到的，则I3单元格的公式是　 　。(计算公式：活跃空间比例=活跃空间数/用户人数*100)
（2）如图a所示，若对小学年段各学校按“用户人数”为主要关键字，“活跃空间比例”为次要关键字进行了排序，若对初中各学校也进行相同方法进行排序，排序后C6单元格显示的学校代码是　 　。
（3）为直观地比较两个年段学校各学校活跃空间使用情况的差异，他制作了如图b所示的图表。该图表的数据区域是　 　。
图b
（4）把图a所示中A2：I18的区域复制到新工作表中，并按图c和图d所示的方式进行筛选，筛选后显示的学校有　 　所。
14．（2020·浙江模拟）小明制作了一个名为“端午．fla”的Flash动画，如图1所示。回答以下问题：
图1
（1）如图1所示，小王在“声音”图层添加了背景音乐，想实现声音与动画同步，应在声音的“同步”选项中选择　 　(填：事件/开始/数据流)类型；若声音同步设置成功，已知“按钮”图层第60帧上设置了帧命令“stop()；”，音乐播放时间是　 　秒。
（2）如图2所示，名称为“水波”的元件类型是　 　(填：图形/按钮/影片剪辑)，如图1所示，在“水波动画”图层的第5帧上放置了如图2所示的“水波”元件实例。测试影片时，会不会出现水面波动的动画效果？　 　
图2
（3）“play”按钮的编辑界面如图3所示：
图3
下面说法正确的是________(多选，填字母)。
A．在“按下”帧中不能直接添加声音效果
B．将“树叶”图层隐藏后，测试影片时将看不见该图层中的内容
C．测试影片时，鼠标移到该按钮实例上时，不会出现小手形状
D．测试影片时，鼠标移到该按钮实例上时，按钮外观可能会有变化
（4）如图1所示，为实现单击“play”按钮，动画跳转到“main”场景第1帧继续播放，小王需要在“play”按钮添加动作命令　 　。
15．（2020·浙江模拟）小军学习了冒泡排序算法后觉得算法还有优化的余地：假设区间[1，i]内的元素已经有序，接下来对[i+1，n]所有元素进行扫描比较，扫描完后记住最后一次交换的位置last_exchange，这个位置说明了区间[i+1，last_exchange-1]内的元素是有序的。标准冒泡排序算法下一遍的扫描区间是[i+2，n]，而有了last_exchange位置信息后，下一遍的扫描区间只要[last_exchange，n]即可。小军用VB实现了该算法，运行的界面如图所示。
Const maxn = 1000
Dim a(0 To maxn) As Long
Private Sub Form_Load()
′产生maxn个不相同的数据，并把他存储在a数组中，代码略
End Sub
Private Sub Command1_Click()
Dim i As Long, j As Long, tmp As Long, cnt As Long
Dim last_exchange As Integer ′记录最后一次交换位置
Dim tmp_pos As Integer ′本次交换的位置
cnt = 0: i = 1
last_exchange = 0: tmp_pos = 1
Do While ′改错
last_exchange = tmp_pos
For j = maxn To last_exchange + 1 Step -1
If a(j) < a(j - 1) Then
tmp = a(j): a(j) = a(j - 1): a(j - 1) = tmp
cnt = cnt + 1
End If
Next j
i = tmp_pos
Loop
′输出，代码略
End Sub
（1）代码“Private Sub Command1_Click()”中的Click是　 　。(单选，填字母：A . 对象名/B . 属性名/C . 事件名)
（2）程序代码中，Do While语句加框处有错，请改正。
（3）程序代码中，将横线处语句补充完整。
（4）程序代码中，cnt变量的含义是　 　。(单选，填字母：A . 表示一趟加工中交换次数/B . 排序中总共交换次数/C . 排序中总共比较次数)
16．（2020·浙江模拟）某会所采用会员制度，对会员消费实行积分奖励，利用VB编写一个程序，实现的功能：在文本框Text1、Text2中输入一个积分的范围，在列表框List2中显示该范围内的会员编号和对应的积分。多个会员可能有相同的积分，先用对分查找法找到该范围内的最小积分编号的下标，再循环输出该范围的会员编号情况。程序运行界面如图所示。
程序代码如下，为实现以上功能，请在横线处填写合适的代码：
Dim jf(800) As Integer, hyh(800) As String, n As Integer
Dim n As Integer ′表示会员的总人数
Private Sub Form_Load()
′从数据库中读取会员编号和积分，并按积分值从小到大排序，显示在列表框List1中
For i=1 To n
List1.AddItem hyh(i)+“ ”+Str(jf(i))
Next i
End Sub
Private Sub Command1_Click()
Dim i As Integer, j As Integer, m As Integer, k1 As Integer, k2 As Integer
k1=Val(Text1.Text): k2=Val(Text2.Text)
If k1 > k2 Then t=k1: k1=k2: k2=t
If k1 > jf(n) Or k2 < jf(1) Then
List2.AddItem “没有找到该范围的数据！”
Text3.Text=“0”： Exit Sub
End If
i=1
j=n
Do While i <= j
m=Int((i+j) / 2)
If jf(m) > k1 Then
j=m - 1
ElseIf jf(m) < k1 Then
i=m+1
Else
If　 　 Then
j=m - 1
Else
p=m
Exit Do
End If
End If
Loop
If i > j Then p =　 　
k=0
Do While 　 　 And p <= n
List2.AddItem hyh(p)+ “ ”+Str(jf(p))
　 　
p=p+1
Loop
Text3.Text=Str(k)0
End Sub
答案解析部分
1．【答案】D
【知识点】信息及其特征；信息的编码；信息系统安全防护
2．【答案】A
【知识点】网络资源的类型、下载与保存；浏览器
3．【答案】D
【知识点】数据表、字段、记录的概念；数据表、字段、记录的编辑
4．【答案】C
【知识点】多媒体技术的概念和特征
【解析】【解答】多媒体技术中的媒体可以是表示信息的载体，如图片、声音等，也可以是存储信息的载体。多媒体主要有三大特性，但并不是一定需要计算机来加工处理。故答案选C。
【分析】本题考查的是多媒体技术的概念及应用。多媒体技术是指以计算机为平台综合处理多种媒体信息，如文本、图形、图像、声音、动画和视频，在多种信息之间建立起逻辑连接，并具有人机交互功能的集成系统。
5．【答案】B
【知识点】时间轴、帧、图层、库的概念及基本操作
6．【答案】C
【知识点】声音、图像、视频编码
【解析】【解答】43.95MB=45004.8KB=46084915.2B，16位彩色占2个字节。该动画的总帧数=46084915.2/(320*240*2)=300.032，四舍五入为300帧，故答案选C。
【分析】本题考查的是视频文件的存储容量的计算公式。视频文件存储容量=（水平像素×垂直像素×每个像素所需位数／8）*帧频*时长（字节），其中帧频*时长就是动画的总帧数。
7．【答案】C
【知识点】常量、变量及变量的赋值；流程图识读
8．【答案】D
【知识点】常量、变量及变量的赋值
9．【答案】B
【知识点】常量、变量及变量的赋值；查找算法及程序实现
10．【答案】B
【知识点】分支结构语句及程序实现；循环结构语句及程序实现
11．【答案】C
【知识点】常见数据类型、数组；运算符、基本运算与表达式；常量、变量及变量的赋值
12．【答案】D
【知识点】常量、变量及变量的赋值；查找算法及程序实现
13．【答案】（1）=H3/D3*100
（2）CZ03
（3）C2：D2，C15：D16，H2：I2，H15：I16
（4）3
【知识点】表格数据的基本操作；表格数据的处理与计算
14．【答案】（1）数据流；5
（2）影片剪辑；会
（3）A；D
（4）on(release){gotoandplay(“main”，1)；}
【知识点】时间轴、帧、图层、库的概念及基本操作；元件的类型与应用；常用影片控制函数的应用
15．【答案】（1）C
（2）i < maxn And last_exchange <> tmp_pos
（3）tmp_pos = j
（4）B
【知识点】排序算法及程序实现；分支结构语句及程序实现；循环结构语句及程序实现
16．【答案】jf(m)=jf(m - 1)；i；jf(p) <= k2；k=k+1
【知识点】常量、变量及变量的赋值；查找算法及程序实现；分支结构语句及程序实现；循环结构语句及程序实现
1 / 1

展开更多......

收起↑