2017年浙江省普通高校高考信息技術(shù)模擬試卷（3）
發(fā)布：2024/4/20 14:35:0
一、選擇題（本大題共9小題，每小題2分，共24分．每小題列出的四個備選項中只有一個符合題目要求，不選、多選、錯選均不得分）
-
1．飛機(jī)的模擬駕駛室實(shí)現(xiàn)了飛行場景的全程模擬，體驗(yàn)者可以在模擬駕駛室內(nèi)體驗(yàn)操縱飛機(jī)進(jìn)行起、降、機(jī)場滑行、空中改變航向等一系列動作．這種飛機(jī)模擬駕駛室主要應(yīng)用（ ）
組卷：6引用：2難度：0.9 -
2．小張從網(wǎng)上下載某軟件，下載頁面的部分截圖如圖所示．下列說法正確的是（ ?。?br />
組卷：11引用：2難度：0.9 -
3．在Word中使用鍵盤輸入文本時，部分字詞的下方出現(xiàn)了紅色的波浪線，這表明這部分字詞處（ ?。?/h2>
組卷：4引用：5難度：0.9 -
4．某Access數(shù)據(jù)表打開后如圖所示，下列說法中正確的是（ ?。?br />
組卷：7引用：1難度：0.9 -
5．以下關(guān)于數(shù)據(jù)庫的說法正確的是（ ）
組卷：12引用：1難度：0.5
【加試題】
-
16．某學(xué)校開設(shè)多樣化選修課程，學(xué)生可以根據(jù)個人興趣和特長選擇選修課．假設(shè)每門選修課的選課人數(shù)不超過40，學(xué)生選課的相關(guān)信息存放在數(shù)據(jù)庫文件“student.jye.ai”的data表中，選課查詢程序運(yùn)行時界面如圖所示．
程序功能：在文本框Text1中輸入課程號，單擊“查詢”按鈕Command1，在列表框List1中顯示選修本課程的各學(xué)生信息．如果沒有找到，在列表框中顯示“該課程當(dāng)前無人報名”．按此要求將程序補(bǔ)充完整．
Private Sub Command1_Click （ ?。?br />Dim xh（1to 40），xm（1to 40）As String'學(xué)號和姓名的數(shù)組
Dim i,num as integer
Dim conn As New ADODB．Connection,rs As New ADODB．
Recordset
Dim strSQL As String
conn.ConnectionString=“Provider=Microsoft.ACE．OLEDB.12.0；DataSource=”+App.Path+“\student.jye.ai”'打開到數(shù)據(jù)庫的鏈接
conn.Open
strSQL=“select xh,xm from data where課程=‘&（Text1．Text）&’”'設(shè)置查詢的SQL語句
Set rs.ActiveConnection=conn'設(shè)置rs的ActiveConnection屬性，指定與其關(guān)聯(lián)的數(shù)據(jù)庫鏈接
rs.OpenstrSQL'打開記錄集，將從表data中讀取的結(jié)果集保存到記錄集rs中
List1．Clear
num=0
DO while not rs.EOF
xh（num）=rs.Fields（“xh”）
xm（hum）=rs.Fields（“xm”）
rs.MoveNext
loop
rs.Close
conn.close
set rs=nothing
set conn=nothing
For i=1to num
Next i
if num=0then
List1．a(chǎn)dditem（“該課程當(dāng)前無人報名”）
End Sub
（1）程序中①橫線處應(yīng)填入．
（2）程序中②橫線處應(yīng)填入．組卷：8引用：2難度：0.1 -
17．競選班長．編號分別為1、2、3、4、5的五位候選人參加班長競選，現(xiàn)要設(shè)計一個計票程序，根據(jù)回收的選票信息統(tǒng)計各位候選人的得票數(shù)，得票數(shù)最多的被選為班長，并輸出班長的編號．選票信息為一個數(shù)字序列，由每張選票的投票結(jié)果構(gòu)成，如某選票序列為101233303，其含義見如表所示．
程序運(yùn)行時，在文本框Text1中輸入選票信息，單擊“計算”按鈕Command1后，被選為班長的編號顯示在文本框Text2中．程序運(yùn)行效果如圖所示．選票序列 1 0 1 2 3 3 3 0 3 含義 第1張選票投給1號 第2張選票棄權(quán) 第3張選票投給1號 第4張選票投給2號 第5張選票投給3號 第6張選票投給3號 第7張選票投給3號 第8張選票棄權(quán) 第9張選票投給3號 備注：選票序列101233303，序列中的數(shù)字i,表示投票給編號為i的人，即編號為i的人得1票，其中數(shù)字0表示不投給任何人，即為棄權(quán)．表中選票序列的投票結(jié)果為：1號得2票，2號得1票，3號4得票，4號.5號均為0票（沒人投），所以3號得票數(shù)最高，被選為班長．
實(shí)現(xiàn)上述功能的VB程序如下，請在橫線處填入合適的代碼．
Private Sub Command1_Click （ ?。?br />Dima（1To 5）As Integer
'數(shù)組元素a（1）～a（5）依次存放編號為1～5的五位候選人的得票數(shù)
Dim st As String,i As Integer,j As Integer,n As Integer
Dim ans As Integer'變量ans存放被選為班長的人的編號
Dim max As Integer'變量max存放最多的得票數(shù)
st=Text1．Text
For i=1To 5
a（i）=0
Next i
For i=1To 5
For j=1To n
IfThen a（i）=a（i）+1
Next j
Next i
max=0
For i=1To 5
If a（i）＞max Then
max=a（i）：ans=i
Next i
End Sub.組卷：5引用：1難度：0.1