2017年浙江省普通高校高考信息技術(shù)模擬試卷（8）
發(fā)布：2024/4/20 14:35:0
一、選擇題（本大題共12小題，每小題2分，共24分．每小題列出的四個(gè)備選項(xiàng)中只有一個(gè)符合題目要求，不選、多選、錯(cuò)選均不得分）
-
1．中國(guó)某即時(shí)通信軟件的“紅包”服務(wù)功能，有一項(xiàng)規(guī)定：紅包在發(fā)起后的24小時(shí)內(nèi)沒(méi)有被領(lǐng)取，將自動(dòng)退款．這個(gè)規(guī)定主要是保證信息的（ ?。?/h2>
組卷：26引用：6難度：0.9 -
2．小張的QQ號(hào)被盜，經(jīng)過(guò)申訴后取回，為了保障QQ號(hào)的安全，下列做法合理的是（ ?。?br />①通過(guò)申訴取回就表示QQ號(hào)是我專用的，不用進(jìn)行任何操作
②把QQ號(hào)與自己的常用手機(jī)綁定
③更改QQ密碼為自己的生日
④重新設(shè)置QQ密保問(wèn)題
⑤購(gòu)買QQ令牌并綁定
⑥更新殺毒軟件并進(jìn)行完全掃描．組卷：6引用：2難度：0.9 -
3．某款手機(jī)的部分參數(shù)如下表所示：
下列說(shuō)法不正確的是（ ）參數(shù) 功能 手機(jī)類型 手機(jī)類型4G手機(jī)，3G手機(jī)，智能手機(jī)，音樂(lè)手機(jī)，拍照手機(jī) 主屏 尺寸：4.7英寸；材質(zhì)：RetinaHD；分辨率：1334×750像素觸摸屏類型：電容屏，多點(diǎn)觸控 操作系統(tǒng) iOS 9 網(wǎng)絡(luò) 全網(wǎng)通：支持2G/3G/4G 支持單頻/雙頻WIFI導(dǎo)航，GPS導(dǎo)航，A-GPS技術(shù)，GLONASS導(dǎo)航，iBeacon微定位 CPU 型號(hào)：蘋果A9+M9協(xié)處理器；頻率：1.8 GHz；位數(shù)：64位 機(jī)身內(nèi)存 2 GB 可用空間 64 GB 攝像頭類型 雙攝像頭前置：500萬(wàn)像素；后置：1200萬(wàn)像素 音頻支持 支持MP3VBR/Audible（格式2、3、4、Audible Enhanced Audio、AAX與AAX+）/Apple Lossless/AIFF/WAV等格式 視頻支持 H.264視頻、MPEG-4視頻、Motion JPEG（M-JPEG） 手機(jī)尺寸 138.3×67.1×7.1 mm 組卷：11引用：1難度：0.9 -
4．某同學(xué)用Access軟件創(chuàng)建了一張關(guān)于樓盤情況的數(shù)據(jù)表，界面如圖所示．下列說(shuō)法正確的是（ ）
組卷：6引用：1難度：0.7 -
5．某算法的部分流程圖如圖所示：
該流程圖的算法模式屬于（ ?。?/h2>組卷：13引用：2難度：0.7
二、非選擇題（本大題共5小題，其中第13小題4分，第14小題4分，第15小題5分，第16小題8分，第17小題5分，共26分）
-
16．【加試題】編寫VB程序，實(shí)現(xiàn)如下功能：在文本框Text1中輸入一個(gè)整數(shù)n,單擊“產(chǎn)生”按鈕Command1，隨機(jī)生成n個(gè)1～100的不同整數(shù)．單擊“排序”按鈕Command2，對(duì)產(chǎn)生的隨機(jī)數(shù)進(jìn)行從小到大的排序，并將排序結(jié)果輸出在窗體上．界面如圖所示．
按此要求編寫的程序如下：
Option Base 1'數(shù)組下標(biāo)從1開始
Dim a（ ?。?動(dòng)態(tài)數(shù)組，數(shù)組元素個(gè)數(shù)不無(wú)確定
Dim i As Integer
Private Sub Command1_Click（ ）
n=Val（Text1．Text）
ReDim a（n）'定義數(shù)組元素個(gè)數(shù)為n
For i=1To n
Randomize'初始化隨機(jī)數(shù)發(fā)生器
a（i）='產(chǎn)生1～100的隨機(jī)整數(shù)
For j=1To i-1
If a（j）=a（i） Then
i=i-1
Exit For
End If
Next j
Next i
Print“排序前：”；
For i=1To n
Print a（i）；
Next i
End Sub
Private Sub Command2_Click（ ?。?br />n=Val（Text1．Text）
For i=1To n-1
k=i
For j=k+1To n
Next j
If k＜＞i Then
temp=a（k）：a（k）=a（i）：a（i）=temp
End If
Next i
Print
Print“排序后：”；
For i=1To n
Print a（i）；
Next i
End Sub
請(qǐng)回答下列問(wèn)題：
（1）①處的代碼為．
（2）②處的代碼為．組卷：14引用：1難度：0.1 -
17．【加試題】小金想模擬實(shí)現(xiàn)郵箱注冊(cè)及保存過(guò)程，他用VB設(shè)計(jì)了一個(gè)模擬程序．功能如下：運(yùn)行程序時(shí)，在文本框Text1中輸入待注冊(cè)的郵件地址（假設(shè)輸入的地址合理），在文本框Text2和Text3中分別輸入兩次密碼，單擊“立即注冊(cè)”按鈕Command1，查找郵件數(shù)據(jù)庫(kù)，如郵件地址未在數(shù)據(jù)庫(kù)中并且前后兩次密碼一致，則把郵件地址和密碼加入到數(shù)據(jù)庫(kù)中，并顯示在列表框List1中，其應(yīng)用程序界面如圖所示．
數(shù)據(jù)信息存放在數(shù)據(jù)庫(kù)文件“youxiang.jye.ai”的“use”表中，假定郵箱數(shù)不超過(guò)100個(gè)．請(qǐng)?jiān)跈M線處填上合適的代碼．
代碼如下：
Dim yxdz（1To 100）As String'定義存儲(chǔ)郵箱地址的數(shù)組
Dim yxmm（1To 100）As string'定義存儲(chǔ)郵箱密碼的數(shù)組
Dim n As Integer'定義存儲(chǔ)郵箱總數(shù)的變量
Private Sub Command1_Click（ ）
Dim key As String
key=（Text1．Text）
If Text2．Text=Text3．Text Then
For i=1To n
IfThen
MsgBox（“郵件地址有重名，請(qǐng)檢查！”）
'在消息框中顯示郵件地址有重名
Exit For
Next i
Else
MsgBox（“密碼前后不一致，請(qǐng)檢查！”）
'在消息框中顯示密碼前后不一致
End If
'把郵件信息添加到數(shù)據(jù)庫(kù)youxiang.jye.ai中的程序代碼略
End Sub
Private Sub Form_Load（ ?。?br />Dim conn As New ADODB．Connection
'定義Connection對(duì)象實(shí)例conn
Dim rs As New ADODB．Recordset
'定義Recordset對(duì)象實(shí)例rs
conn.ConnectionString=“provider=Microsoft.ACE．OLEDB.12.0；
date source=”& App.Path&“\youxiang.jye.ai”
'設(shè)置conn的數(shù)據(jù)庫(kù)連接字符串
conn.Open
'打開數(shù)據(jù)庫(kù)連接
rs.ActiveConnection=conn
'設(shè)置rs的ActiveConnection屬性，關(guān)聯(lián)conn
rs.Open“SELECT*FROM”
'打開記錄集，獲取數(shù)據(jù)
n=0
List1．AddItem“郵箱地址”&“”&“郵箱密碼”
Do While Not rs.EOF
n=n+1
yxdz（n）=rs.Fields（1）
'郵箱地址字段的序號(hào)為1
yxmm（n）=rs.Fields（2）
'郵箱密碼字段的序號(hào)為2
List1．AddItem yxdz（n）&“”&yxmm（n）
rs.MoveNext
Loop
rs.Close
conn.Close
End Sub
程序中①橫線處應(yīng)填入．
程序中②橫線處應(yīng)填入．程序中③處應(yīng)填入．組卷：14引用：1難度：0.1