2017年浙江省嘉興市普通高校招生選考信息技術(shù)試卷

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

• 1．下列有關(guān)信息的說法中錯誤的是（　?。?/h2>

  A．信息必須依附于載體才能得以表示、存儲和傳播

  B．計算機中存儲的文字、聲音、圖象等，均采用二進(jìn)制代碼

  C．用計算機加工處理信息，本質(zhì)上都是通過計算完成的

  D．因特網(wǎng)上高可信度的信息，可以自由地進(jìn)行轉(zhuǎn)載
  組卷：11引用：1難度：0.9

  解析

• 2．下列有關(guān)網(wǎng)頁的說法中錯誤的是（　　）

  A．網(wǎng)頁的HTML源代碼可以使用Edge等瀏覽器軟件解釋執(zhí)行

  B．網(wǎng)頁文件可以使用記事本、FrongtPage等軟件編輯

  C．使用百度等搜索引擎檢索信息，實際上是直接檢索相關(guān)的網(wǎng)頁文件

  D．將正在瀏覽的網(wǎng)頁添加到收藏夾，實際上保存的是該網(wǎng)頁的URL
  組卷：11引用：1難度：0.9

  解析

• 3．下列應(yīng)用中，使用了OCR技術(shù)的是（　?。?br />①車輛牌照識別系統(tǒng)拍攝車輛照片后，自動識別出其中的車牌號碼
  ②視頻監(jiān)控系統(tǒng)監(jiān)測紅綠燈路口的車輛通行情況
  ③某手機云筆記App通過掃描文字稿件，自動識別后轉(zhuǎn)化為可編輯的文本
  ④手機拍攝練習(xí)題解題過程照片，并發(fā)布在班級QQ群中討論
  ⑤某手機銀行App轉(zhuǎn)賬時，通過掃描銀行卡自動輸入卡號．

  A．①②④

  B．①③⑤

  C．②③⑤

  D．③④⑤
  組卷：7引用：1難度：0.9

  解析

• 4．下列有關(guān)Access數(shù)據(jù)表的操作，說法正確的是（　?。?/h2>

  A．打開的數(shù)據(jù)表，可以進(jìn)行重命名操作

  B．在設(shè)計視圖中，可以進(jìn)行添加記錄操作

  C．在非空數(shù)據(jù)表中，刪除某字段其值會被同步刪除

  D．在非空數(shù)據(jù)表中，可以將“數(shù)字”類型的字段修改為“自動編號”類型
  組卷：8引用：1難度：0.5

  解析

• 5．已知二進(jìn)制數(shù)“1000B”是二進(jìn)制數(shù)“10B”的4倍，那么十六進(jìn)制數(shù)“B00H”是十六進(jìn)制數(shù)“BH”的幾倍（　?。?/h2>

  A．16

  B．32

  C．64

  D．256
  組卷：5引用：1難度：0.5

  解析

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

• 16．【加試題】簡化的VB詞頻統(tǒng)計程序．程序功能為：在文本框Text1中輸入一篇英文文章，在文本框Text2中輸入一個英文單詞，單擊按鈕Command1后，在文本框Text3中顯示這個英文單詞出現(xiàn)的次數(shù)．程序運行界面如圖所示．
  
  查找的英文單詞由連續(xù)的ASCII英文字符（a～z或A～Z）組成．組合詞程序會進(jìn)行分解，如river-small可拆分為2個單詞river和small.查找的英文單詞不區(qū)分大小寫．程序代碼如下：
  Private Sub Command1_Click（　?。?br />       Dim article As String,f As String,count As Integer
         Dim i As Integer,begin As Integer,s As String
         article=Text1．Text：f=Text2．Text：count=0
         begin=1
         For i=1 To Len（article）
                t=Mid（article,i,1）
                If Not （t＞=“A“And t＜=“Z“Or t＞=“a“And t＜=“z“） Then
                        If i＞begin Then      
                               s='（1）
                               If LowerCase（f）=LowerCase（s） Then
                                       count=count+1
                               End If
                               begin=i+1
                         End If
                Next i
                Text3．Text=“出現(xiàn)次數(shù)為：“+Str（count）+“次“
         End Sub
  '單詞轉(zhuǎn)化為全小寫的形式
         Function LowerCase（word As String） As String
                Dim i As Integer,e As String
                For i=1 To Len（word）
                        c=Mid（word,i,1）
  '小寫英文字母的ASCII碼值比大寫字母的值大32
                If c＞=“A“And c＜=“Z“Then c='（2）
                LowerCase=LowerCase+e
         Next i
  End Function
  程序中（1）、（2）處加框代碼有誤，請改正．
  （1）處加框代碼應(yīng)修改為：

   

  ．
  （2）處加框代碼應(yīng)修改為：

   

  ．
  組卷：5引用：1難度：0.3

  解析

• 17．【加試題】領(lǐng)禮物．圣誕節(jié)到了，教室里放滿了禮物，大家站在同一位置即原點（0，0）處，根據(jù)自己拿禮物的序號輪流去拿禮物，每個人只能拿離自己最近的禮物，每件禮物的位置用坐標(biāo)（x,y）表示．如果有多個禮物離你的距離相等（精確到小數(shù)后二位）且最近，則這些禮物都?xì)w你所有．
  程序運行時，在文本框Text1中輸入共有禮物數(shù)n,單擊“讀取數(shù)據(jù)”按鈕Command1，將從數(shù)據(jù)庫gift.accdb中讀取n個禮物的信息存儲在相應(yīng)的數(shù)組中，并顯示在列表框List1中；在文本框Text2中輸入輪到你拿禮物的序號（即第幾個拿），單擊“計算”按鈕Command2，則在列表框List2顯示你獲得的禮物信息，并在列表框list2最后一行顯示獲得的禮物總數(shù)．程序運行界面如圖所示．
  
  實現(xiàn)上述功能的VB程序代碼如下，請回答下列問題．
  Dim conn As New ADODB．Connection
  Dim rs As New ADODB．Recordset
  Dim bh（1 To 100）As String'數(shù)組bh存儲禮物的編號
  Dim x（1 To 100）As Single,y（1 To 100）As Single'數(shù)組x、y分別存儲禮物的橫坐標(biāo)和縱坐標(biāo)
  Dim dist（1 To 100）As Single'數(shù)組dist存儲禮物到原點的距離
  Dim n As Integer'變量n表示禮物數(shù)
  Private Sub Command1_Click（　?。?br />   Dim i As Integer
  '從數(shù)據(jù)庫中讀取n件禮物的編號、橫坐標(biāo)、縱坐標(biāo)，并存儲在相應(yīng)的數(shù)組中
  '代碼略，下面代碼的功能是計算各禮物到原點的距離
     For i=1 To n
           dist（i）=

   

  
           List1．AddItem bh（i）+““+Str（x（i））+““+Str（y（i））+““+Str（dist（i））
     Next i
  End Sub
  Private Sub Command2_Click（　?。?br />   Dim xh As Integer,i As Integer,j As Integer,k As Integer
     Dim temp1 As String,temp2 As Single,p As Single,s As Single
     xh=Val（Text2．Text）
  '將禮物按到原點的距離從小到大排序，代碼略
     i=0：j=1：s=0
     Do While（i＜xh）And（j＜=n）
         If dist（j）＜＞s Then
  

   

  
                 i=i+1
         End If
         j=j+1
     Loop
     u=0
     j=j-1
          Do While

   

  
          List2．AddItem bh（j）+Str（x（j））+Str（y（j））+Str（dist（j））
          u=u+1
          j=j+1
     Loop
     List2．AddItem“total：“+Str（u）
  End Sub
  （1）請在程序橫線處填入合適的語句：
  劃線①處應(yīng)填入的語句為：

   

  ；
  劃線②處應(yīng)填入的語句為：

   

  ；
  劃線③處應(yīng)填入的語句為：

   

  ．
  （2）假設(shè)現(xiàn)共有14件禮物，禮物的信息如圖所示，你輪到第10個拿禮物，則你獲得的禮物數(shù)為

   

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

  解析