2020-2021學(xué)年浙江省北斗星盟高二（下）月考信息技術(shù)試卷（5月份）
發(fā)布：2024/12/10 16:0:2
一、選擇題（本大題共12小題，每小題2分，共24分。每小題列出的四個(gè)備選項(xiàng)中只有一個(gè)是符合題目要求的，不選、多選、錯(cuò)選均不得分）
-
1．下列關(guān)于信息與信息處理的說法，錯(cuò)誤的是（ ?。?/h2>
組卷：6引用：1難度：0.7 -
2．下列有關(guān)網(wǎng)頁與瀏覽器的說法，正確的是（ ）
組卷：3引用：1難度：0.7 -
3．使用 UltraEdit 軟件觀察字符“hi 人工智能 AI”的內(nèi)碼，部分界面如圖所示。
下列說法正確的是（ ?。?/h2>組卷：8引用：1難度：0.5 -
4．用 Access 軟件設(shè)計(jì)某學(xué)習(xí)管理軟件的數(shù)據(jù)庫，其中已創(chuàng)建好的“學(xué)習(xí)情況”數(shù)據(jù)表用于存儲(chǔ)如表所示的數(shù)據(jù)。
下列關(guān)于“學(xué)習(xí)情況”數(shù)據(jù)表的描述，錯(cuò)誤的是（ ?。?/h2>序號(hào) 學(xué)生學(xué)號(hào) 學(xué)習(xí)時(shí)間 學(xué)習(xí)模塊 學(xué)習(xí)時(shí)長（分鐘） 作業(yè)完成情況 1 20190101 2021.01.26 選擇排序 23 已完成 2 20190411 2021.03.29 對(duì)分查找 18 未完成 3 20190203 2021.04.05 冒泡查找 23 未完成 … … … … … … 組卷：0引用：1難度：0.5 -
5．一段未經(jīng)壓縮的 1024×768 像素、16 位彩色、PAL 制式（25 幀/秒）的 AVI 視頻文件，其存儲(chǔ)容量為 75MB，則該視頻的時(shí)長約為（ ?。?/h2>
組卷：0引用：1難度：0.4
二、非選擇題（本大題共4小題，其中第13小題4分，第14小題8分，第15小題7分，第16小題7分，共26分。）
-
15．垂直升降式電梯里的顯示屏?xí)?dòng)態(tài)顯示朝上或者朝下的箭頭。小鄭編寫了一個(gè) VB 程序，模擬箭頭往上、往下的移動(dòng)，以及箭頭方向的調(diào)轉(zhuǎn)。運(yùn)行程序時(shí)，數(shù)組元素 a（1）到 a（64）存儲(chǔ) 0 或 1（如圖 1），分別表示空字符和星號(hào)，并在列表框 List1 中顯示相應(yīng)的圖形（如圖 2）。單擊“上移”按鈕，箭頭向上移動(dòng)一個(gè)位置，超出上邊界的圖形則繼續(xù)從下邊界往上移（如圖 3）；單擊“下移”按鈕，箭頭向下移動(dòng)一個(gè)位置；單擊“調(diào)頭”按鈕，則切換箭頭的上下朝向。
請(qǐng)回答下列問題：
（1）List1.AddItem 中的 AddItem 是對(duì)象 List1 的（單選，填字母：A.對(duì)象名/B.屬性名
/C.方法名/D.事件名）。
（2）實(shí)現(xiàn)上述功能的 VB 程序如下，請(qǐng)?jiān)跈M線處填入合適的代碼。
（3）程序執(zhí)行到加框處代碼時(shí)，會(huì)彈出錯(cuò)誤提示（單選，填字母：A.溢出/B.下標(biāo)越界/C.類型不匹配）。為了使程序能正常實(shí)現(xiàn)圖形的上移和顯示功能，加框處的代碼改為。
Dim a（1 To 64）As Integer
Dim b（0 to 1）As String Private Sub Form_Load （ ?。?br />b（0）=““：b（1）=“*“
'給數(shù)組 a 賦初值，并在列表框 List1 顯示箭頭圖形，代碼略
End Sub
Private Sub up_Click （ ?。?br />Dim i As Integer,j As Integer,s As String,tmp As Integer List1.Clear
For i=1 To 8'將第i 列數(shù)據(jù)向上平移一個(gè)位置
tmp=①
For j=2 To 8
a（（j-2）*8+i）=a（②）
Next j
a（7*8+i）=tmp Next i
s=““
s=s+b（i）
For i=1 To 64
If i Mod 8=0 Then List1.AddItem s：s=““Next i
End Sub
Private Sub turn_Click （ ）
‘調(diào)轉(zhuǎn)箭頭方向（朝上的變?yōu)槌?，朝下的變?yōu)槌希?，代碼略 End Sub
Private Sub down_Click （ ）
‘圖形向下移動(dòng)一個(gè)位置，代碼略End Sub組卷：1引用：1難度：0.5 -
16．學(xué)校物品室有 n 個(gè)箱子（箱子上分別有編號(hào) 1、2、3…n），箱子里存有數(shù)量不一的物品。有 m 位學(xué)生前來領(lǐng)取物品（物品總量足夠領(lǐng)?。课粚W(xué)生優(yōu)先從物品數(shù)量最多的箱子領(lǐng)取，數(shù)量不夠時(shí)，再從下一個(gè)數(shù)量最多的箱子領(lǐng)取。小鄭設(shè)計(jì)了一個(gè) VB 程序，在文本框Text1 中按箱子編號(hào)從小到大依次輸入每個(gè)箱子的物品數(shù)量，在文本框 Text2 中依次輸入每位學(xué)生需要領(lǐng)取物品的數(shù)量，單擊“領(lǐng)取”按鈕后，在列表框 List1中按順序顯示每個(gè)學(xué)生領(lǐng)取物品的箱子編號(hào)，并顯示領(lǐng)取結(jié)束后非空箱子的編號(hào)和剩余物品數(shù)量。運(yùn)行界面如圖所示。
回答下面問題：
（1）如果 1 號(hào)到 5 號(hào)箱子的物品數(shù)量分別是 25，16，9，5，3，每位學(xué)生需要的物品數(shù)量分別是
19，18，10，3，則第 3 位學(xué)生領(lǐng)取物品的箱子編號(hào)按順序依次是 3 號(hào)、（填整數(shù)）號(hào)。
（2）實(shí)現(xiàn)上述功能的 VB 程序如下，請(qǐng)?jiān)跈M線處填入合適的代碼。
Private Sub get_Click （ ?。?br />Dim a（1 To 100）As Integer,bh（1 To 100）As Integer Dim b（1 To 100）As Integer
Dim n As Integer,m As Integer'n 表示箱子數(shù)量，m 表示需領(lǐng)取物品的學(xué)生人數(shù)
Dim i As Integer,j As Integer,num As Integer
Dim p As Integer,q As Integer,t As Integer,s As String
'依次獲取 Text1 里物品數(shù)量存入數(shù)組 a,箱子上的編號(hào)（1 到 n）依次存入數(shù)組 bh,箱子數(shù)量存入變量 n,并按物品數(shù)量從多到少對(duì)箱子排序，代碼略
'依次獲取 Text2 里學(xué)生需要領(lǐng)取物品的數(shù)量存入數(shù)組 b,學(xué)生人數(shù)存入變量 m,代碼略p=1：q=1
For i=1 To m num=0
Do While num＜b（i）num=num+a（q）a（q）=0
①
Loop
s=“第“& i &“位學(xué)生領(lǐng)取物品的箱子編號(hào)依次為：“
For j=p To q-1
s=s+Str（bh（j））Next j
List1.AddItem s
If num＞b（i）Then a（q-1）=②：q=q-1
For j=③'維護(hù)非空箱子降序序列（按箱子中剩余物品數(shù)量）If a（j）＜a（j+1）Then
t=a（j）：a（j）=a（j+1）：a（j+1）=t
t=bh（j）：bh（j）=bh（j+1）：bh（j+1）=t End If
Next j p=q Next i
List1.AddItem“剩余物品數(shù)量：“For i=1 To n
If a（i）＞0 Then List1.AddItem Str（bh（i））+“號(hào)箱子：“+Str（a（i））Next i
End Sub組卷：0引用：1難度：0.5