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