2017年浙江省信息技術考前押寶試卷（3）

一、選擇題（共12小題，每小題2分，滿分24分）

• 1．支付寶掃碼付款是一種新型的付款方式，付款時只需要給收銀員掃一下就可以完成支付，支付寶付款碼的產生過程屬于（　?。?/h2>

  A．信息的采集

  B．信息的表達

  C．信息的發(fā)布

  D．信息的編碼
  組卷：7難度：0.9

  解析

• 2．如圖為中國工商銀行LOGO，此圖片存在冗余可進行數據壓縮，該圖片的冗余主要表現為（　?。?/h2>

  A．結構冗余

  B．空間冗余

  C．視頻冗余

  D．時間冗余
  組卷：4引用：1難度：0.9

  解析

• 3．某軟件對用戶輸入的4位十進制數字密碼加密存儲，加密規(guī)則為每個數字加6后再轉換為4位二進制數字，并取反，即0變1，1變0，當用戶輸入的密碼為1925時，加密后存儲的密碼為（　?。?/h2>

  A．0111 1111 1000 1011	B．1000 0000 0111 0100
  C．0001 1001 0010 0101	D．1110 0110 1101 1010
  組卷：10難度：0.9

  解析

• 4．UltraEdit軟件觀察字符內碼，結果如圖所示，則圖中內碼表示的對象可能是（　?。?br />

  A．2個GB2312字符	B．4個GB2312字符
  C．4個ASCII字符	D．8個ASCII字符
  組卷：6引用：1難度：0.5

  解析

• 5．棱鏡門事件的主角斯諾登說：“一旦連上網絡，無論采用什么樣的保護措施，你都不可能安全．”另外，今日維基解密披露的機密文件介紹了中情局全球秘密黑客計劃的規(guī)劃和方向：惡意代碼庫以及數十個可侵入包括蘋果iPhone、谷歌安卓系統(tǒng)、微軟視窗操作系統(tǒng)、三星電視等流行IT產品的武器化黑客工具…，比如，CIA“哭泣天使”程序讓電視假關機，智能電視變竊聽器，從這些事例中我們可以判斷：（　?。?/h2>

  A．任何信息安全防護措施都毫無價值

  B．網絡中存在非法監(jiān)聽行為

  C．信息安全問題只與網絡有關

  D．一旦連上網絡，我們可能會有生命危險
  組卷：4引用：1難度：0.7

  解析

二、解答題（共5小題，滿分26分）

• 16．【加試題】從鍵盤鍵入一組無序整數，比如依次輸入78，18，-3，0，8，-6，9，2，當輸入為空時，這組數據將在列表框List1中依次有序輸出，完善下面的VB程序，在橫線處填入合適的語句，完成程序設計．
  List.Clear
  Const n=100
  Dim a（-1 To n） As Integer
  Dim m As Integer,i As Integer
  Dim j As Integer
  Dim t As String,x As Integer
  m=0
  t=InputBox（“請輸入X的值：“）
  Do While t＜＞““And m＜n
          x=Val（t）
          i=m
          Do While x＜a（i-1）And i＞0
  

   

  
                  i=i-1
          Loop
          a（i）=x
  

   

  
          t=InputBox（“請輸入X的值：“）
  Loop
  For i=0 To m-1
          List1．AddItem a（i）
  Next i.
  組卷：6引用：1難度：0.3

  解析

• 17．【加試題】某單位招聘事業(yè)單位工作人員，2015年和2016年各有4000名和2600名考生報名，下列VB程序統(tǒng)計兩次考試都參加的考生信息．程序界面如圖所示，2015年和2016年的考生信息分別顯示在List1和List2中，點擊“統(tǒng)計”按鈕，在List3中顯示兩次都參加的考生信息和總人數．
  
  （1）實現上述功能的VB程序如下，請在橫線處填入合適的代碼．
  Dim a（1 To 4000）As String
  Dim b（1 To 2600）As String
  Private Sub Form_Load（　?。?br />Dim conn As New ADODB．connection
  Dim rs As New ADODB．Recordset
  Dim constr As String
  constr=“Provider=Microsoft.ace.OLEDB.12.0；“
  constr=constr &“Data Source=“& App.Path+“\data\kaosheng.jye.ai“
  conn.ConnectionString=constr
  conn.open（　　）
  Dim sql As String
  Rem將參加2015年考試的考生身份證號碼按升序存放在a數組中
  sql=“select*from kaoshenginfo where year='2015'order by sfzh asc“
  rs.jye.ai sql,conn
  i=0
  Do While Not rs.EOF
          i=i+1
          a（i）=rs（“sfzh“）
          List1．AddItem （a（i））
          rs.MoveNext
  Loop
  Rem將參加2016年考試的考生身份證號碼按升序存放在b數組中
  sql=“select*from kaoshenginfo where year='2016'order by sfzh asc“
  rs.jye.ai sql,conn
  i=0
  Do While Not rs.EOF
          i=i+1
          b（i）=rs（“sfzh“）
          List2．AddItem （b（i））
          rs.MoveNext
  Loop
  End Sub
  Private Sub Command1_Click（　?。?br />Dim bot As Integer,top As Integer,m As Integer
  Dim i As Integer,ans As Integer'ans用于記錄兩次均參加考試的考生數
  ans=0
  For i=1 To 2600
         bot=1
         top=4000
         Do While bot＜=top
                 m=Fix（（bot+top）/2）
                 If a（m）=b（i） Then
                        List3．AddItem a（m）
  

   

  
                        Exit Do
                 ElseIf

   

   Then
                         top=m-1
                 Else
  

   

  
                 End If
         Loop
  Next i
  List3．AddItem“總計“+Str（ans）+“人次“
  End Sub
  （2）分析上述代碼，在數據庫中用于存放考生身份證號碼的字段名稱是

   

  ．
  組卷：7引用：1難度：0.1

  解析