資源簡介

2019年3月稽陽聯考信息技術科答案解析
一、選擇題（每小題2分，共24分）
1.答案D。選項A數字、文字等都是信息的表達方式，其所包含的意義才是信息；選項B中，信息可以脫離它所反映的事物被存儲傳播；選項C中物聯網的網絡要依賴互聯網，不是獨立的。
2. 答案B。選項B中WWW是萬維網的簡稱，是一種網絡基本服務，不是協議
3. 答案C。選項A中圖片環繞方式是襯于文字下方；選項B中批注的對象為“雷峰夕照”；選項C正確；選項D拒絕修訂將恢復光標后被刪除的文字。
4. 答案A。；選項B“學生信息”是數據表不是數據庫；選項C“ID”字段特殊，在數據表視圖不能刪除；選項D數字和貨幣字段類型可以通用，更改不會丟失數據
5. 答案C。流程運行后S的值會不斷的趨向于2，本題必須用歸納法才能解題
6. 答案D。選項A超過16個字符才會換行；選項B字符“a”比“A”大32；選項C字符“D”的內碼是44H或01000100；選項D正確
7. 答案D。選項A多媒體技術是在計算機技術發展到一定水平才誕生；選項B多媒體沒有時效性，是實時性；選項C前半句正確，多媒體技術必須基于計算機技術，戶外廣告牌不是；
8. 答案B。選項A“線條”與上方兩個文字圖層沒有相互遮擋，換位置不影響效果；選項B正確；選項C，圖層設置了鏈接，不影響圖層內容的編輯；選項D，“背景”圖層可以設置濾鏡和其他畫面編輯。
9. 答案A。選項A，聲音到21幀就結束了，第30幀插入幀不影響；選項B，圖層“動畫2”是逐幀動畫；選項C，插入關鍵幀是復制第1幀的內容，不影響畫面；選項D，腳本也可能是gotoandstop（37）。
10. 答案B。視頻公式為：512×384×顏色位數×10×25/8/1024/1024=9.3×10，計算得出顏色位數
11. 答案C。a（2）范圍1~3，a（3）~a(5)的范圍都是1~5，排除A、B,選項D中a（4）=5，可推知a（5）為3~5，不可能是1，只有C都符合。
12. 答案A。本題是對分查找的應用。選項B、C、D的查找順序都是4-6-5，只有選項A的順序是4-2-3，與其他三項不同。
二、非選擇題（本大題共5小題，其中第13題小題4分，第14小題5分，第15小題8分，第16小題3分，第17小題6分，共26分）
13. （1）（2）（3） 略
（4） 數據是復制到新工作表后再篩選，不會影響圖表，篩選也不會影響計算結果。
14. （1）有標簽框、文本框、按鈕3類對象
（2）① 上一句得出第一個數后，下一次應該在當前位置i后一個開始取字符,答案：st1=i+1
②第二個數需要重新取，用代碼c = Mid(s, j, 1)
（3）刪除加框處語句后，每一輪只會計算當前數與最后一個數的絕對值差，然后所有結果取最大值（20和-1的最大差值21）
15. （1）A屬于應用需求分析，C屬于結構設計
（2）腳本要求動畫結束后，音樂繼續，應是同步為事件
（3）題目中說明是衛星實例，用動畫補間
（4）2s時應在舞臺左上角，故答案為B
（5）“背景”圖層前后兩頭都必須處理，前面用移動或第1幀清除關鍵幀，后面必須用清除關鍵幀，得到答案：“背景”圖層第43幀清除關鍵幀，再把第12幀移動到第1幀（或第1幀清除關鍵幀）
（6）根據腳本，點擊按鈕要實現音樂停止和動畫跳轉，需要兩個腳本函數stopallsounds();gotoandplay(“片尾”,1);。
16．（1）根據算法，a數組按升序排序，b（1）存放a（n/2）,b（2）存放a（2/n+1），奇數位降序，后面依次為a（n/2-1）、a（n/2-2），偶數位升序，后面依次為a（n/2+1）、a（n/2+2），結合后方的語句p = p – 2，q = q + 1，得出答案( a(j)17. 本題模擬了圖論和堆棧的使用。
（1） 設置路線時，優先向右走，右側不通再下走，正確路線用數組下標表示應該為 ：1、2、8、14、15、21、27、28、29、30，第6個點的坐標為21 （1分）
（2）①答案：cha(j)=pos
嘗試前進時，所走路線有岔路口要及時記錄，前方不通時要回轉走另一條。上方兩個if分別判斷向右暢通、向下暢通，表明此處是岔路口，要記錄
② i=i-1 （1分）
在上方else有提示“退回到上一個岔路口”，當前do循環結束前，數組lu的各個元素從后往前要恢復可用，本處模擬了堆棧的使用。
③pos= cha(j)（2分）
根據規則，上方在本岔路口右側尋路失敗，變量pos要退回到岔路口的坐標。
2019年3月稽陽聯考信息技術科參考答案
一、選擇題（每小題2分，共24分）
題號
1
2
3
4
5
6
7
8
9
10
11
12
答案
D
B
C
A
C
D
D
B
A
B
C
A
二、非選擇題（本大題共5小題，其中第13題小題4分，第14小題5分，第15小題8分，第16小題3分，第17小題6分，共26分）
13. （1） =AVERAGEIF($A3:$A13,“食物類”,C3:C13) （1分）
（2）B2：B13，E2：E13 （1分）
（3）A2：I13或A3：I13 （1分）
（4）C (1分)
14. （1）3 （1分）
（2）①st1=i+1 （2分）
②c = Mid(s, j, 1) 或其他等價答案 （1分）
（3）21 (1分)
15.（1）B （1分）
（2）事件 （1分）
（3）動畫補間 （1分） B (1分)
（4） “背景”圖層第43幀清除關鍵幀，再把第12幀移動到第1幀（或第1幀清除關鍵幀）（2分）
（5） stopallsounds();gotoandplay(“片尾”,1); (2分)
16．( a(j)( b(i) = a(p/2 ) 或b(n-i)=a(i2+1)或b(i)=a((n-i)2+1) (2分)
17. （1） 21 （1分）
（2）① cha(j)=pos （2分）
② i=i-1 （1分）
③ pos=cha(j) （2分）
2019年3月稽陽聯考信息技術科答案解析
一、選擇題（每小題2分，共24分）
1.答案D。選項A數字、文字等都是信息的表達方式，其所包含的意義才是信息；選項B中，信息可以脫離它所反映的事物被存儲傳播；選項C中物聯網的網絡要依賴互聯網，不是獨立的。
2. 答案B。選項B中WWW是萬維網的簡稱，是一種網絡基本服務，不是協議
3. 答案C。選項A中圖片環繞方式是襯于文字下方；選項B中批注的對象為“雷峰夕照”；選項C正確；選項D拒絕修訂將恢復光標后被刪除的文字。
4. 答案A。；選項B“學生信息”是數據表不是數據庫；選項C“ID”字段特殊，在數據表視圖不能刪除；選項D數字和貨幣字段類型可以通用，更改不會丟失數據
5. 答案C。流程運行后S的值會不斷的趨向于2，本題必須用歸納法才能解題
6. 答案D。選項A超過16個字符才會換行；選項B字符“a”比“A”大32；選項C字符“D”的內碼是44H或01000100；選項D正確
7. 答案D。選項A多媒體技術是在計算機技術發展到一定水平才誕生；選項B多媒體沒有時效性，是實時性；選項C前半句正確，多媒體技術必須基于計算機技術，戶外廣告牌不是；
8. 答案B。選項A“線條”與上方兩個文字圖層沒有相互遮擋，換位置不影響效果；選項B正確；選項C，圖層設置了鏈接，不影響圖層內容的編輯；選項D，“背景”圖層可以設置濾鏡和其他畫面編輯。
9. 答案A。選項A，聲音到21幀就結束了，第30幀插入幀不影響；選項B，圖層“動畫2”是逐幀動畫；選項C，插入關鍵幀是復制第1幀的內容，不影響畫面；選項D，腳本也可能是gotoandstop（37）。
10. 答案B。視頻公式為：512×384×顏色位數×10×25/8/1024/1024=9.3×10，計算得出顏色位數
11. 答案C。a（2）范圍1~3，a（3）~a(5)的范圍都是1~5，排除A、B,選項D中a（4）=5，可推知a（5）為3~5，不可能是1，只有C都符合。
12. 答案A。本題是對分查找的應用。選項B、C、D的查找順序都是4-6-5，只有選項A的順序是4-2-3，與其他三項不同。
二、非選擇題（本大題共5小題，其中第13題小題4分，第14小題5分，第15小題8分，第16小題3分，第17小題6分，共26分）
13. （1）（2）（3） 略
（4） 數據是復制到新工作表后再篩選，不會影響圖表，篩選也不會影響計算結果。
14. （1）有標簽框、文本框、按鈕3類對象
（2）① 上一句得出第一個數后，下一次應該在當前位置i后一個開始取字符,答案：st1=i+1
②第二個數需要重新取，用代碼c = Mid(s, j, 1)
（3）刪除加框處語句后，每一輪只會計算當前數與最后一個數的絕對值差，然后所有結果取最大值（20和-1的最大差值21）
15. （1）A屬于應用需求分析，C屬于結構設計
（2）腳本要求動畫結束后，音樂繼續，應是同步為事件
（3）題目中說明是衛星實例，用動畫補間
（4）2s時應在舞臺左上角，故答案為B
（5）“背景”圖層前后兩頭都必須處理，前面用移動或第1幀清除關鍵幀，后面必須用清除關鍵幀，得到答案：“背景”圖層第43幀清除關鍵幀，再把第12幀移動到第1幀（或第1幀清除關鍵幀）
（6）根據腳本，點擊按鈕要實現音樂停止和動畫跳轉，需要兩個腳本函數stopallsounds();gotoandplay(“片尾”,1);。
16．（1）根據算法，a數組按升序排序，b（1）存放a（2/n）,b（2）存放a（2/n+1），奇數位降序，后面依次為a（2/n-1）、a（2/n-2），偶數位升序，后面依次為a（2/n+1）、a（2/n+2），結合后方的語句p = p – 2，q = q + 1，得出答案( a(j)17. 本題模擬了圖論和堆棧的使用。
（1） 設置路線時，優先向右走，右側不通再下走，正確路線用數組下標表示應該為 ：1、2、8、14、15、21、27、28、29、30，第6個點的坐標為21 （1分）
（2）①答案：cha(j)=pos
嘗試前進時，所走路線有岔路口要及時記錄，前方不通時要回轉走另一條。上方兩個if分別判斷向右暢通、向下暢通，表明此處是岔路口，要記錄
② i=i-1 （1分）
在上方else有提示“退回到上一個岔路口”，當前do循環結束前，數組lu的各個元素從后往前要恢復可用，本處模擬了堆棧的使用。
③pos= cha(j)（2分）
根據規則，上方在本岔路口右側尋路失敗，變量pos要退回到岔路口的坐標。
通用技術答案 解析參見www.istudyt.cn
一、選擇題（每一個選擇題2分，共26分）
1
2
3
4
5
6
7
8
9
10
D
B
A
A
D
B
D
D
C
C
11
12
13
B
C
B
二、非選擇題（共24分）
14. （1）F→A→ C →G→ B →D→E （每空1分，共2分）
（2）③　（1分）　　（3）①　（1分）　　（4）②　（1分）　　（5）①　（1分）
15. （1）B （1分） （2）C （1分） （3）C （1分）
（4）（5）評分細則：草圖4分，尺寸標注2分。帶有一個鉸連接（1分）；包括固定手柄與一個弧形杠桿（1分）；夾持煎鍋時，接觸點應為二處，易于穩固（1分）；美觀（1分）。尺寸應包含手柄寬度、長度、連接孔的大小等，尺寸合理，兩處及兩處以上。
/
16.（共3分）
/
17.（共6分）
（1）C （1分） （2） ③ （1分） （3）③②（2分，不可交換順序）
（4）（共2分，電源連對得1分，其它線全對得1分）
/
2019年3月稽陽聯考技術答題卷
信息技術部分
一、選擇題（本大題共12小題，每小題2分，共24分。在每小題給出的四個選項中，只有一個符合題目要求）
1
2
3
4
5
6
7
8
9
10
11
12
二、非選擇題（本大題共5小題，其中第13小題4分，第14小題5分，第15小題8分，第16小題3分，第17小題6分，共26分。）
13．（1）_____________________ （1分）
（2）____________________ （1分）
（3）_____________________ （1分）
（4）_______________________（1分）
14．（1）_____________________ （1分）
（2）①_________________ （2分）
②_________________ （1分）
（3）____________________ （1分）
15．（1）_____________________ （1分）
（2）____________________ （1分）
（3）____________（1分）_________（1分）
（4）____________________________________________（2分）
（5）_____________________________________________（2分）
16．(_____________________ （1分）
(_____________________ （2分）
17．
（1）___________ （1分）
（2）①____________________ （2分）
②____________________ （1分）
③____________________ （2分）
2019年3月稽陽聯誼學校聯考
技術選考試題卷
命題人：
考生須知：
本試題卷分兩部分，第一部分信息技術，第二部分通用技術。全卷共16頁，第一部分1至8頁，第二部分9至16頁。滿分100分，考試時間90分鐘。其中加試題30分，用【加試題】標出。
1．考生答題前，務必將自己的姓名、準考證號用黑色字跡的簽字筆或鋼筆填寫在答題紙上。
2．選擇題的答案須用2B鉛筆將答題紙上對應題目的答案標號涂黑，如要改動，須將原填涂處用橡皮擦凈。
3．非選擇題的答案須用黑色字跡的簽字筆或鋼筆寫在答題紙上相應區域內，作圖時可先使用2B鉛筆，確定后須用黑色字跡的簽字筆或鋼筆描黑，答案寫在本試題卷上無效。
（共50分）
一、選擇題（本大題共12小題，每小題2分，共24分。在每小題給出的四個選項中，只有一個符合題目要求）
1．下列有關信息與信息技術的說法，正確的是
A．數字、文字、圖片、視頻等都是信息
B．信息必須依附于載體，是不能脫離它所反映的事物而被保留下來
C．物聯網是獨立于互聯網的網絡技術，實現萬物互聯
D．現代信息技術主要支柱是通信技術、計算機技術和傳感技術等
2．關于信息技術名詞簡稱的解釋，下列說法不正確的是
A．HTML是一種計算機語言，可用于網頁編程
B．WWW是用于網頁之間聯接的基本協議
C．FTP的中文名是文件傳輸協議
D．接收電子郵件需要用到POP3網絡協議
3．用Word軟件編輯某文檔，如圖所示，下列說法正確的是
A．文中的圖文混排效果屬于“四周型”環繞方式
B．文中批注的對象為“西湖十景之一”
C．第3行部分文字下方的波浪線是拼寫或語法檢查的結果
D．當前狀態下選擇“拒絕修訂”，第一句變為“雷峰塔建造于997年”
4．使用Access軟件打開數據庫，部分界面如圖所示。下列說法正確的是
A．數據庫應用系統是按照用戶需求而設計的數據庫和配套的應用程序系統
B．當前正在使用Access數據庫管理系統對“學生信息”數據庫進行數據管理
C．若“ID”字段是主鍵字段，則無法刪除此字段，也無法更改名稱
D．更改“卡內余額”字段的數據類型為“數字”格式，則卡內余額會丟失
5．某算法的部分流程圖如圖所示。執行該流程，輸出s的值約為
A．0
B．1
C．2
D．3

6．使用UltraEdit軟件查看字符“如果 A<>0 then b=b/A”的內碼，部分界面如下圖所示
下列說法正確的是
A．使用UltraEdit軟件查看字符，字符個數超過15個的時候會自動換行
B．“a-z”字符內碼值都比“A-Z”字符的內碼值小
C．字符“D”的內碼值二進制表示為“01100100”
D．存儲上述字符需要20個Byte
7．關于多媒體技術，下列說法正確的是
A．多媒體技術自古以來就存在并不斷發展
B．多媒體技術的三大特征是載體依附性、交互性和時效性
C．多媒體技術是對多種媒體形式的有機組合，如圖文混合的戶外廣告牌
D．多媒體技術的發展前景有虛擬現實、多媒體網絡傳輸技術和多媒體通信技術等
8．使用Photoshop軟件制作“裡茶”作品，部分界面如圖所示，當前狀態下，下列說法正確的是
A．把“線條”圖層移動到最上方，會改變圖像效果
B．可以通過調整“圖像大小”使作品寬高比為4:3
C．無法用魔棒工具刪除“青棗”圖層中的白色部分
D． “背景”圖層被鎖定，無法添加濾鏡
9．利用Flash軟件制作一段動畫，時間軸部分界面如下圖所示：
下列說法正確的是
A．在“音樂”圖層第30幀插入幀，不會影響音樂效果
B．“動畫2”圖層沒有設置補間，不會有動畫效果
C．當前狀態下插入關鍵幀，會改變動畫效果
D．測試場景，動畫肯定能循環播放
10．【加試題】錄制一段時長為10秒，分辨率為512×384,采用PAL制式（25fps）且未經壓縮的無聲視頻，再以10:1的壓縮比轉換成9.3 MB的Mp4格式，則原始視頻的顏色模式可能是
A．16色彩色 B．16位彩色 C．256級灰度 D．24位真彩色
11．【加試題】有如下VB程序段：
a(1) = 1
For i = 2 To 6
Randomize
a(i) = a(i - 1) + Int(Rnd * 5 + 1)
If a(i) Mod 2 = 1 Then
a(i) = a(i) 2 + 1
Else
a(i) = a(i) / 2
End If
Next i
執行程序后，a數組各元素可能是
A．1 3 4 6 7 9 B．1 2 0 3 5 6 C．1 2 3 4 5 4 D．1 3 4 5 1 1
12．【加試題】有如下VB程序段：
i = 1: j = 8
key = Text1．Text: f = False
Do While i <= j And Not f
m = Int((i + j) / 2)
If a(m) = key Then
f = True: List1．AddItem Str(m) + " is good luck!"
ElseIf a(m) > key Then
j = m - 1: List1．AddItem Str(m)
Else
i = m + 1: List1．AddItem Str(m)
End If
Loop
If Not f Then List1．AddItem "sorry!"
a(1)到a(8)依次為"as"、"book"、"can"、"pig"、"see"、"you"、"we"、"zero"。當在文本框Text1中輸入以下哪個內容時，列表框list1中顯示的結果和別的三項不一樣
A．pear B．quick C．run D．sad
二、非選擇題（本大題共5小題，其中第13小題4分，第14小題5分，第15小題8分，第16小題4分，第17小題5分，共26分。）
13．小呂收集了浙江省一年來部分農產品價格變化情況數據，并用Excel軟件進行數據處理，如13題圖a所示。請回答下列問題：
（1）區域C14：I14中的數據是利用AVERAGEIF函數進行計算得到的,則C14單元格中的公式是______________________
AVERAGEIF函數用法：用于計算符合條件的單元格數值平均值，形式為“=AVERAGEIF（range，criteria,average_range）”。如公式“= AVERAGEIF（A3:A7，“原材料”，E3：E7）”將計算出3-7行中“2018Q2”季度“原材料”類別數據的平均值。
（2）利用圖a中部分數據制作了如圖b的圖表，則該圖表的數據區域是________________。
（3）圖a中數據已2018Q3排序，排序時應選取的數據區域是：__________
（4）復制A2：I14的數據到新的工作表sheet2進行數據分析，篩選 “2018Q3”、“2018Q2”兩項的條件“最大4項”，下列說法正確的是_____（單選，填字母）
A．會改變圖表b的顯示效果 B．會影響“平均值”行的計算結果 C．會篩選出2行數據
14．設計一個算法，從一串數字中找出所有數字之間絕對值的最大差值。具體程序功能如下：在文本框輸入數字串（數據間用逗號分隔,以數字結尾），單擊按鈕,在標簽框輸出結果。例如在Text1中輸入“13，-5，20，3，-1”，單擊“計算”按鈕“Command1”，在標簽框“shuchu”輸出“25”。實現算法的VB程序如下，界面如圖所示，回答下列問題：
（1）為實現該程序，在窗體中使用了多個對象，如圖所示，不包括窗體，該程序使用了______類對象。
Private Sub Command1_Click()
Dim i As Integer, j As Integer, t1 As Integer, t2 As Integer
Dim s As String, c As String, st1 As Integer, st2 As Integer, max As Integer
s = Text1．Text: max = 0: st1 = 1
For i = 1 To Len(s) - 1
c = Mid(s, i, 1)
If c = "，" Then
t1 = Val(Mid(s, st1, i - st1))
_____(_____
st2 = st1
For j = i + 1 To Len(s)
______(______
If c = "，" Then
t2 = Val(Mid(s, st2, j - st2))
st2 = j + 1
If Abs(t1 - t2) > max Then max = Abs(t1 - t2)
End If
Next j
End If
If j>0 Then t2 = Val(Mid(s, st2, j - st2))
If Abs(t1 - t2) > max Then max = Abs(t1 - t2)
Next i
shuchu．Caption = "所有數之間絕對值相差最大為：" + Str(max)
End Sub
（2）根據算法要求，請在劃線處填入合適代碼，使程序完整。
（3） 若刪除程序中加框處語句，則計算出的最大差值為：__________
15．小申創作了一個關于“嫦娥探月工程”的多媒體作品。部分制作腳本和時間軸如下所示，請回答下列問題：
場景名稱：嫦娥奔月
進入方式：從“前奏”場景點擊“播放”按鈕
呈現方式
1按鈕出現在左下方，點擊按鈕音樂停止，并跳轉到場景“片尾”第1幀播放
2嫦娥四號從左側舞臺外經左上、左下、最后停在右上
呈現順序
1一開始出現音樂、標題文字
2約1s后出現嫦娥四號
3背景始終存在且無變化
4結束后動畫停在最后一幀，音樂繼續
（1）在制作作品前，小申對作品進行了相應的多媒體作品設計。下列屬于創作需求設計的是 __________ （單選，填字母：A．關注作品的社會反響/ B．確定作品的主題/ C． 確定作品分成3個主要部分）。
（2）結合腳本與時間軸，“音樂”圖層的聲音同步屬性為_________ (選填 事件/數據流)。
（3）“嫦娥四號”圖層實現了衛星實例的移動，此圖層的動畫類型是__________(選填： 逐幀/形狀/動畫)；已知舞臺尺寸為600*450，根據腳本，場景播放到2s時衛星的坐標可能是______（單選，填字母）。
A.（ -200,50） B.（40,40） C.（450,50 ）
（4）根據腳本，要實現動畫效果，“背景”圖層應做的調整是_________________。
（5）根據腳本，“按鈕”圖層中按鈕的腳本應設置為on(press){ _________________}。
16．【加試題】本程序的功能是在列表框List1中隨機產生n(n為偶數)個[1,20]之間的不重復正整數，存入數組a中。點擊“排序”按鈕Command1，對n個數進行排序。使得奇數位上是降序，偶數位上是升序,且a(1)Const n = 8
Dim a(1 To n) As Integer, b(1 To n) As Integer
Private Sub Form_Load()
‘隨機產生n個[1,20]之間的不重復的正整數，并在list1中顯示具體代碼略
End Sub
Private Sub Command1_Click()
Dim i As Integer, j As Integer, t As Integer， p as integer,p as integer
For i = 1 To n - 1
For j = n To i + 1 Step -1
If a(j) < a(j - 1) Then
t = a(j)：a(j) = a(j - 1)： a(j - 1) = t
end If
Next j
Next i
p = n: q = n / 2
For i = 1 To n Step 2
b(i) = a(p )
b(i + 1) = a(q)
p = p - 2
q = q + 1
Next i
For i = 1 To n
List2．AddItem Str(b(i))
Next i
End Sub
17．【加試題】用一個6*5矩陣表示地圖,分別用a數組元素表示，第1行從左到右為a（1）到a（6），依次類推，右下角為a（30）。其中數字0表示不通，數字1表示暢通。現在要從左上角到右下角尋找一條暢通的路徑。線路規則如下：
路線每個點只能向右或向下
任何一個岔口優先向右走，右側不通再向下走
一條路線中每個點只能走一次，不能重復
算法思路：探路過程中，記錄每個坐標到數組lu；遇到岔路口（向右向下都通），則記錄路口坐標到數組cha；遇到前方無路時，需要返回到上一個路口，標記路口右側坐標為0；當前方無路，岔路口數組也退回到0，說明整體不通，否則根據規則走到右下為止，最后輸出整體線路坐標。
實現算法的程序如下，運行結果如右圖所示。
回答下列問題：
（1）根據規則，如圖迷宮矩陣正確路線的第6個點是a數組的第____個元素（填數字）
（2）在程序劃線處填上合適代碼，使程序完整。
Dim a(1 To 50) As Integer
Private Sub Command1_Click()
Dim i As Integer, j As Integer, zb As Integer
Dim cha(1 To 10) As Integer '記錄一條線路中各個岔路口坐標
Dim lu(1 To 10) As Integer '記錄路線經過的坐標
zb = 1: j = 0: lu(1) = 1: i = 1
Do While i <= 9 ‘第1個和最后1個固定，中間有9個需要路過的坐標
If zb Mod 6 <> 0 And a(zb + 1) = 1 Then '向右暢通
If zb + 6 <= 30 and a(zb + 6) = 1 Then ‘記錄岔路口
j = j + 1
______(_____
End If
zb = zb + 1
i = i + 1
lu(i) = zb
ElseIf zb + 6 <= 30 And a(zb + 6) = 1 Then '向下暢通
zb = zb + 6
i = i + 1
lu(i) = zb
Else '坐標退回到上一個岔路口
If j = 0 Then Exit Do
Do While lu(i) <> cha(j)
______(_____
Loop
a(cha(j) + 1) = 0’標記此路口右側不可用
______(________
j = j - 1
End If
Loop
If j = 0 Then
Text1．Text = "沒有暢通道路"
Else
For i = 1 To 10
Text1．Text = Text1．Text + Str(lu(i))
Next i
End If
End Sub
Private Sub Form_Load()
‘生成圖形矩陣的數組a各個元素，并在列表框顯示，代碼略
End Sub

展開更多......

收起↑