資源簡介

【xj】浙江省2019-2020學年高中信息技術優化提升測評卷（一）
一、填空題
1．（2020·浙江模擬）下列有關信息技術的說法，正確的是（　　）
A．信息技術是對文字信息進行加工和處理時使用的技術
B．隨著信息技術的發展，只需要計算機就能完成信息的處理
C．1946年第一臺電子計算機誕生后才有信息技術
D．計算機技術的發展促進了信息技術的發展
2．（2020高一下·東臺月考）將郵件從電子郵箱服務器中傳送到本地計算機時采用的協議名稱是（　　）
A．SMTP B．НТТР C．РОРЗ D．FTP
3．（2020·浙江模擬）下列選項中，體現人工智能技術的有（　　）
①利用語音方式控制機器人
②使用智能手機在微信傳輸語音
③電飯鍋的自動保溫功能
④使用面部識別技術解鎖手機
⑤停車場自動計費系統的汽車牌照識別功能
A．①④⑤ B．①③④ C．②④⑤ D．③④⑤
4．（2020·浙江模擬）以下有關數據庫的說法，正確的是（　　）
A．數據表中同一字段內的數據類型一定是相同的
B．數據庫應用系統可以完全脫離數據庫管理系統獨立運行
C．一個數據庫文件同一時間內只允許一個用戶訪問
D．Access和oracle都是常見的小型數據庫管理系統
5．使用UltraEdit軟件查看“浙江選考2019”的內碼，部分界面如圖所示。
下列說法正確的是（　　）
A．圖中所有字符內碼值的十進制表示均小于128
B．圖中出現的字母的內碼為十六進制數,其余的是十進制數
C．數字“10”的內碼值用二進制數表示為0011000100110000
D．圖中共有8個字符，所占字節數為13
6．（2020·浙江模擬）使用GoldWave軟件進行作品制作，部分操作界面如圖所示。
下列說法不正確的是（　　）
A．在當前狀態下插入15秒靜音，音頻文件存儲容量將變大
B．執行“刪除”命令后直接保存，音頻文件存儲容量將變小
C．該音頻文件采用無損壓縮格式，其采樣頻率為44.1KHz
D．現對該音頻的后5秒設置“淡出”效果并按原格式、原參數保存，存儲空間不變
7．（2020·浙江模擬）在Photoshop軟件中編輯某文檔，其部分界面如圖所示。
下列說法正確的是（　　）
A．“背景”圖層的下方可能有其他圖層
B．可以直接在“背景”圖層做“鏡頭光暈”濾鏡操作
C．將此文檔保存為jpg格式后，“英文”圖層的圖層樣式仍可見
D．可以在“貓和老鼠”圖層使用文字工具修改該圖層的文字內容
8．（2020高三上·浙江月考）某算法的部分流程圖如圖所示。執行這部分流程后，輸出sum，i的值分別是（　　）
A．28，6 B．60，6 C．28，5 D．60，5
9．某對分查找算法的VB程序段如下：
i=1: j=6: n=0: f=False
key=Val(Text1.Text)
Do While i<=j and Not f
n=n+1
m=Fix((i+j)/2)
If key=a(m)then f=True
If keyLoop
數組元素a(1)到a(6)的值依次為“12，19，27，31，46，55”，文本框Text 1中輸入“31”后運行該程序，則以上程序段運行結束后，下列說法不正確的是（　　）
A．變量i的值為4 B．變量j的值為4
C．變量m的值為4 D．變量n的值為3
10．（2020·浙江模擬）某排序算法，VB代碼如下：
i=1
Do While i<=5
If i = 0 or a(i – 1)<= a(i) Then
i=i+1
Else
t=a(i):a(i)=a(i-1):a(i-1)=t
i=i-1
End If
Loop
數組元素a(0)到a(5)依次為：“0，41，22，53，99，36”，經過該程序段處理后，數組元素a(3)的值為（　　）
A．36 B．53 C．41 D．22
11．（2020·浙江模擬）a(1)=17:a(2)=16:a(3)=12:a(4)=18:a(5)=15:a(6)=13:a(7)=17:a(8)=20
i=2
Do While i <=8
If i mod 2=0 and a(i)>a(i-1) then
t=a(i):a(i)=a(i-1):a(i-1)=t
ElseIf a(i-1) mod 2=1 then
a(i-1)=a(i-1)+1
End If
i=i+1
Loop
執行程序后，a數組各元素是（　　）
A．17，16，18，12，16，14，20，18
B．18，16，18，12，16，14，20，17
C．16，17，18，12，13，16，20，17
D．18，16，18，12，14，15，17，20
12．（2020·浙江模擬）（加試題）若數組元素d(1)到d(8)的值依次為“6,9,12,18,20,28,32,45”，查找Key值的VB程序段如下：
t(1) = 1: t(2) = 1
For i = 3 To 5
t(i) = t(i - 1) + t(i -2)
Next i
Key =13
i=1: j=8: k=6
Do While i <=j
m = i+t(k-1) ‘①
If Key = d ( m ) Then Exit Do ‘Exit Do表示退出循環
If d(m) > Key Then
j= m - 1
k=k-1
Else
i = m + 1
k=k-2
End If
Loop
運行該程序段后，①處的賦值語句共執行（　　）
A．1次 B．2次 C．3次 D．4次
二、操作題
13．（2020·浙江模擬）小林收集了某批發市場的冰激凌價格，并使用Excel軟件進行數據處理，如下圖所示。
請回答下列問題：
（1）若要使標題欄的格式如下圖所示，則可行的操作是　 　。
（2）已知列G的數值是通過公式“零售價一單支”得到，若對列E的數據進行“減少小數位數”操作，列G的數值　 　。（會變/不變）
（3）小林要找出規格為40的冰激凌中利潤最大的一項，可進行如下操作：以“規格”為40進行篩選，再以　 　為關鍵字進行降序排序。
（4）若要在列H利用Rank函數計算出所有冰激凌的利潤排名，并且利用自動填充功能填充，則H4單元格的公式為　 　。（RANK函數格式：RANK（number，ref，order），返回某數字在一列數字中相對于其他數值的大小排名，如：RANK（A1，A1：A10）表示單元格A1中的數據在區域Al：A10中的排名）
14．（2020·浙江模擬）小六創作“夏夜旅行”的多媒體作品。回答下列問題：
（1）在作品設計的過程中，下列屬于需求分析的是　 　（多選，填字母： A .確定作品屬于益智類游戲/ B .確定“片頭”界面尺寸、素材組織與來源、交互方式等/ C .確定該作品用于豐富學生的課余生活/D .確定該作品完成后將以網頁方式發布到網絡服務器上/ E .確定作品由五個界面組成）。
（2）Flash動畫部分界面如圖所示，“燈閃”圖層第10幀到第40幀實現了燈光淡入的動畫效果，該動畫補間類型為　 　。
（3）圖中“蝴蝶”圖層創建了蝴蝶實例從位置坐標（c，y）為（110，410）的A點出發，飛到B點（270，180）并稍作停留，最后飛到C點（500，100）的動畫。若僅對第20幀執行清除關鍵幀操作，則測試場景時　 　（多選，填字母：A
.蝴蝶從A點到C點的飛行路線沒有變化/B .蝴蝶飛到B點的同時“漣漪”圖層的動畫開始/ C .蝴蝶從A點到B點的飛行時間變長 / D .蝴蝶從B點到C點的飛行速度變慢）。
（4）如圖所示，為使“音樂”圖層的音樂與“燈閃”動畫同步開始播放。對“音樂”圖層的操作是　 　。
（5）測試影片時，單擊“跳過片頭”按鈕，使動畫跳轉到“主界面”場景第1幀播放，則在該按鈕上添加的動作腳本是　 　。
15．（2020·浙江模擬）在平面坐標系中，給定任意個點，求出這些點中與點（1，1）距離最遠的點。小李編寫出了相應功能的程序：在文本框Text1中輸入這些點的坐標值（數據都用逗號分隔并以逗號結尾），單擊“計算”按鈕Cmd后，程序計算這些點到（1，1）的距離后，結果顯示在列表框List1中，并且輸出最大距離的點。程序運行界面如圖所示。
（1）由圖可知，窗體中的對象共有　 　類；
（2）實現上述功能的VB程序如下，請在畫線處填入合適的代碼。
Private
Sub Command1_Click()
Dim i, k As Integer
Dim x1, y1, x2, y2 As Single
Dim v As Single, maxd As Single
Dim s As String, pos zb As String
List1.Clear
s=Text1.Text
x1=1:y1=1
t="": k=1: j=1
List1.AddItem"坐標點"&"距離"
For i=1 To Len(s)
If Mid(s,i,1)="," Then
v=Val(Mid(s, j, i-j))
j=　 　
If k Mod 2=1 Then
x2=v
Else
y2=v
d=Sqr((x2-x1)^2+(y2-y1)^2)
If　 　 Then
maxd=d
pos="(" &
Str(x2)& "," & Str(y2)& ")"
End If
List1.AddItem"("
& Str(x2)& "," & Str(y2)& ")" & Str(d)
End If
k=k+1
End If
Next i
Label1.Caption="距離（1, 1）最遠的點為"& pos &"距離為"&
Str(maxd)
End
Sub
（3）若文本框Text1中輸入的內容為“31，41，26，51，1，56”，程序運行結束后，距離（1，1）最遠的坐標點是　 　。
16．（2020·浙江模擬）用VB編程求兩個字符串的最長連續公共子串，程序功能如下：在文本框Text1和Text2中分別輸入任意兩個字符串s1和s2，單擊命令按鈕
Command1，在標簽 Label3和Label4中分別輸出這兩個字符串的最長連續公共子串和子串的長度其算法思想：分別從字符串s1和s2的左邊第一個字符開始檢查，若發現這兩個字符串中有一個字符相同，則以這個字符為基準向右邊擴大搜索范圍，先檢查其后面的第一個字符是否相同，若還是相同則繼續搜索，直到找到不同的字符為止。然后按照該方法依次繼續往后搜索，直到查找結束。程序界面如圖所示，請回答下列問題：
（1）根據代碼，若輸入的s1為“Teacher”，s2為“teacher”，則最長連續公共子串為　 　。
（2）實現上述功能的VB程序如下，請在劃線處填入合適代碼。
Dim s1 As String, s2 As string, maxstr As string
Dim len1 As Integer, len2 As Integer, maxlen As Integer
Function Min (a As Integer, b As Integer) As Integer
If a >=b Then min = b else
min = a
End Function
Function Search (m As Integer, n As Integer) As Integer
Dim c As Integer
c = 1
Do While c<= Min (len1 -m, len2 - n)
If Mid (s1, m+ c, 1) = Mid(s2,n+c,1)
Then
　 　
Else
Exit Do 'Exit Do的作用是退出Do循環
End if
Loop
Search = c -1
End
function
Private
Sub Command1_Click()
s1 = Text1. Text
s2 = Text2. Text
len1 = Len (s1)
len2 = Len (s2)
maxlen = 0: maxstr = ""
Dim i As Integer, j As Integer, k As
Integer
For i=1
To len1
For j=1 To len2
If Mid(s1, i, 1) = Mid(s2,j,1) Then
k =　 　 'k用于記錄連續公共子串的長度
If (k> maxlen) Then
maxlen = k
maxstr =　 　
End if
End If
Next j
Next i
Labe13. Caption= "最長連續公共子串為:"&
maxstr
Labe14. Cantion = "該子串長度是:"& str
(maxlen)
End
sub
答案解析部分
1．【答案】D
【知識點】信息技術的概念與關鍵技術；信息技術的發展歷史
2．【答案】C
【知識點】網絡協議
【解析】【解答】SMTP負責把郵件發送到收件人的電子信箱郵件服務器中，選項A錯誤；HTTP是超文本傳輸協議，主要用于瀏覽器和Web服務器之間的信息傳輸，選項B錯誤；POP3為電子郵局協議，負責將電子信箱郵件服務器中的電子郵件傳送到本地計算機，為接收協議，選項C正確；FTP是文件傳輸協議，用于Internet上控制文件的雙向傳輸，選項D錯誤。故答案選C。
【分析】本題考查網絡協議及功能。
3．【答案】A
【知識點】人工智能的應用
4．【答案】A
【知識點】數據庫的分類與應用；數據表、字段、記錄的概念
5．【答案】C
【知識點】信息的編碼；進制及數制轉換
【解析】【解答】十進制128等于十六進制80 ，選項A錯誤；途中出現內碼均為十六進制，選項B錯誤；數字10內碼值為：30 31轉二進制為: 11000100110000 ，選項C正確；圖中共有9個字符，所占字節數為13 ，選項D錯誤。故答案選C。
【分析】本題考查的是ASCII碼和漢字編碼。用UltraEdit軟件觀察字符的內碼時，每個英文字母占用1個字節，每個漢字占用2個字節。
6．【答案】C
【知識點】聲音素材的基本處理；聲音、圖像、視頻編碼
7．【答案】B
【知識點】圖片加工常用工具的使用；圖層及圖層的基本操作
8．【答案】A
【知識點】算法的控制結構；流程圖識讀
【解析】【解答】流程分析：
i的初始值為1，sum的初始值為0；
i=1，i≤5成立，r=2^1=2，r<4，i=1+1=2；
i=2，i≤5成立，r=2^2=4，4≤r≤16成立，sum=0+4=4，i=2+1=3;
i=3，i≤5成立，r=2^3=8，4≤r≤16成立，sum=4+8=12，i=3+1=4；
i=4，i≤5成立，r=2^4=16，4≤r≤16成立，sum=12+16=28，i=4+1=5；
i=5，i≤5成立，r=2^5=32，r>16，i=5+1=6；
i=6，i≤5不成立，退出循環，sum=28，i=6。
故答案選A。
【分析】本題考查的是對流程圖的識讀。
9．【答案】A
【知識點】查找算法及程序實現
10．【答案】C
【知識點】排序算法及程序實現；循環結構語句及程序實現
11．【答案】B
【知識點】分支結構語句及程序實現；循環結構語句及程序實現
12．【答案】C
【知識點】分支結構語句及程序實現；循環結構語句及程序實現
13．【答案】（1）選中A1：G1，單擊“合并后居中”
（2）不變
（3）利潤（元/支）或 列G
（4）=RANK(G4，$ G $ 3：$ G $ 18)或=RANK(G4，G $ 3：G $ 18)
【知識點】表格數據的處理與計算
14．【答案】（1）ACD
（2）形狀
（3）AC
（4）移動第1幀到第10幀
（5）on(press){gotoandplay(“主界面”,1}
【知識點】多媒體作品的規劃和設計；動畫的類型；時間軸、幀、圖層、庫的概念及基本操作；動畫的實現；常用影片控制函數的應用
15．【答案】（1）4
（2）i+1；d > maxd
（3）(26,51)
【知識點】類、對象、屬性、方法、事件和事件處理的概念及應用；解析算法及程序實現
16．【答案】（1）eacher
（2）c=c+1；search(i,j)+1；mid(s1,i,k)或mid(s2,j,k)或其他等價答案。
【知識點】過程與自定義函數；查找算法及程序實現
1 / 1【xj】浙江省2019-2020學年高中信息技術優化提升測評卷（一）
一、填空題
1．（2020·浙江模擬）下列有關信息技術的說法，正確的是（　　）
A．信息技術是對文字信息進行加工和處理時使用的技術
B．隨著信息技術的發展，只需要計算機就能完成信息的處理
C．1946年第一臺電子計算機誕生后才有信息技術
D．計算機技術的發展促進了信息技術的發展
【答案】D
【知識點】信息技術的概念與關鍵技術；信息技術的發展歷史
2．（2020高一下·東臺月考）將郵件從電子郵箱服務器中傳送到本地計算機時采用的協議名稱是（　　）
A．SMTP B．НТТР C．РОРЗ D．FTP
【答案】C
【知識點】網絡協議
【解析】【解答】SMTP負責把郵件發送到收件人的電子信箱郵件服務器中，選項A錯誤；HTTP是超文本傳輸協議，主要用于瀏覽器和Web服務器之間的信息傳輸，選項B錯誤；POP3為電子郵局協議，負責將電子信箱郵件服務器中的電子郵件傳送到本地計算機，為接收協議，選項C正確；FTP是文件傳輸協議，用于Internet上控制文件的雙向傳輸，選項D錯誤。故答案選C。
【分析】本題考查網絡協議及功能。
3．（2020·浙江模擬）下列選項中，體現人工智能技術的有（　　）
①利用語音方式控制機器人
②使用智能手機在微信傳輸語音
③電飯鍋的自動保溫功能
④使用面部識別技術解鎖手機
⑤停車場自動計費系統的汽車牌照識別功能
A．①④⑤ B．①③④ C．②④⑤ D．③④⑤
【答案】A
【知識點】人工智能的應用
4．（2020·浙江模擬）以下有關數據庫的說法，正確的是（　　）
A．數據表中同一字段內的數據類型一定是相同的
B．數據庫應用系統可以完全脫離數據庫管理系統獨立運行
C．一個數據庫文件同一時間內只允許一個用戶訪問
D．Access和oracle都是常見的小型數據庫管理系統
【答案】A
【知識點】數據庫的分類與應用；數據表、字段、記錄的概念
5．使用UltraEdit軟件查看“浙江選考2019”的內碼，部分界面如圖所示。
下列說法正確的是（　　）
A．圖中所有字符內碼值的十進制表示均小于128
B．圖中出現的字母的內碼為十六進制數,其余的是十進制數
C．數字“10”的內碼值用二進制數表示為0011000100110000
D．圖中共有8個字符，所占字節數為13
【答案】C
【知識點】信息的編碼；進制及數制轉換
【解析】【解答】十進制128等于十六進制80 ，選項A錯誤；途中出現內碼均為十六進制，選項B錯誤；數字10內碼值為：30 31轉二進制為: 11000100110000 ，選項C正確；圖中共有9個字符，所占字節數為13 ，選項D錯誤。故答案選C。
【分析】本題考查的是ASCII碼和漢字編碼。用UltraEdit軟件觀察字符的內碼時，每個英文字母占用1個字節，每個漢字占用2個字節。
6．（2020·浙江模擬）使用GoldWave軟件進行作品制作，部分操作界面如圖所示。
下列說法不正確的是（　　）
A．在當前狀態下插入15秒靜音，音頻文件存儲容量將變大
B．執行“刪除”命令后直接保存，音頻文件存儲容量將變小
C．該音頻文件采用無損壓縮格式，其采樣頻率為44.1KHz
D．現對該音頻的后5秒設置“淡出”效果并按原格式、原參數保存，存儲空間不變
【答案】C
【知識點】聲音素材的基本處理；聲音、圖像、視頻編碼
7．（2020·浙江模擬）在Photoshop軟件中編輯某文檔，其部分界面如圖所示。
下列說法正確的是（　　）
A．“背景”圖層的下方可能有其他圖層
B．可以直接在“背景”圖層做“鏡頭光暈”濾鏡操作
C．將此文檔保存為jpg格式后，“英文”圖層的圖層樣式仍可見
D．可以在“貓和老鼠”圖層使用文字工具修改該圖層的文字內容
【答案】B
【知識點】圖片加工常用工具的使用；圖層及圖層的基本操作
8．（2020高三上·浙江月考）某算法的部分流程圖如圖所示。執行這部分流程后，輸出sum，i的值分別是（　　）
A．28，6 B．60，6 C．28，5 D．60，5
【答案】A
【知識點】算法的控制結構；流程圖識讀
【解析】【解答】流程分析：
i的初始值為1，sum的初始值為0；
i=1，i≤5成立，r=2^1=2，r<4，i=1+1=2；
i=2，i≤5成立，r=2^2=4，4≤r≤16成立，sum=0+4=4，i=2+1=3;
i=3，i≤5成立，r=2^3=8，4≤r≤16成立，sum=4+8=12，i=3+1=4；
i=4，i≤5成立，r=2^4=16，4≤r≤16成立，sum=12+16=28，i=4+1=5；
i=5，i≤5成立，r=2^5=32，r>16，i=5+1=6；
i=6，i≤5不成立，退出循環，sum=28，i=6。
故答案選A。
【分析】本題考查的是對流程圖的識讀。
9．某對分查找算法的VB程序段如下：
i=1: j=6: n=0: f=False
key=Val(Text1.Text)
Do While i<=j and Not f
n=n+1
m=Fix((i+j)/2)
If key=a(m)then f=True
If keyLoop
數組元素a(1)到a(6)的值依次為“12，19，27，31，46，55”，文本框Text 1中輸入“31”后運行該程序，則以上程序段運行結束后，下列說法不正確的是（　　）
A．變量i的值為4 B．變量j的值為4
C．變量m的值為4 D．變量n的值為3
【答案】A
【知識點】查找算法及程序實現
10．（2020·浙江模擬）某排序算法，VB代碼如下：
i=1
Do While i<=5
If i = 0 or a(i – 1)<= a(i) Then
i=i+1
Else
t=a(i):a(i)=a(i-1):a(i-1)=t
i=i-1
End If
Loop
數組元素a(0)到a(5)依次為：“0，41，22，53，99，36”，經過該程序段處理后，數組元素a(3)的值為（　　）
A．36 B．53 C．41 D．22
【答案】C
【知識點】排序算法及程序實現；循環結構語句及程序實現
11．（2020·浙江模擬）a(1)=17:a(2)=16:a(3)=12:a(4)=18:a(5)=15:a(6)=13:a(7)=17:a(8)=20
i=2
Do While i <=8
If i mod 2=0 and a(i)>a(i-1) then
t=a(i):a(i)=a(i-1):a(i-1)=t
ElseIf a(i-1) mod 2=1 then
a(i-1)=a(i-1)+1
End If
i=i+1
Loop
執行程序后，a數組各元素是（　　）
A．17，16，18，12，16，14，20，18
B．18，16，18，12，16，14，20，17
C．16，17，18，12，13，16，20，17
D．18，16，18，12，14，15，17，20
【答案】B
【知識點】分支結構語句及程序實現；循環結構語句及程序實現
12．（2020·浙江模擬）（加試題）若數組元素d(1)到d(8)的值依次為“6,9,12,18,20,28,32,45”，查找Key值的VB程序段如下：
t(1) = 1: t(2) = 1
For i = 3 To 5
t(i) = t(i - 1) + t(i -2)
Next i
Key =13
i=1: j=8: k=6
Do While i <=j
m = i+t(k-1) ‘①
If Key = d ( m ) Then Exit Do ‘Exit Do表示退出循環
If d(m) > Key Then
j= m - 1
k=k-1
Else
i = m + 1
k=k-2
End If
Loop
運行該程序段后，①處的賦值語句共執行（　　）
A．1次 B．2次 C．3次 D．4次
【答案】C
【知識點】分支結構語句及程序實現；循環結構語句及程序實現
二、操作題
13．（2020·浙江模擬）小林收集了某批發市場的冰激凌價格，并使用Excel軟件進行數據處理，如下圖所示。
請回答下列問題：
（1）若要使標題欄的格式如下圖所示，則可行的操作是　 　。
（2）已知列G的數值是通過公式“零售價一單支”得到，若對列E的數據進行“減少小數位數”操作，列G的數值　 　。（會變/不變）
（3）小林要找出規格為40的冰激凌中利潤最大的一項，可進行如下操作：以“規格”為40進行篩選，再以　 　為關鍵字進行降序排序。
（4）若要在列H利用Rank函數計算出所有冰激凌的利潤排名，并且利用自動填充功能填充，則H4單元格的公式為　 　。（RANK函數格式：RANK（number，ref，order），返回某數字在一列數字中相對于其他數值的大小排名，如：RANK（A1，A1：A10）表示單元格A1中的數據在區域Al：A10中的排名）
【答案】（1）選中A1：G1，單擊“合并后居中”
（2）不變
（3）利潤（元/支）或 列G
（4）=RANK(G4，$ G $ 3：$ G $ 18)或=RANK(G4，G $ 3：G $ 18)
【知識點】表格數據的處理與計算
14．（2020·浙江模擬）小六創作“夏夜旅行”的多媒體作品。回答下列問題：
（1）在作品設計的過程中，下列屬于需求分析的是　 　（多選，填字母： A .確定作品屬于益智類游戲/ B .確定“片頭”界面尺寸、素材組織與來源、交互方式等/ C .確定該作品用于豐富學生的課余生活/D .確定該作品完成后將以網頁方式發布到網絡服務器上/ E .確定作品由五個界面組成）。
（2）Flash動畫部分界面如圖所示，“燈閃”圖層第10幀到第40幀實現了燈光淡入的動畫效果，該動畫補間類型為　 　。
（3）圖中“蝴蝶”圖層創建了蝴蝶實例從位置坐標（c，y）為（110，410）的A點出發，飛到B點（270，180）并稍作停留，最后飛到C點（500，100）的動畫。若僅對第20幀執行清除關鍵幀操作，則測試場景時　 　（多選，填字母：A
.蝴蝶從A點到C點的飛行路線沒有變化/B .蝴蝶飛到B點的同時“漣漪”圖層的動畫開始/ C .蝴蝶從A點到B點的飛行時間變長 / D .蝴蝶從B點到C點的飛行速度變慢）。
（4）如圖所示，為使“音樂”圖層的音樂與“燈閃”動畫同步開始播放。對“音樂”圖層的操作是　 　。
（5）測試影片時，單擊“跳過片頭”按鈕，使動畫跳轉到“主界面”場景第1幀播放，則在該按鈕上添加的動作腳本是　 　。
【答案】（1）ACD
（2）形狀
（3）AC
（4）移動第1幀到第10幀
（5）on(press){gotoandplay(“主界面”,1}
【知識點】多媒體作品的規劃和設計；動畫的類型；時間軸、幀、圖層、庫的概念及基本操作；動畫的實現；常用影片控制函數的應用
15．（2020·浙江模擬）在平面坐標系中，給定任意個點，求出這些點中與點（1，1）距離最遠的點。小李編寫出了相應功能的程序：在文本框Text1中輸入這些點的坐標值（數據都用逗號分隔并以逗號結尾），單擊“計算”按鈕Cmd后，程序計算這些點到（1，1）的距離后，結果顯示在列表框List1中，并且輸出最大距離的點。程序運行界面如圖所示。
（1）由圖可知，窗體中的對象共有　 　類；
（2）實現上述功能的VB程序如下，請在畫線處填入合適的代碼。
Private
Sub Command1_Click()
Dim i, k As Integer
Dim x1, y1, x2, y2 As Single
Dim v As Single, maxd As Single
Dim s As String, pos zb As String
List1.Clear
s=Text1.Text
x1=1:y1=1
t="": k=1: j=1
List1.AddItem"坐標點"&"距離"
For i=1 To Len(s)
If Mid(s,i,1)="," Then
v=Val(Mid(s, j, i-j))
j=　 　
If k Mod 2=1 Then
x2=v
Else
y2=v
d=Sqr((x2-x1)^2+(y2-y1)^2)
If　 　 Then
maxd=d
pos="(" &
Str(x2)& "," & Str(y2)& ")"
End If
List1.AddItem"("
& Str(x2)& "," & Str(y2)& ")" & Str(d)
End If
k=k+1
End If
Next i
Label1.Caption="距離（1, 1）最遠的點為"& pos &"距離為"&
Str(maxd)
End
Sub
（3）若文本框Text1中輸入的內容為“31，41，26，51，1，56”，程序運行結束后，距離（1，1）最遠的坐標點是　 　。
【答案】（1）4
（2）i+1；d > maxd
（3）(26,51)
【知識點】類、對象、屬性、方法、事件和事件處理的概念及應用；解析算法及程序實現
16．（2020·浙江模擬）用VB編程求兩個字符串的最長連續公共子串，程序功能如下：在文本框Text1和Text2中分別輸入任意兩個字符串s1和s2，單擊命令按鈕
Command1，在標簽 Label3和Label4中分別輸出這兩個字符串的最長連續公共子串和子串的長度其算法思想：分別從字符串s1和s2的左邊第一個字符開始檢查，若發現這兩個字符串中有一個字符相同，則以這個字符為基準向右邊擴大搜索范圍，先檢查其后面的第一個字符是否相同，若還是相同則繼續搜索，直到找到不同的字符為止。然后按照該方法依次繼續往后搜索，直到查找結束。程序界面如圖所示，請回答下列問題：
（1）根據代碼，若輸入的s1為“Teacher”，s2為“teacher”，則最長連續公共子串為　 　。
（2）實現上述功能的VB程序如下，請在劃線處填入合適代碼。
Dim s1 As String, s2 As string, maxstr As string
Dim len1 As Integer, len2 As Integer, maxlen As Integer
Function Min (a As Integer, b As Integer) As Integer
If a >=b Then min = b else
min = a
End Function
Function Search (m As Integer, n As Integer) As Integer
Dim c As Integer
c = 1
Do While c<= Min (len1 -m, len2 - n)
If Mid (s1, m+ c, 1) = Mid(s2,n+c,1)
Then
　 　
Else
Exit Do 'Exit Do的作用是退出Do循環
End if
Loop
Search = c -1
End
function
Private
Sub Command1_Click()
s1 = Text1. Text
s2 = Text2. Text
len1 = Len (s1)
len2 = Len (s2)
maxlen = 0: maxstr = ""
Dim i As Integer, j As Integer, k As
Integer
For i=1
To len1
For j=1 To len2
If Mid(s1, i, 1) = Mid(s2,j,1) Then
k =　 　 'k用于記錄連續公共子串的長度
If (k> maxlen) Then
maxlen = k
maxstr =　 　
End if
End If
Next j
Next i
Labe13. Caption= "最長連續公共子串為:"&
maxstr
Labe14. Cantion = "該子串長度是:"& str
(maxlen)
End
sub
【答案】（1）eacher
（2）c=c+1；search(i,j)+1；mid(s1,i,k)或mid(s2,j,k)或其他等價答案。
【知識點】過程與自定義函數；查找算法及程序實現
1 / 1

展開更多......

收起↑