2020年6月浙江省普通高等学校招生选考科目考试模拟卷技术试题（五）信息技术试卷（PDF版含解析）

中正教育-信息技术选考模拟卷（五） 5 / 8
如图所示，“东”图层第 40 帧到第 80 帧实现了由图片“东”逐渐变为汉字“东”的动画效果，
该动画补间类型为 。
（3）“先生”图层播放到第 41 帧时，“先生”突然不见，为了使“先生”一直存在，正确的操
作是 。
（4）如图所示，执行“测试场景”操作，播放的场景是 。（填场景名）。
（5）测试影片时，单击“相遇”场景中“相救”按钮,影片跳转到“故事”场景第 1 帧并停止
播放，则“相救”按钮的动作脚本命令为 。
（6）Flash 中用十六进制表示颜色值，例如 RGB（255,0,160）用十六进制表示的颜色值为
#FF00A0，则红色的十六进制颜色值为# 。
15.若字符串 c 是在字符串 s 的任意位置插入任意多个字符后构成的新字符串，则称字符串 c 为
字符串 s 的扩展字符串。判断扩展字符串的 VB 程序界面如图所示，在文本框 Text1 和 Text2 中
分别输入字符串 s 和 c，单击“判断”按钮 Command1，如果字符串 c 为字符串 s 的扩展字符
串，则在文本框 Text3 中输出“是”及新加字符的内容，否则输出“否”。
（1）结合题意，窗体中属于 TextBox 类对象的共有 个（填数字）。
（2）加框处的程序代码有错，请改正。

中正教育-信息技术选考模拟卷（五） 7 / 8
小明依据上述描述设计了如下 VB 程序。请回答下列问题：
（1）若数组 a 的值是：“145,34,12,134,12”，数组 b（1）的值是 。
（2）请在划线处填入合适的代码。
Const n=20
Dim a(1 To n) As Integer
Private Sub Form_Load()
'读取 n 个数据，依次存储到 a(1)、a(2)、……a(n)中，代码略
End Sub
Private Sub Command1_Click()
Dim b(1 To n) As Integer '存储数列最小的值
Dim c(1 To n) As String '存储下降数列
Dim i As Integer, bottom As Integer, j As Integer
Dim bn As Integer ’存储下降数列个数
b(1) = a(1)
①
c(1) = Str(a(1))
For i = 2 To n
For j = 1 To bn
If ② Then
b(j) = a(i)
c(j) = c(j) + Str(a(i))
Exit For
End If
Next j
If j > bn Then
bn = bn + 1
中正教育-信息技术选考模拟卷（五） 8 / 8
③
c(bn) = Str(a(i))
End If
Next i
For i = 1 To bn
List1.AddItem c(i)
Next i
Text2.Text = "数列中共有" + Str(bn) + "个下降序列"
End Sub