資源簡介 浙江省金華十校2019-2020學年高二下學期信息技術期末調研考試試卷一、選擇題(本大題共12小題,每小題2分,共24分。)1.(2020高二下·金華期末)下列有關信息和信息表達的描述,正確的是( )A.文字、語言、圖形、聲音、網絡都是常見的信息表達技術B.某計算機的CPU主頻是3.90GHZ,體現了的存儲容量大的特征C.萬維網采用SMTP協議將瀏覽器發出的請求發送到Web服務器D.超鏈接可以實現不同網頁間的鏈接,也可以鏈接到電子郵箱地址2.(2020高二下·金華期末)下列有關多媒體信息加工和多媒體技術的說法,正確的是( )A.一幅未經壓縮的位圖圖像,內容越復雜,存儲容量越大B.某軟件能自動朗讀文本內容,該功能主要應用了多媒體技術中的語音識別技術C.圖像中某個區域的顏色、亮度、飽和度等相同,由此產生的數據重復稱為空間冗余D.矢量圖放大后不會產生“鋸齒形失真”,巨幅廣告的圖像一般都采用矢量圖3.(2020高二下·金華期末)使用Word軟件編輯文檔,部分界面如圖所示,下列就法正確的是( )A.文中的圖片的文字環繞方式為“四周型環繞”B.若接受所有修訂,則第3行前半行文字將變為“服的時間都可能被感染,但是”C.刪除批注內容“摘自魯迅雜文(中國人失掉自信力了嗎》”,該“批注[A1]:”也刪除D.第6行“不”字下方有波浪線,表示啟用了拼寫和語法有檢查,這是人工智能技術4.(2020高二下·金華期末)觀察字符內碼如下圖所示,以下說法正確的是( )A.圖中有4個ASCII碼,5個區位碼B.字符“40”的十六進制編碼為“34 30”C.存儲字符“3”需要1bitD.“℃”存儲時占用了4字節5.(2020高二下·金華期末)在Goldwave中進行操作,當前操作界面如下圖所示,下列說法正確的是( )A.圖中44100HZ,表示采用44100量化級別B.這是一個雙聲道的無損壓縮的音頻格式文件C.執行“刪除”操作后,再選擇左聲道插人35秒靜音,音頻文件存儲容量變大D.執行“淡入”命令后,執行“更改音量”命令降低音量,文件存儲容量不變6.(2020高二下·金華期末)有一段時長為40分鐘,1920* 1080,32位真彩色,采用PAL制的未經壓縮的AVI無聲視頻,此段視頻通過5G網絡下載(5G網絡理論下載速度可達到10Cbps),所需的時間約為( )A.796s B.398s C.49s D.16s7.(2020高二下·金華期末)下列有關VB屬性說法正確的是( )A.計時器每隔3秒Timer事件發生一次,則Interval屬性應設置為3B.設置標簽框字體的顏色應在Font屬性中設置C.圖像框(image)中圖片的加載可以通過Picture屬性設置D.確定一個控件在窗體上位置的屬性是Width和Height8.(2020高二下·金華期末)某算法部分流程如圖1所示,執行此部分流程后,下列說法正確的是( )A.此流程使用枚舉算法(枚舉i的值),虛線框部分是分支結構B.流程中sum←sum+i與i←i+1調換下位置,輸出的sum,c,i的值都不變C.最終i的值是401,i←i+1執行數是200次D.將流程圖修改為如圖2所示,程序運行結果會發生變化。9.(2020高二下·金華期末)有兩個VB程序段,如下所示:已知程序段中①②兩處內容相同,數組元素a(1)到a(10)的值依次為:6,43,21,78,33,16,80,45,12,90,執行“程序段1”后,數組元素a(1)~a(10)的值依次為80,78,90,45 ,43,33,21,16,12,6,則下列說法正確的是( )A.①和②處的填空為7B.兩程序段的比較次數不一樣,交換次數一樣C.執行完程序段2后,數據6移動到了a(10)D.兩段程序的得到的運行結果相同10.有如下VB程序段:s = Text1.TextFor i=1 To Len(s)ch = Mid(s,i,1)If ch>="A" And ch<="Z" Then t=t+chIf ch>="a" And ch<="z" Thench = Chr(Asc(ch)-32)t=t+chElseIf ch >= "0"And ch <= "9" Thent=ch+tEnd IfNext iText2.Text = t已知'A'的ASCI碼為65,'a'的ASCI碼為97。程序運行后,在文本框Text1中輸人“Text2.text=”Abc1234“”(外括號不包括),則在Text2中顯示的內容是( )A.TEXT2.TEXTABC1234 B.43212TexttextABCC.43212TEXTTEXTABC D.TEXTTEXTABC4321211.(2020高二下·金華期末)星星設計了10*10的矩陣,如下圖所示:實現此功能的VB程序段如下,已知程序中兩處標記①的位置表達式相同,程序中①、②兩處表達式為( )Dim a(1 To 100) As StingFor i= 1 To 10For j=1 To 10If i=j Or i Mod 10=0 Or i Mod 10= 1Thena( ① )="●"Elsea( ① )="○"EndIfNext jNext iFor i= 1 To 100s=s+ a(i)If ② ThenList1.Addltem sEnd IfNext iA.①(j-1)*10+i ②i mod 10=1B.①(i-1)*10+ j ②i mod 10=1C.①(j-1)*10+ i ②i mod 10=0D.①(i- 1)*10+j ②i mod 10=012.(2020高二下·金華期末)某VB程序段如下圖所示,執行程序段后,文本框Text2中顯示的值不可能是( )a(1)=0: a(2)=3: a(3)= 5: a(4)=7a(5)= 9: a(6)= 11: a(7)= 13: a(8)= 15a(9)= 17: a(10)= 19key= Int(Rnd*5)*2+5s=" "i=1: j= 10Do While i<= jm=(i+j)\2s=s+ Str(a(m))If a(m)>key Thenj=m-1Elsei=m+1End IfLoopText1.Text= sA.9 3 5 7 B.9 3 5C.9 15 11 13 D.9 15 11二、非選擇題(本大題共4小題,4+8+7+7,共26分)13.(2020高二下·金華期末)小豆制作了如圖13-1所示的家居用品分類銷售統計表,數據情況如圖13-1所示。請回答下列問題:(1)圖13-1中的銷售占比是各類銷售金額占合計的比例。E4:E10的公式是從E3單元格自動填充功能得出的,可知E3單元格公式為 。(2)要對圖13-1中的數據按“銷售金額”降序排序,則選擇的數據區域為 。(3)根據圖13-1中的數據制作了如圖13-2的圖表,則圖表的數據區域是 。(4)若在操作過程中對D6單元進行了如圖13-3所示的操作,則E6單元格的數據 (單選,填字母。A .變大 \B .變小 \ C.#REF! \ D .#DIV/O! )14.(2020高二下·金華期末)小灰制作了有關“公筷公勺”為主題的多媒體作品,請回答下列問題:(1)使用Photoshop處理如圖14-1所示,下列說法中正確的是 (多選 ,填寫字母。A .可將“人物”圖層的圖層樣式拷貝到“病毒”圖層。/B .背景圖層可以設置濾鏡,也可以使用像皮擦。/C .“文明用餐使用公筷”圖層不可以使用自由變換更改文字大小,但可以用文字工具更改文字大小。/D .“減少冠狀病毒傳染”圖層設置濾鏡必須柵格化圖層,但可以用油漆簡工具更改文字顏色。/E.“新冠”圖層可以移動到圓點圖層上方,背景圖層不能移動位置。)(2)如圖14-2所示,在“勺子”圖層最后一幀(80 幀)設置了gotoandpaly(1);的動作命令,“聲音”圖層的聲音時長為40s,要求測試影片時(不點擊按鈕情況下)聲音能完整的播放,且不會重復產生新的聲音,則應將聲音同步設為 (數據流/事件/開始)(3)“勺子”圖層實現了元件實例“勺子和筷子”的淡入動畫,部分界面如圖14-2所示,則該補間類型為 (選填:動畫補間/形狀補間/逐幀動畫)。(4)“勺子”圖層的動畫效果是在第31幀至60幀,若要使“勺子”圖層的動畫從第1幀開始,到60幀結束,則可執行的操作 。(5)測試影片時,點擊“按鈕”圖層中的按鈕時,聲音停止播放并跳轉到“主場景”的第6幀暫停,則此按鈕的動作腳本為 。15.(2020高二下·金華期末)出列順序有10個人,編號分別為1,2,3……10按順時針方向圍坐成一圈,每次隨機產生一個數m,m的范圍為[3,7]的隨機奇數,從第10個人開始逆時針報數,當報到m的人出列,圈內剩下的人,重新產生隨機數m,重新開始報數,如此下去,直到所有人出列為止。如:若每次參數的隨機數m都為5,從第10個開始報數,依次出列的為6-1-5-9-2-3-10-7-4-8小李編寫了如下程序求解10個人的出列順序。程序運行界面如圖15-1所示,點擊求解按鈕后,在Text1中輸出出列順序,在Text2中顯示隨機數據的值。(1)在劃線出填寫正確的代碼Private Sub Command1 _Click( )Dim ld(1 To 10) As Boolean, i As Integer, j As IntegerDim rs As Integer, C As Integer, m As IntegerRandomizeFor i=1 To 10ld(i) = True ‘數組元素為True表示第i人當前在隊列中Next ic=0:rs=10 m =Int(Rnd*3)*2+3Do While rs <> 0If ld(i) = True Then If c=m Thenld(i) = FalseText1.Text = Text1.Text + Str(i) c=0End IfEnd Ifi =i-1If Then i=10LoopEnd Sub(2)加框處兩語句互換下順序,會不會對出列順序產生影響 (選填:會/不會)。16.(2020高二下·金華期末)某校進行模擬考,現有25名學生的語數英三門課的成績(按百分制)存儲在數據庫student.accdb中的數據表cj中,現取出各學生成績存儲在cj( )數組中,成績存放如下:運行程序,點擊“數據導入”按鈕后,在列表框list1中顯示所有數據。點擊“排序"按鈕,按總分從高到低計算名次(成績相同的名次相同),并按排名先后在列表框list2中顯示,數據要求對齊。程序運行界面如圖16-1所示:(1)觀察程序及界面,可知“排序”按鈕的對象名為 。(2)實現上述程序功能的VB程序段如下,請在劃線出填入合適的代碼。Dim cj(1 To 100) As IntegerDim b(1 To 301) As Integer '分數為i的人數存入b(i)Private Sub Cmdl_ Click( )Dim connAs New ADODB.ConnectionDim rs AsNew ADODB.Recordsetconn.ConnectionString= "Provider =Microsoft.ACE.OLEDB.12.0;Data Source= " &App.Path& "\studentaccdb"conn.OpenSet rs.ActiveConnection= connrs.Open"SELECT*FROM cj"n =1Do WhileNot rs.EOFcj(n)= rs.Fields("語文"):cj(n+1) = rs.Fields("數學")cj(n+2) = rs.Fields("英語"):cj(n+3) = cj(n)+cj(n+1)+cj(n+3) rs.MoveNextLooprs.Close:conn.Close'此處代碼略,用來實現將數據在list1中輸出End SubPrivate Sub paixu_ Click( )Dim mc AsInteger'預處理求b數組的值For j=4 To100 Step 4 Next j'以下程序用于計算名次并按要求對齊輸出mc=1:b(301)=0List2.AddItem"語文"+"數學"+"英語"+"總分"+"名次List2.AddItem"------------------------------------------------"For i=300To 1 Step -1 If b(i)<> 0 ThenForc=4 To 100 Step 4If cj(c) = i ThenList2.AddItem End IfNextcEnd IfNext iEnd Sub'以下函數輸出時數據s時,不足7位末尾補空格Function gs(s As Integer) As StringDim cd AsStringed = CStr(s)For i=1 To7 -Len(cd)cd=cd+" "Next igs = cdEnd Function答案解析部分1.【答案】D【知識點】信息表達方式與表達技術;網絡協議2.【答案】C【知識點】多媒體數據壓縮技術;圖形與圖像、位圖與矢量圖的概念3.【答案】B【知識點】文本的基本編輯;文本的圖片與表格處理4.【答案】B【知識點】字符編碼5.【答案】D【知識點】聲音素材的基本處理;多媒體數據采集與編輯軟件6.【答案】B【知識點】聲音、圖像、視頻編碼7.【答案】C【知識點】類、對象、屬性、方法、事件和事件處理的概念及應用8.【答案】A【知識點】流程圖識讀;常用算法9.【答案】A【知識點】排序算法及程序實現10.【答案】C【知識點】常量、變量及變量的賦值;分支結構語句及程序實現;循環結構語句及程序實現【解析】【解答】根據條件If ch>=“A” And ch<=“Z” Then t=t+ch可知,大寫字母直接順序疊加,根據If ch>=“a” And ch<=“z” Then ch=Chr(Asc(ch)-32)t=t+ch可知是小寫字母轉換為大寫字母后疊加。由If ch>= “0”And ch<= “9”Then t=ch+t,可知數字用的是倒序疊加,最后結果數字在前,全都是大寫字母。故答案選C。【分析】本題考查的是對VB程序段語句的理解。11.【答案】C【知識點】分支結構語句及程序實現;循環結構語句及程序實現12.【答案】B【知識點】查找算法及程序實現13.【答案】(1)=D3/$DS10或 =D3/D$10(2)A2:19或者A3:19(3)B2:B9,D2:D9 或B3:B9、D3:D9(4)C【知識點】表格數據的處理與計算14.【答案】(1)BCE(2)開始(3)動畫補間(4)“勺子”圖層第 1幀清除關鍵幀或將“勺子”圖層第31幀移動到第1幀(5)on (real se/press) {stopallsounds( );gotoandstop(“主場景”,6):}【知識點】圖層及圖層的基本操作;動畫的類型;動畫的實現;常用影片控制函數的應用;聲音同步屬性設置15.【答案】(1)i=10;c=c+1;rsrs-1;i=0(2)不會【知識點】分支結構語句及程序實現;循環結構語句及程序實現;常用標準函數16.【答案】(1)paixu(2)n=n+4;b(cj(i)) = b(cj(i)) + 1;mc=mc+b(i+1);gs(cj(c-3)) + gs(cj(c- 2)) + gs(cj(c- 1)) + gs(cij(c)) + gs(mc)【知識點】過程與自定義函數;排序算法及程序實現;程序訪問數據庫1 / 1浙江省金華十校2019-2020學年高二下學期信息技術期末調研考試試卷一、選擇題(本大題共12小題,每小題2分,共24分。)1.(2020高二下·金華期末)下列有關信息和信息表達的描述,正確的是( )A.文字、語言、圖形、聲音、網絡都是常見的信息表達技術B.某計算機的CPU主頻是3.90GHZ,體現了的存儲容量大的特征C.萬維網采用SMTP協議將瀏覽器發出的請求發送到Web服務器D.超鏈接可以實現不同網頁間的鏈接,也可以鏈接到電子郵箱地址【答案】D【知識點】信息表達方式與表達技術;網絡協議2.(2020高二下·金華期末)下列有關多媒體信息加工和多媒體技術的說法,正確的是( )A.一幅未經壓縮的位圖圖像,內容越復雜,存儲容量越大B.某軟件能自動朗讀文本內容,該功能主要應用了多媒體技術中的語音識別技術C.圖像中某個區域的顏色、亮度、飽和度等相同,由此產生的數據重復稱為空間冗余D.矢量圖放大后不會產生“鋸齒形失真”,巨幅廣告的圖像一般都采用矢量圖【答案】C【知識點】多媒體數據壓縮技術;圖形與圖像、位圖與矢量圖的概念3.(2020高二下·金華期末)使用Word軟件編輯文檔,部分界面如圖所示,下列就法正確的是( )A.文中的圖片的文字環繞方式為“四周型環繞”B.若接受所有修訂,則第3行前半行文字將變為“服的時間都可能被感染,但是”C.刪除批注內容“摘自魯迅雜文(中國人失掉自信力了嗎》”,該“批注[A1]:”也刪除D.第6行“不”字下方有波浪線,表示啟用了拼寫和語法有檢查,這是人工智能技術【答案】B【知識點】文本的基本編輯;文本的圖片與表格處理4.(2020高二下·金華期末)觀察字符內碼如下圖所示,以下說法正確的是( )A.圖中有4個ASCII碼,5個區位碼B.字符“40”的十六進制編碼為“34 30”C.存儲字符“3”需要1bitD.“℃”存儲時占用了4字節【答案】B【知識點】字符編碼5.(2020高二下·金華期末)在Goldwave中進行操作,當前操作界面如下圖所示,下列說法正確的是( )A.圖中44100HZ,表示采用44100量化級別B.這是一個雙聲道的無損壓縮的音頻格式文件C.執行“刪除”操作后,再選擇左聲道插人35秒靜音,音頻文件存儲容量變大D.執行“淡入”命令后,執行“更改音量”命令降低音量,文件存儲容量不變【答案】D【知識點】聲音素材的基本處理;多媒體數據采集與編輯軟件6.(2020高二下·金華期末)有一段時長為40分鐘,1920* 1080,32位真彩色,采用PAL制的未經壓縮的AVI無聲視頻,此段視頻通過5G網絡下載(5G網絡理論下載速度可達到10Cbps),所需的時間約為( )A.796s B.398s C.49s D.16s【答案】B【知識點】聲音、圖像、視頻編碼7.(2020高二下·金華期末)下列有關VB屬性說法正確的是( )A.計時器每隔3秒Timer事件發生一次,則Interval屬性應設置為3B.設置標簽框字體的顏色應在Font屬性中設置C.圖像框(image)中圖片的加載可以通過Picture屬性設置D.確定一個控件在窗體上位置的屬性是Width和Height【答案】C【知識點】類、對象、屬性、方法、事件和事件處理的概念及應用8.(2020高二下·金華期末)某算法部分流程如圖1所示,執行此部分流程后,下列說法正確的是( )A.此流程使用枚舉算法(枚舉i的值),虛線框部分是分支結構B.流程中sum←sum+i與i←i+1調換下位置,輸出的sum,c,i的值都不變C.最終i的值是401,i←i+1執行數是200次D.將流程圖修改為如圖2所示,程序運行結果會發生變化。【答案】A【知識點】流程圖識讀;常用算法9.(2020高二下·金華期末)有兩個VB程序段,如下所示:已知程序段中①②兩處內容相同,數組元素a(1)到a(10)的值依次為:6,43,21,78,33,16,80,45,12,90,執行“程序段1”后,數組元素a(1)~a(10)的值依次為80,78,90,45 ,43,33,21,16,12,6,則下列說法正確的是( )A.①和②處的填空為7B.兩程序段的比較次數不一樣,交換次數一樣C.執行完程序段2后,數據6移動到了a(10)D.兩段程序的得到的運行結果相同【答案】A【知識點】排序算法及程序實現10.有如下VB程序段:s = Text1.TextFor i=1 To Len(s)ch = Mid(s,i,1)If ch>="A" And ch<="Z" Then t=t+chIf ch>="a" And ch<="z" Thench = Chr(Asc(ch)-32)t=t+chElseIf ch >= "0"And ch <= "9" Thent=ch+tEnd IfNext iText2.Text = t已知'A'的ASCI碼為65,'a'的ASCI碼為97。程序運行后,在文本框Text1中輸人“Text2.text=”Abc1234“”(外括號不包括),則在Text2中顯示的內容是( )A.TEXT2.TEXTABC1234 B.43212TexttextABCC.43212TEXTTEXTABC D.TEXTTEXTABC43212【答案】C【知識點】常量、變量及變量的賦值;分支結構語句及程序實現;循環結構語句及程序實現【解析】【解答】根據條件If ch>=“A” And ch<=“Z” Then t=t+ch可知,大寫字母直接順序疊加,根據If ch>=“a” And ch<=“z” Then ch=Chr(Asc(ch)-32)t=t+ch可知是小寫字母轉換為大寫字母后疊加。由If ch>= “0”And ch<= “9”Then t=ch+t,可知數字用的是倒序疊加,最后結果數字在前,全都是大寫字母。故答案選C。【分析】本題考查的是對VB程序段語句的理解。11.(2020高二下·金華期末)星星設計了10*10的矩陣,如下圖所示:實現此功能的VB程序段如下,已知程序中兩處標記①的位置表達式相同,程序中①、②兩處表達式為( )Dim a(1 To 100) As StingFor i= 1 To 10For j=1 To 10If i=j Or i Mod 10=0 Or i Mod 10= 1Thena( ① )="●"Elsea( ① )="○"EndIfNext jNext iFor i= 1 To 100s=s+ a(i)If ② ThenList1.Addltem sEnd IfNext iA.①(j-1)*10+i ②i mod 10=1B.①(i-1)*10+ j ②i mod 10=1C.①(j-1)*10+ i ②i mod 10=0D.①(i- 1)*10+j ②i mod 10=0【答案】C【知識點】分支結構語句及程序實現;循環結構語句及程序實現12.(2020高二下·金華期末)某VB程序段如下圖所示,執行程序段后,文本框Text2中顯示的值不可能是( )a(1)=0: a(2)=3: a(3)= 5: a(4)=7a(5)= 9: a(6)= 11: a(7)= 13: a(8)= 15a(9)= 17: a(10)= 19key= Int(Rnd*5)*2+5s=" "i=1: j= 10Do While i<= jm=(i+j)\2s=s+ Str(a(m))If a(m)>key Thenj=m-1Elsei=m+1End IfLoopText1.Text= sA.9 3 5 7 B.9 3 5C.9 15 11 13 D.9 15 11【答案】B【知識點】查找算法及程序實現二、非選擇題(本大題共4小題,4+8+7+7,共26分)13.(2020高二下·金華期末)小豆制作了如圖13-1所示的家居用品分類銷售統計表,數據情況如圖13-1所示。請回答下列問題:(1)圖13-1中的銷售占比是各類銷售金額占合計的比例。E4:E10的公式是從E3單元格自動填充功能得出的,可知E3單元格公式為 。(2)要對圖13-1中的數據按“銷售金額”降序排序,則選擇的數據區域為 。(3)根據圖13-1中的數據制作了如圖13-2的圖表,則圖表的數據區域是 。(4)若在操作過程中對D6單元進行了如圖13-3所示的操作,則E6單元格的數據 (單選,填字母。A .變大 \B .變小 \ C.#REF! \ D .#DIV/O! )【答案】(1)=D3/$DS10或 =D3/D$10(2)A2:19或者A3:19(3)B2:B9,D2:D9 或B3:B9、D3:D9(4)C【知識點】表格數據的處理與計算14.(2020高二下·金華期末)小灰制作了有關“公筷公勺”為主題的多媒體作品,請回答下列問題:(1)使用Photoshop處理如圖14-1所示,下列說法中正確的是 (多選 ,填寫字母。A .可將“人物”圖層的圖層樣式拷貝到“病毒”圖層。/B .背景圖層可以設置濾鏡,也可以使用像皮擦。/C .“文明用餐使用公筷”圖層不可以使用自由變換更改文字大小,但可以用文字工具更改文字大小。/D .“減少冠狀病毒傳染”圖層設置濾鏡必須柵格化圖層,但可以用油漆簡工具更改文字顏色。/E.“新冠”圖層可以移動到圓點圖層上方,背景圖層不能移動位置。)(2)如圖14-2所示,在“勺子”圖層最后一幀(80 幀)設置了gotoandpaly(1);的動作命令,“聲音”圖層的聲音時長為40s,要求測試影片時(不點擊按鈕情況下)聲音能完整的播放,且不會重復產生新的聲音,則應將聲音同步設為 (數據流/事件/開始)(3)“勺子”圖層實現了元件實例“勺子和筷子”的淡入動畫,部分界面如圖14-2所示,則該補間類型為 (選填:動畫補間/形狀補間/逐幀動畫)。(4)“勺子”圖層的動畫效果是在第31幀至60幀,若要使“勺子”圖層的動畫從第1幀開始,到60幀結束,則可執行的操作 。(5)測試影片時,點擊“按鈕”圖層中的按鈕時,聲音停止播放并跳轉到“主場景”的第6幀暫停,則此按鈕的動作腳本為 。【答案】(1)BCE(2)開始(3)動畫補間(4)“勺子”圖層第 1幀清除關鍵幀或將“勺子”圖層第31幀移動到第1幀(5)on (real se/press) {stopallsounds( );gotoandstop(“主場景”,6):}【知識點】圖層及圖層的基本操作;動畫的類型;動畫的實現;常用影片控制函數的應用;聲音同步屬性設置15.(2020高二下·金華期末)出列順序有10個人,編號分別為1,2,3……10按順時針方向圍坐成一圈,每次隨機產生一個數m,m的范圍為[3,7]的隨機奇數,從第10個人開始逆時針報數,當報到m的人出列,圈內剩下的人,重新產生隨機數m,重新開始報數,如此下去,直到所有人出列為止。如:若每次參數的隨機數m都為5,從第10個開始報數,依次出列的為6-1-5-9-2-3-10-7-4-8小李編寫了如下程序求解10個人的出列順序。程序運行界面如圖15-1所示,點擊求解按鈕后,在Text1中輸出出列順序,在Text2中顯示隨機數據的值。(1)在劃線出填寫正確的代碼Private Sub Command1 _Click( )Dim ld(1 To 10) As Boolean, i As Integer, j As IntegerDim rs As Integer, C As Integer, m As IntegerRandomizeFor i=1 To 10ld(i) = True ‘數組元素為True表示第i人當前在隊列中Next ic=0:rs=10 m =Int(Rnd*3)*2+3Do While rs <> 0If ld(i) = True Then If c=m Thenld(i) = FalseText1.Text = Text1.Text + Str(i) c=0End IfEnd Ifi =i-1If Then i=10LoopEnd Sub(2)加框處兩語句互換下順序,會不會對出列順序產生影響 (選填:會/不會)。【答案】(1)i=10;c=c+1;rsrs-1;i=0(2)不會【知識點】分支結構語句及程序實現;循環結構語句及程序實現;常用標準函數16.(2020高二下·金華期末)某校進行模擬考,現有25名學生的語數英三門課的成績(按百分制)存儲在數據庫student.accdb中的數據表cj中,現取出各學生成績存儲在cj( )數組中,成績存放如下:運行程序,點擊“數據導入”按鈕后,在列表框list1中顯示所有數據。點擊“排序"按鈕,按總分從高到低計算名次(成績相同的名次相同),并按排名先后在列表框list2中顯示,數據要求對齊。程序運行界面如圖16-1所示:(1)觀察程序及界面,可知“排序”按鈕的對象名為 。(2)實現上述程序功能的VB程序段如下,請在劃線出填入合適的代碼。Dim cj(1 To 100) As IntegerDim b(1 To 301) As Integer '分數為i的人數存入b(i)Private Sub Cmdl_ Click( )Dim connAs New ADODB.ConnectionDim rs AsNew ADODB.Recordsetconn.ConnectionString= "Provider =Microsoft.ACE.OLEDB.12.0;Data Source= " &App.Path& "\studentaccdb"conn.OpenSet rs.ActiveConnection= connrs.Open"SELECT*FROM cj"n =1Do WhileNot rs.EOFcj(n)= rs.Fields("語文"):cj(n+1) = rs.Fields("數學")cj(n+2) = rs.Fields("英語"):cj(n+3) = cj(n)+cj(n+1)+cj(n+3) rs.MoveNextLooprs.Close:conn.Close'此處代碼略,用來實現將數據在list1中輸出End SubPrivate Sub paixu_ Click( )Dim mc AsInteger'預處理求b數組的值For j=4 To100 Step 4 Next j'以下程序用于計算名次并按要求對齊輸出mc=1:b(301)=0List2.AddItem"語文"+"數學"+"英語"+"總分"+"名次List2.AddItem"------------------------------------------------"For i=300To 1 Step -1 If b(i)<> 0 ThenForc=4 To 100 Step 4If cj(c) = i ThenList2.AddItem End IfNextcEnd IfNext iEnd Sub'以下函數輸出時數據s時,不足7位末尾補空格Function gs(s As Integer) As StringDim cd AsStringed = CStr(s)For i=1 To7 -Len(cd)cd=cd+" "Next igs = cdEnd Function【答案】(1)paixu(2)n=n+4;b(cj(i)) = b(cj(i)) + 1;mc=mc+b(i+1);gs(cj(c-3)) + gs(cj(c- 2)) + gs(cj(c- 1)) + gs(cij(c)) + gs(mc)【知識點】過程與自定義函數;排序算法及程序實現;程序訪問數據庫1 / 1 展開更多...... 收起↑ 資源列表 浙江省金華十校2019-2020學年高二下學期信息技術期末調研考試試卷(學生版).docx 浙江省金華十校2019-2020學年高二下學期信息技術期末調研考試試卷(教師版).docx 縮略圖、資源來源于二一教育資源庫