Label1.Caption=Mid（b,a,6）
Else
Label1.Caption="error"
EndIf
该程序段运行后，在标签Label1上显示的是____________
A．errorB.6C.ButtonD.Command
12．有如下VB程序段
PrivateSubCommand1_Click（）
DimsAsInteger
DimiAsInteger
s=0
Fori=1To20Step2
Ifs<20Then
s=s+i
End
If
Nexti
Text1.Text=Str（s）
Tex
t
2.Text=Str（i）
EndSub
执行以上程序后，变量s和i的值分别为
A．920B.1621C.2511D.2521
二、非选择题（本大题共5小题，其中第13小题4分，第14小题4分，第15小题8分，第16小题6分，第17小题4分，共26分）
13．小李收集了2010年到2014年中国亚洲个别国家入境游信息。
并用Excel软件进行数据处理，如图13-1所示。
请回答下列问
题：
第13题-1图
第13题-2图
（1）将标题“近5年亚洲各国入境游客分析”设置为合并及居中，需要在“设置单元格格式”哪个选项中设置。
（请选填字线：
A.数字/B.对齐/C.字体）
（2）区域H4：
H12中的数据时从H3单元格利用自动填充功能得到的。
则H4单元格的公式是。
（3）若要对表中数据以“2014年（万人次）”为关键字按降序进行排序，则排序时选择的数据区域是。
（4）小李建立的图表如图第13题-2图所示，其数据源是。
14．观看第14题-1图，回答下面的问题：
第14题-1图
（1）该文件的扩展名为。
（2）该文件的存储容量为（保留整数）MB，如把当前选种的声音设置“静音”后，文件的存储容量（有/没有）改变。
（3）当前状态下如进行“剪裁”操作，文件声音长度会变为秒。
15、小红做了一个名为“圣诞快乐”的flash动画，制作脚本和界面如下，请回答下面问题
模块名：
“Main”场景
类别序号：
2
进入方式：
由“load”场景单击“播放”按钮进入
呈现方式：
1.文字“圣诞快乐”变为灯笼图形，又从灯笼图形重变为文字“圣诞快乐”。
2.“重播”按钮和“关闭”按钮在舞台下方，单击“重播”按钮，将从该场景第1帧开始播放；单击“关闭”按钮，将关掉整个flash影片。
呈现顺序说明：
1.一开始出现背景图片、声音和“圣诞快乐”的动画，再依次出现“圣诞老人”动画。
2.最后出现“重播”按钮和“关闭”按钮
，并停止播放。
第15题-1图
（1）该场景的动画完整地播放一次，需要
秒时间。
（2）文字“圣诞快乐”逐渐变为灯笼图形，这个过程是一个补间动画（请选填字母：
A形状/B动画）。
（3）“圣诞老人”从26帧到60帧实现完全透明到完全显示的效果，则应该将第26帧处“圣诞老人”实例的Alpha属性设置为%。
（4）测试动画时发现背景一闪而过，如何修改。
（5）若要实现制作脚本上的动画效果，则“重播”按钮上的脚本是，“关闭
”按钮上的脚本为。
16、王敏的E-Mail邮箱密码忘记了，但她需要收一封很重要的来信，请你帮她尽可能找出密码。
她零星记得自己密码信息：
①密码是六位数字，前面两位为31；
②最后两位数字相同；
③能被16和46整除。
程序界面如图所示，单击"帮助找回密码"按钮（Command1）后，可能的密码显示在列表框List1中。
解决此问题的相应程序如下：
PrivateSubCommand1_Click（）
DimaAsInteger,sAslong,bAs
Integer,iAsInteger
Fori=0To9999
s=①
IfsMod46=0andsmod16=0Then
a=smod10
b=②
Ifa=bThen
List1.AddItemStr（s）
EndIf
EndIf
Nexti
EndSub
（1）解决此问题的主要算法是________________。
（选填：
枚举算法或解析算法）
（2）窗口上的“找密码”是对form1对象的属性设置的
在程序①和②划线处，填入适当的语句或表达式，把程序补充完整：
（3）程序中①划线处应填入__________________。
（4）程序中②划线处应填入__________________。
17、编写一个VB程序，实现如下功能：
在文本框text1中输入英文句子，单击“第1个最长单词”按钮，找到第1个最长单词并显示在文本框text2中。
运行效果如图所示
为实现上述功能，请在画线处填入合适代码
PrivateSubCommand1_Click（）
DimsAsString,mAsString
DimnAsInteger,cAsInteger,maxAsInteger,tAsInteger
s=Text1.Text
n=Len（s）
c=0
max=0
Fori=1Ton
m=
‘截取字符串中的每个字符
Ifm>="a"Andm<="z"Orm>="A"Andm<="Z"Then
c=c+1
Else
Ifc>maxThen
max=c
t=i-1
EndIf
c=0
EndIf
Ifi=nThen
Ifc>maxThen
max=c
t=i
EndIf
EndIf
Nexti
Text2.Text=Mid（s,
max）
EndSub
（1）程序中
处填入的代码是：
（2）程序中
处填入的代码是下列哪个选项（）
A．tB．t-maxC．t-max+1D．t-max-1
2016学年第一学期温州市十校联合体高二期末联考
技术试卷
第一部分信息技术（50分）
答题卷
一、选择题（本大题共12小题，每小题2分，共24分。
每小题列出的四个备选项中只有一个是符合题目要求的，不选、多选、错选均不得分）
题号
1
2
3
4
5
6
7
8
9
答案
A
B
B
C
C
A
A
C
D
题号
10
11
12
答案
C
C
D
二、非选择题（本大题共5小题，第13小题4分，第14小题4分，第15小题8分，第16小题6分，第17小题4分，共26分）
13、
（1）B（1分）
（2）=Rank（G4,$G$3:
$G$12）（1分）
（3）A2:
H12（1分）（4）A2:
A12,G2:
G12（1分）
14、
（1）WAV（1分）
（2）40（1分）没有（1分）
（3）60（1分）
15、
（1）5（1分）
（2）形状（1分）
（3）0（1分）
（4）在“背景”图层的第60帧处插入帧（1分）
（5）on（release）{gotoandplay
（1）;}（2分）
on（release）{fscommand（“quit”）;}（2分）
16、
（1）枚举算法（1分）
（2）Caption（1分）
（3）310000+i（2分）（4）s\10mod10（2分）
17、
（1）mid（s,i,1）（2分）
C（2分）
升级会员 