2017年浙江省杭州市蕭山區(qū)高考信息技術(shù)模擬試卷（1）

一、選擇題（本大題共9小題，每小題2分，共24分．在每小題給出的四個(gè)選項(xiàng)中，只有一個(gè)符合題目要求）

• 1．下列有關(guān)信息和信息技術(shù)的說法中，不正確的是（　?。?/h2>

  A．為了保證計(jì)算機(jī)中信息的安全，需要定期的對(duì)計(jì)算機(jī)進(jìn)行格式化

  B．?dāng)?shù)據(jù)庫(kù)在我們生活中有廣泛的應(yīng)用，包括搜索引擎的使用、校園一卡通系統(tǒng)等

  C．計(jì)算機(jī)是一種信息處理工具，它能幫助我們更加高效地處理和加工信息的前提是信息的數(shù)字化

  D．小明把資料保存在U盤中，U盤的意外損壞導(dǎo)致存儲(chǔ)的信息全部丟失，這說明信息的儲(chǔ)存必須依附于某種載體
  組卷：5引用：1難度：0.9

  解析

• 2．如圖所示為使用IE瀏覽器瀏覽某網(wǎng)頁(yè)的部分截圖，則下列說法不正確的是（　　）
  

  A．http://news.qq.jye.ai/a/20160531/048095．htm是一個(gè)網(wǎng)址

  B．http是超文本傳輸協(xié)議，輸入的時(shí)候可省略

  C．單擊按鈕  ，將收藏當(dāng)前瀏覽的網(wǎng)頁(yè)

  D．單擊按鈕  ，可以查看歷史記錄
  組卷：7引用：1難度：0.9

  解析

• 3．小明請(qǐng)王老師幫忙修改他們小組的研究性學(xué)習(xí)報(bào)告（DOCX格式），部分界面如圖所示：
  
  以下說法中正確的是（　?。?/h2>

  A．當(dāng)前圖片的環(huán)繞方式是上下型

  B．該處文檔中添加了2個(gè)批注

  C．批注內(nèi)容的字體和字號(hào)是不可以設(shè)置的

  D．只有文字才能添加批注，圖片是不能添加批注的
  組卷：11引用：1難度：0.9

  解析

• 4．在“資料”數(shù)據(jù)庫(kù)中，小明建立“藏書”數(shù)據(jù)表并輸入數(shù)據(jù)的操作步驟如下：
  ①填寫字段名、設(shè)置字段類型
  ②切換到“設(shè)計(jì)”視圖
  ③保存、命名數(shù)據(jù)表
  ④添加新記錄
  則正確的順序應(yīng)該是（　?。?/h2>

  A．①②③④

  B．②①④③

  C．②①③④

  D．①②④③
  組卷：6引用：2難度：0.9

  解析

• 5．有如下VB程序段：
  Private Sub Command1_Click（　　）
  Dim i As Integer,x As Integer
  x=1
  For i=1To 5Step 2
  x=x+i
  Text1．Text=Str（x）
  Next i
  End Sub
  則該程序運(yùn)行后，文本框Text1中顯示的數(shù)據(jù)個(gè)數(shù)是（　?。?/h2>

  A．1個(gè)

  B．2個(gè)

  C．3個(gè)

  D．5個(gè)
  組卷：9引用：1難度：0.5

  解析

【加試題】

• 15．n個(gè)數(shù)從小到大選擇排序需要經(jīng)過n-1遍加工，每遍加工從未排序的數(shù)據(jù)元素中找出最小的元素與當(dāng)前元素進(jìn)行交換．小天同學(xué)學(xué)習(xí)了選擇排序算法和函數(shù)的知識(shí)后，編寫了一個(gè)VB程序，功能如下：運(yùn)行程序時(shí)首先在列表框List1中顯示10個(gè)不小于10且不大于99的隨機(jī)自然數(shù)，單擊“排序”按鈕Command1后，在列表框List2中顯示這些數(shù)據(jù)按從小到大排序后的結(jié)果，運(yùn)行結(jié)果如圖所示．
  實(shí)現(xiàn)上述功能的VB代碼如下，但加框處有錯(cuò)，請(qǐng)改正．
  Dim a（1 To 10）As Integer'定義數(shù)組a
  Private Sub Form_Load （　?。?br />  Randomize
    For i=1 To 10'產(chǎn)生10個(gè)不小于10且不大于99的隨機(jī)自然數(shù)，并依次存放在數(shù)組a中
      a（i）=Int（Rnd*100）'①
      List1．AddItem Str（a（i））
    Next i
  End Sub
  'Find_min函數(shù)尋找與當(dāng)前元素a（x）需要交換的數(shù)組元素下標(biāo)
  Function Find_min（x As Integer）
    Dim k As Integer,j As Integer
    k=x
    For j=x+1 To 10
      If a（j）＜a（k） Then k=j
    Next j
    Find_min=k
  End Function
   Private Sub Command1_Click （　?。?br />  Dim i As Integer,k As Integer,t As Integer
    For i=1 To 9
      k=Find_min（i+1）'②
      If k＜＞i Then
        t=a（i）：a（i）=a（k）：a（k）=t
      End If
    Next i
    For i=1 To 10
       List2．AddItem Str（a（i））
    Next i
  End Sub
  （1）加框處①有錯(cuò)，應(yīng)改為

   

  
  （2）加框處②有錯(cuò)，應(yīng)改為

   

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

  解析

• 16．某學(xué)校開設(shè)多樣化選修課程，學(xué)生可以根據(jù)個(gè)人興趣和特長(zhǎng)選擇選修課．假設(shè)每門選修課的選課人數(shù)不超過40，學(xué)生選課的相關(guān)信息存放在數(shù)據(jù)庫(kù)文件“student.jye.ai”的data表中，選課查詢程序運(yùn)行時(shí)界面如圖所示．
  程序功能：在文本框Text1中輸入課程號(hào)，單擊“查詢”按鈕Command1，在列表框List1中顯示選修本課程的名學(xué)生信息．如果沒有找到，在列表框中顯示“該課程當(dāng)前無人報(bào)名”．按此要求將程序補(bǔ)充完整．
   
   Private Sub command1_click （　?。?br />Dim xh（1 to 40），xm（1 to 40）As String'學(xué)號(hào)和姓名的數(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；Data Source=“+App.Path+“\student.jye.ai“'打開到數(shù)據(jù)庫(kù)的鏈接
   conn.Open
  strSQL=“select xh,xm from data where'課程=&（Text1．Text） &'“'設(shè)置查詢的SQL語(yǔ)句
   Set rs.ActiveConnection=conn'設(shè)置rs的ActiveConnection屬性，指定與其關(guān)聯(lián)的數(shù)據(jù)庫(kù)鏈接
    rs.Open strSQL'打開記錄集，將從表student中讀取的結(jié)果集保存到記錄集rs中
    List1．Clear
  num=0
  Do while not rs.EOF①
        xh（num）=rs.Fields（“xh“）
        xm（num）=rs.Fields（“xm“）
    rs.MoveNext
  loop
  rs.Close
    conn.close
  set rs=nothing
  set conn=nothing
  For  i=1 to num
  ②
  Next i
  if num=0 then list1．a(chǎn)dditem（“該課程當(dāng)前無人報(bào)名“）
  End Sub
  （1）改程序打開數(shù)據(jù)庫(kù)鏈接的數(shù)據(jù)庫(kù)名是

   

  
  （2）程序中①橫線處應(yīng)填入

   

  
  （3）程序中②橫線處應(yīng)填入

   

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

  解析