資源簡(jiǎn)介

中正教育-信息技術(shù)選考模擬卷（五） 5 / 8
如圖所示，“東”圖層第 40 幀到第 80 幀實(shí)現(xiàn)了由圖片“東”逐漸變?yōu)闈h字“東”的動(dòng)畫效果，
該動(dòng)畫補(bǔ)間類型為 。
（3）“先生”圖層播放到第 41 幀時(shí)，“先生”突然不見，為了使“先生”一直存在，正確的操
作是 。
（4）如圖所示，執(zhí)行“測(cè)試場(chǎng)景”操作，播放的場(chǎng)景是 。（填場(chǎng)景名）。
（5）測(cè)試影片時(shí)，單擊“相遇”場(chǎng)景中“相救”按鈕,影片跳轉(zhuǎn)到“故事”場(chǎng)景第 1 幀并停止
播放，則“相救”按鈕的動(dòng)作腳本命令為 。
（6）Flash 中用十六進(jìn)制表示顏色值，例如 RGB（255,0,160）用十六進(jìn)制表示的顏色值為
#FF00A0，則紅色的十六進(jìn)制顏色值為# 。
15.若字符串 c 是在字符串 s 的任意位置插入任意多個(gè)字符后構(gòu)成的新字符串，則稱字符串 c 為
字符串 s 的擴(kuò)展字符串。判斷擴(kuò)展字符串的 VB 程序界面如圖所示，在文本框 Text1 和 Text2 中
分別輸入字符串 s 和 c，單擊“判斷”按鈕 Command1，如果字符串 c 為字符串 s 的擴(kuò)展字符
串，則在文本框 Text3 中輸出“是”及新加字符的內(nèi)容，否則輸出“否”。
（1）結(jié)合題意，窗體中屬于 TextBox 類對(duì)象的共有 個(gè)（填數(shù)字）。
（2）加框處的程序代碼有錯(cuò)，請(qǐng)改正。

中正教育-信息技術(shù)選考模擬卷（五） 7 / 8
小明依據(jù)上述描述設(shè)計(jì)了如下 VB 程序。請(qǐng)回答下列問(wèn)題：
（1）若數(shù)組 a 的值是：“145,34,12,134,12”，數(shù)組 b（1）的值是 。
（2）請(qǐng)?jiān)趧澗€處填入合適的代碼。
Const n=20
Dim a(1 To n) As Integer
Private Sub Form_Load()
'讀取 n 個(gè)數(shù)據(jù)，依次存儲(chǔ)到 a(1)、a(2)、……a(n)中，代碼略
End Sub
Private Sub Command1_Click()
Dim b(1 To n) As Integer '存儲(chǔ)數(shù)列最小的值
Dim c(1 To n) As String '存儲(chǔ)下降數(shù)列
Dim i As Integer, bottom As Integer, j As Integer
Dim bn As Integer ’存儲(chǔ)下降數(shù)列個(gè)數(shù)
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
中正教育-信息技術(shù)選考模擬卷（五） 8 / 8
③
c(bn) = Str(a(i))
End If
Next i
For i = 1 To bn
List1.AddItem c(i)
Next i
Text2.Text = "數(shù)列中共有" + Str(bn) + "個(gè)下降序列"
End Sub

展開更多......

收起↑