则小王进行的操作是：
⑴选择数据区域 ② ；⑵执行筛选命令；⑶针对 ③ 设置筛选条件 ④ 。
A B
C D
（3）为各个城市排名（污染指数小的排名在前），小王利用百度百科查到了RANK()函数，函数功能如下： rank函数是排名函数。rank函数最常用的是求某一个数值在某一区域内的排名。 rank函数语法形式：rank(number. ref.[order]) 函数名后面的参数中number为需要求排名的那个数值或者单元格名称（单元格内必须为数字），ref为排名的参照数值区域，order的值为0和1，默认不用输入，得到的就是从大到小的排名，若是想求倒数第几，order的值请使用1。 他在仔细阅读之后进行了这样的设置（第13题-2图）可结果如第13题-3图，明显与事实不符合，请你写出正确的函数设置 ⑤ 。
（4）图表可以更直观地反应当天各城市的空气质量情况，如第13题-4图所示。为了使图表中的文字更加美观，在图表区单击鼠第13题-2图 标右键后弹出第13题-5图所示菜单，应选择 ⑥ 命令修改图表中文字的字体。 浙江省城市空气质量指数 250 200 污染指数 150 100 50 （第13题-5图） 0 第13题-4图
14.编写VB程序，实现如下功能：在文本框Text1中输入包含数字、字母的字符串，单击“统 计”按钮Commandl，统计该字符串中数字字符的个数，并在标签Label1中输出结果。界面如第14题-1图所示。
富阳市 临安市 湖州市 嘉兴市 金华市 丽水市 杭州市 宁波市 衢州市 绍兴市 台州市 温州市 义乌市 舟山市 诸暨市 高一技术·试题卷 第5页（共15页）
第14题-1图 第14题-2图 （1）在设计应用程序界面时，应使用第14题-2图所示“控件工具箱”中的 ① （填写相应编号）添加“统计”按钮。
（2）为实现上述功能，请在划线处填入合适代码或选项。 Private Sub Commandl_Click()
Dim s As String，c As String
Dim i As Integer，n As Integer，num As Integer s = ② （填程序代码） num = 0 n = Len(s)
③ '（填字母:从下列A、B、C三个选项中选取一项） ④ '（填字母:从下列A、B、C三个选项中选取一项） If c>= \ Then num = num + 1 End If Next i
Labell. Caption = str(num) End Sub
划线③、④的选项： A. Do While i <= n B. c = Mid(s,i,1) C. For i = 1 To n
15.完全数又称完美数，是指其所有的真因子（即除了自身以外的约数）之和，恰好等于它本身。例如：6的真因子为1、2、3，相加等于其本身（1+2+3=6），所以6是一个完全数。现编写VB程序，求完全数。其功能如下：输入一个正整数n，点击“查找”按钮，在列表框List1中输出小于n的所有完全数。界面如第15题-1图所示：
第15题-1图 第15题-2图
（1）在界面设计时，①处使用“控件工具箱”中（如第15题-2图所示） ① （填写编号）添加“List1”列表框。为了将其背景设置为灰色，则应在属性面板中（如第15题-3图所示），对 ② 属性进行设置。
高一技术·试题卷 第6页（共15页）
（2）该程序的代码如下： Private Sub Command1_Click() Dim n, r, j, i As Integer
n=Val(Text1.Text) ‘ 求n以内的完全数 For i=1 To n-1 ‘外循环
r=0 ‘存放i的约数之和，初值为0 For j=1 To i-1 ‘内循环，从1到i-1找约数 If ③ Then ‘判断是否是约数 r=r+j ‘把约数都加起来 End If Next j
If r = i Then ‘如果约数之和与i相等，为完全数 ④ ‘输出在列表框 r=0 ‘和清零 End If Next i
（第15题-3图） End Sub
（3）运行程序，出现错误提示（如第15题-4图所示）改正方法： ⑤
（第15题-4图）
16.小李使用flash制作了一个主题为“快乐的童年.fla”,部分制作界面如图所示：
（第16题-1图）
高一技术·试题卷 第7页（共15页）
（1）由第16题-1图可知，若要将该场景完整播放一次的时间增加到原来的1.5倍。则需将帧频修改为 ① fps。
（第16题-2图）
（2）小李为了实现“鸟”一边起行，一边抖动翅膀的效果，创建了一个名为“鸟”的元件（如第16题-2图所示），该元件类型是： ② ，“翅膀1”第1帧到第12帧之间的动画类型是 ③ （填：逐帧动画/形状补间/动画补间）。
（3）根据脚本设计，该场景播放结束后，自动跳转到本场景的第1帧循环播放，可以在鸟图层的最后一帧加入帧命令 ④ 。
（4）测试影片时，发现鼠标移动到 “play”按钮时没有出现小手形状，按钮制作界面如第16题-3图所示，其原因为： ⑤ ， 解决方法： ⑥ 。
（第16题-3图）
高一技术·试题卷 第8页（共15页）