2016-2017學年浙江省湖州市安吉縣上墅私立高級中學高二（下）第二次月考信息技術試卷

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

• 1．關于信息安全與網絡道德，下列做法正確的是（　　）

  A．確認環(huán)境安全后輸入支付密碼

  B．隨意掃描網頁中的二維碼

  C．未經許可，將他人的私人生活視頻傳到網上

  D．在論壇里轉發(fā)會造成社會不良影響的信息
  組卷：40引用：13難度：0.9

  解析

• 2．下列有關瀏覽器與網頁的說法，正確的是（　　）

  A．通過超鏈接可實現(xiàn)網頁之間的跳轉

  B．通過搜索引擎檢索到的信息，排在前面的可信度必定較高

  C．在IE瀏覽器中清空歷史記錄，收藏夾中的網址被同時清空

  D．IE瀏覽器中以“僅HTML”格式另存網頁，網頁中的圖片同時被保存
  組卷：47引用：11難度：0.9

  解析

• 3．小春用 Word 軟件撰寫了一篇觀后感，經老師審閱后文檔的部分截圖如圖所示，下列描述 正確的是（　?。?br />

  A．拒絕所有修訂后，文檔內容為“《開學第 1 課》2016 年 9 月 1 日晚上 8 點在 CCTV 首播”

  B．拒絕所有修訂后，文檔內容為“《開學第 1 課》于 2016 年 9 月 1 日晚上 8 點在中央電視臺首 播”

  C．接受所有修訂后，文檔內容為“《開學第一課》于 2016 年 9 月 1 日晚上 8 點在中央電視臺首 播”

  D．接受所有修訂后，文檔內容為“《開學第一課》于 2016 年 9 月 1 日晚上 8 點在中央電視臺CCTV 首播”
  組卷：12引用：6難度：0.9

  解析

• 4．下列應用中，沒有運用人工智能的是（　?。?/h2>

  A．使用翻譯軟件進行中英互譯

  B．使用掃描儀對雜志封面進行掃描

  C．使用語音輸入法進行文字錄入

  D．使用 OCR 對圖片文件中的文字進行識別
  組卷：8引用：7難度：0.9

  解析

• 5．在 Flash 軟件中編輯“退出”按鈕元件的部分界面如圖所示，下面描述正確的是（　?。?br />

  A．該按鈕無法正常使用

  B．當按鈕按下時會發(fā)出聲音

  C．當按鈕指針經過時按鈕不可見

  D．當鼠標經過按鈕時，鼠標變成手型
  組卷：20引用：8難度：0.7

  解析

【加試題】四、解答題（共2小題，滿分9分）

• 16．編寫VB程序，實現(xiàn)如下功能：在文本框Text1中輸入篩選關鍵詞“ca”，單擊“篩選”按鈕Command1，在列表框List1所列字符串中查找左邊與“ca”相匹配的字符串，并在列表框List2中輸出（運行效果如圖所示）；否則，在列表框List2中顯示“無篩選結果”．
  
  實現(xiàn)上述功能的VB代碼如下，但加框處代碼有錯，請改正．
  Dim a（1To 20）As String'用于存儲20個字符串
  '將20個字符串分別保存賦值給數(shù)組元素a（1）、a（2）、a（3）、a（4）、…、a（19）、a（20），并在列表框List1中顯示
  Private Sub Form_Load （　　）
  '代碼略
  End Sub
  Private Sub Command1_Click （　?。?br />Dim s As String,n As Integer,i As Integer
  Dim flag As Boolean'變量flag用于標記是否在數(shù)組a中篩選到左邊與s匹配的字符串
  List2．Clear'篩選時清空上次篩選結果
  s=Text1．Text
  n=Len（s）
  flag=False
  For i=1To 20
  If =s Then'（1）
  List2．AddItem a（i）
  flag=True
  End If
  Next i
  If flag=False Then
  '（2）
  End If
  End Sub.
  組卷：5引用：2難度：0.1

  解析

• 17．運動會田徑比賽，記分裁判把各賽道運動員的成績表交給錄入員錄入到計算機中，錄入人員編制了如下程序．運行程序，按道次順序依次輸入8個成績，道次號存放在數(shù)組a中，相應道次的運動員比賽成績存放于數(shù)組b中，并將原始成績顯示在列表框List1中．單擊“成績排序”按鈕（Command1），將原始成績從好到差排序，排序結果顯示在列表框List2中．運行效果如圖所示．
  
  實現(xiàn)上述功能的VB程序如下：
  （1）請在橫線處填入合適代碼．
  Dim a（1To 8）As Integer'存儲道次編號
  Dim b（1To 8）As Single'存儲運動員成績
  Dim num As Integer
  Private Sub Command1_Click （　?。?br />Dim i As Integer,j As Integer,k As Integer,p As Integer
  Dim t As Single
  For i=1To 7
  k=i
  For j=i+1To 8
  If

   

  Then
  k=j
  End If
  Next j
  If k＜＞i Then
  p=a（i）：a（i）=a（k）：a（k）=p
  t=b（i）：b（i）=b（k）：b（k）=t
  End If
  Next i
  For i=1To 8
  List2．AddItem Str（a（i）） &“道：“& Str（b（i））
  Next i
  End Sub
  Private Sub Text1_KeyPress（KeyAscii As Integer）'按回車鍵錄入比賽成績
  Dim cj As Single
  If KeyAscii=13Then
  num=num+1
  cj=Val（Text1．Text）
  If cj＞0And num＜=8Then
  a（num）=num
  

   

  
  List1．AddItem Str（a（num）） &“道：“& Str（b（num））
  Else
  MsgBox“輸入無效“
  End If
  Text1．Text=““
  End If
  End Sub
  （2）在Command1_Click

   

  事件過程中使用的排序算法是

   

  （選填：冒泡/選擇）排序．
  組卷：5引用：3難度：0.1

  解析