2017年浙江省杭州市蕭山區高考信息技術模擬試卷（21）

一、選擇題（本大題共12小題，每小題2分，共24分．每小題列出的四個備選項中只有一個是符合題目要求的，不選、多選、錯選均不得分）

• 1．現在過年過節大家都會熱衷發送微信紅包、搶紅包，小明看到同學群里的微信紅包，很高興地去點開，卻發現已經過期，這主要體現了信息的（　　）

  A．載體依附性

  B．可加工處理

  C．時效性

  D．真偽性
  組卷：15引用：2難度：0.9

  解析

• 2．小芳QQ郵箱的部分界面如圖所示，根據圖中信息，下列說法不正確的是（　　）
  

  A．該郵箱中共有232封未讀郵件

  B．該郵箱具有垃圾郵件過濾功能

  C．該郵箱中共有403封未讀郵件

  D．該郵箱能夠正常接收郵件是因為正確設置了POP3協議
  組卷：10引用：2難度：0.9

  解析

• 3．某用戶使用Word軟件編輯文檔，部分界面如圖所示：下列說法正確的是（　　）
  

  A．共有3處批注

  B．批注A1批注的對象是“來之麥田親子悅讀的推薦”

  C．若接受所有修訂，第一句話則為：線條簡明而隨意，色調溫馨而明媚

  D．若拒絕所有修訂，第一句話則為：線條簡明而隨意，色調溫暖而明媚
  組卷：11引用：2難度：0.9

  解析

• 4．某算法的流程圖如圖，以下說法不正確的是（　　）
  

  A．t最后的值為46

  B．循環共進行了5次

  C．程序結束后，i最后的值為1

  D．該流程圖是一個循環結構
  組卷：3引用：2難度：0.7

  解析

• 5．在Word中，想把字體設置成深紅色，除了直接選用標準色，也可以在調色板中用RGB（192，0，0）表示，其中“192”和“0”都是十進制數，若改用十六進制數表示深紅色，則正確的是（　　）

  A．C1H

  B．CCH

  C．FFH

  D．C0H
  組卷：11引用：2難度：0.7

  解析

二、非選擇題（本大題共5小題，其中第13題4分，第14題4分，第15題9分，第16題4分，第17題5分，共26分）

• 16．六一兒童節時，幼兒園組織小朋友們進行“尋寶”活動：老師找來10個盒子分別編號1-10號，把禮物裝入其中的4個盒子中，并把這10個禮品盒擺成一個圈供小朋友們“尋寶”．小朋友們都很興奮，覺得自己都能找到，但是老師對每個小朋友的尋寶路線是有規定的：從10號盒子出發（10號盒不裝禮物），第一個小朋友到1號盒子找，第二個小朋友隔1個盒子找（即3號盒子），第三個小朋友隔2個盒子找（即6號盒子），依此類推，次數不限．小朋友們幾乎找了一上午，都沒有人找到禮物．問禮物到底藏在哪4個盒子中？模擬上述過程的程序如下，程序運行結果如圖，但加框處代碼有誤，請改正，加線處請補充完整．
  
  Const n=10
  Dim h（10）As Integer'h數組模擬10個盒子
  Dim I As Integer
  Private Sub Form_Load （　　）
  For i=1To 10
  h（i）=0'h數組元素值為0，表示沒有被訪問到
  Next i
  End Sub
  Private Sub Command1_Click （　　）
  Dim j As Integer,number As Long
  number=0
  For j=1To 1000'假設小朋友們輪流總共找了1000次
  number=number+1'①
  i=number Mod n
  If h（i）=0Then②'h數組元素值為1，表示被訪問到
  Next j
  For i=1To n-1'顯示裝有禮物的盒子
  If h（i）=0Then
  List1．AddItem Str（i）+“號盒子“
  End If
  Next i
  End Sub
  加框處①有錯，應改為

   

  ．
  橫線處②應填的語句為

   

  ．
  組卷：8引用：2難度：0.1

  解析

• 17．【加試題】我省高中學生參加高考時，對于考生信息的核查已開始逐步推行驗證身份證號是否正確的和考生信息是否在考生庫。對于身份證號的驗證方法如下：我國的18位身份證號是由17位數字和1位校驗碼組成的，排列順序從左至右依次為：6位數字地址碼，8位數字出生日期碼，3位數字順序碼（同一地區同年、同月、同日出生人的編號，奇數是男生，偶數是女性）和1位校驗碼（0到10，10用X表示）。身份證號校驗碼可以檢驗身份證號是否有誤，身份證號的檢驗碼計算方法如下表：
  

  	1	2	3	4	5	6	7	8	9	10	11	12	13	14	15	16	17	18
  身份證號	3	3	2	5	2	2	6	1	9	9	9	0	1	0	1	0	0	1
  加權因子	7	9	10	5	8	4	2	1	6	3	7	9	10	5	8	4	2
  積	21	27	20	25	16	24	2	9	54	27	0	9	0	5	0	0	2
  和	241
  整除11取余	10

  先將身份證號1到17位分別乘以它對應的加權因了，然后再將17個積相加，再次得到的和整除11取余數，最后通過下表用余數得出對應的校驗碼。
  

  余數	0	1	2	3	4	5	6	7	8	9	10
  校驗碼	1	0	X	9	8	7	6	5	4	3	2

  驗證考生信息是否在考生庫的方法如下：核查驗證通過的身份證號，是否在參加本次考試的考生庫examinee。accdb的ksxx表中存在。
  程序運行時，在Txt_1中輸入待檢驗的身份證號，在Lab_1中顯示驗證的身份證號是否正確，
  在Lab_2中顯示驗證正確的身份證號是否在考生庫中。程序運行界面如圖：
  
  
  Dim w（1to 17）As Integer'存放加權因子
  Dim y（1to 10）As String'存放驗證碼
  Dim sf As String'存放身份證號
  Dim ks As Boolean'考生信息是否在考生庫
  
  Private Sub Command1_Click（　　）
  sf=Tex_1．Text
  If  Then'①
  Lab_1．Caption=“驗證結果：正確的身份證號”
  If ks=True Then
  Lab_2．Caption=“正確的考生信息”
  Else
  Lab_2．Caption=“錯誤的考生信息”
  End If
  Else
  Lab_1．Caption=“驗證結果：錯誤的身份證號”
  End If
  End Sub
  
  'yzsf函數用于驗證身份證號是否正確
  Function yzsf（sfzh  As String ） As Boolean
  Dim i As Integer,n As Integer
  w（1）=7：w（2）=9：w（3）=10：w（4）=5：w（5）=8
  w（6）=4：w（7）=2：w（8）=1：w（9）=6：w（10）=3
  w（11）=7：w（12）=9：w（13）=10：w（14）=5：w（15）=8
  w（16）=4：w（17）=2
  y（0）=”1”：y（1）=”0”：y（2）=”X”：y（3）=”9”：y（4）=”8”
  y（5）=”7”：y（6）=”6”：y（7）=”5”：y（8）=”4”：y（9）=”3”
  y（10）=”2”
  If Len（sfzh）=18Then
  n=0
  For i=1to 17
  n=n+②
  Next i
  n=n mod 11
  If Mid（sfzh,n,1）=y（n） Then
  yzsf=True
  Else
  yzsf=Flase
  End IF
  Else
  MsgBox（“請輸入18位身份證號”）
  End IF
  End Function
  
  Private Sub Form_Load（　　）'本過程用于驗證考生是否在考生庫中
  Dim conn As New ADODB．Connection,rs As New ADODB．Recordset
  Dim intSQL As Long
  conn.ConnectionString=“Provider=Microsoft.ACE．OLEDB.12.0；Data Source=“+App.Path+“\③“
  conn.Open
  intSQL=“SELECT score  FROM Integral“
  Set rs.ActiveConnection=conn
  rs.CursorType=adOpenStatic
  rs.Open intSQL
  '本過程其他語句略
  End Sub
  （1）加框處①有錯，應改為

   

  。
  （2）②處應填入的語句為

   

  。
  （3）③處應填入的語句為

   

  。
  組卷：5引用：1難度：0.1

  解析