2017-2018學(xué)年浙江省紹興高級中學(xué)高二（上）期末信息技術(shù)試卷

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

• 1．中國某即時通信軟件的“紅包”服務(wù)功能，有一項規(guī)定：紅包在發(fā)起后的24小時內(nèi)沒有被領(lǐng)取，將自動退款．這個規(guī)定主要是保證信息的（　?。?/h2>

  A．時效性

  B．共享性

  C．交互性

  D．載體依附性
  組卷：26引用：6難度：0.9

  解析

• 2．“餓了么”是中國知名的在線外賣訂餐平臺，為中國廣泛地區(qū)的用戶提供豐富多樣的便捷生活服務(wù)。該軟件商家版下載界面部分截圖如圖所示：根據(jù)圖中信息，下列關(guān)于該軟件的說法不正確的是（　?。?/h2>

  A．存儲容量約為50MB

  B．該軟件可以在Windows10系統(tǒng)中運行

  C．評價方法采用了個人推薦的方式

  D．通過掃描圖中的二維碼可以在手機端下載該軟件
  組卷：24引用：1難度：0.9

  解析

• 3．某文檔在Word修訂模式下修改后的部分界面如圖所示：
  
  拒絕其中所有的修訂和刪除所有的批注后文字內(nèi)容將變?yōu)椋ā　。?/h2>

  A．梅花，冰枝嫩綠，疏影清雅，花色美秀，幽香宜人。它，桃紅，鵝黃，雪白…數(shù)不勝數(shù)。紅如朝霞，白似瑞雪，宛如碧玉。這兒一簇，那兒一簇，真可謂“梅開春爛漫”

  B．梅花，冰枝嫩綠，疏影清雅，花色美秀，幽香宜人。它五彩斑斕，桃紅，鵝黃，雪白…數(shù)不勝數(shù)。紅如朝霞，白似瑞雪，綠如碧玉。這兒一簇，那兒一簇，真可謂“梅開春爛漫”

  C．冰枝嫩綠，疏影清雅，花色美秀，幽香宜人。它，桃紅，鵝黃，雪白…數(shù)不勝數(shù)。紅如朝霞，白似瑞雪，如碧玉。這兒一簇，那兒一簇，真可謂“梅開春爛漫”

  D．梅花，冰枝嫩綠，疏影清雅，花色美秀，幽香宜人。它五彩斑斕，桃紅，鵝黃，雪白…數(shù)不勝數(shù)。紅如朝霞，白似瑞雪，宛如碧玉。這兒一簇，那兒一簇，真可謂“梅開春爛漫”
  組卷：23引用：1難度：0.9

  解析

• 4．下列關(guān)于Access數(shù)據(jù)庫的說法錯誤的是（　　）

  A．刪除記錄操作是不可恢復(fù)的操作，在刪除記錄前必須要確認(rèn)是否真的要刪除該記錄

  B．?dāng)?shù)據(jù)類型為自動編號的字段數(shù)據(jù)不一定是連續(xù)的

  C．刪除字段操作是不可恢復(fù)的操作，刪除字段后不會減少記錄數(shù)

  D．復(fù)制記錄時，通過【粘貼】命令，只能將記錄添加到數(shù)據(jù)表的末尾
  組卷：10引用：1難度：0.5

  解析

• 5．如圖所示是一個8*8像素的黑白二色位圖，加入使用0表示白色、1表示黑色，按照行從左向右的次序?qū)υ搱D象信息進行編碼（不考慮壓縮），將該圖象編碼信息的字節(jié)數(shù)基座X，表示第一行圖象信息的十六進制編碼記做Y．下列選項中正確的X，Y組合是（　?。?/h2>

  A．64，44H

  B．8，BBH

  C．8，9CH

  D．16，A7H
  組卷：25引用：1難度：0.7

  解析

【加試題】

• 16．小李編寫VB程序模擬“中國福利彩票雙色球”抽獎，實現(xiàn)如下功能：雙色球投注區(qū)分為紅色球號碼區(qū)和藍(lán)色球號碼區(qū)，紅色球號碼區(qū)由1-33共33個號碼組成，藍(lán)色球號碼區(qū)由1-16共16個號碼組成。每次隨機選擇6個紅色球號碼（紅球號碼不能重復(fù)出現(xiàn)）和1個藍(lán)色球號碼（可以和紅色號碼相同），界面如圖所示。單擊“產(chǎn)生號碼”按鈕（Command1）在Text1中產(chǎn)生紅球號碼，在Text2中產(chǎn)生藍(lán)球號碼。單擊“退出”按鈕（Command2）結(jié)束程序。
  
  實現(xiàn)上述功能的VB程序如下，但加框處代碼有錯誤，請改正。
  Dim a（1To 6）As Integer
  Private Sub Command1_Click （　?。?br />Dim y As Integer,i As Integer
  Text1．Text=““
  Randomize
  For i=1To 6
  a（i）=Int（Rnd*33）+1
  Do While And i＞1
  a（i）=Int（Rnd*33）+1
  Loop
  Next i
  For i=1To 6
  Text1．Text=Text1．Text+Str（a（i））
  Next i
  y=
  Text2．Text=Str（y）
  End Sub
  Function check（m As Integer,n As Integer） As Boolean
  Dim j As Integer
  check=False
  For j=1To n-1
  If m=a（j） Then
  check=True
  Exit For
  End If
  Next j
  End Function
  Private Sub Command2_Click （　　）
  End
  End Sub
  組卷：0引用：1難度：0.5

  解析

【加試題】

• 17．某農(nóng)科所研究不同品種生豬產(chǎn)肉量比，數(shù)據(jù)利用Visual Basic 進行數(shù)據(jù)處理，生豬的品種編號、產(chǎn)肉比等數(shù)據(jù)存儲在某數(shù)據(jù)庫文件中，程序運行界面如下：
  
  程序運行后，在列表框List1中顯示生豬品種編號以及對應(yīng)的產(chǎn)肉比，單擊“排序”按鈕（Command1）后，在列表框List2中顯示以產(chǎn)肉比的高低，進行降序排列后的生豬品種編號以及對應(yīng)的產(chǎn)肉比；單擊“查找”按鈕（Command2）后，在列表框List3中顯示產(chǎn)肉比相同的品種編號。
  請在橫線處填入合適的代碼。
  Dim conn As New ADODB．Connection
  Dim cmd As New ADODB．Command
  Dim rs As New ADODB．Recordset
  Dim NO（1To 20）As String‘品種編號
  Dim Crb（1To 20）As Single‘產(chǎn)肉比
  Dim n As Integer
  Private Sub Command1_Click （　?。?br />Dim i As Integer,j As Integer,t1As String,t2As Single
  For i=1To 19
      For j=20To i+1Step-1
  If①

   

   Then
  t1=NO（j）：NO（j）=NO（j-1）：NO（j-1）=t1
  t2=Crb（j）：Crb（j）=Crb（j-1）：Crb（j-1）=t2
  End If
  Next j
  Next i
  List2．Clear
  For i=1To 20
  List2．AddItem NO（i） &““& Str（Crb（i））
  Next i
  End Sub
  Private Sub Command2_Click （　　）
  Dim s As String,k As Integer,flag As Boolean
  For i=1To 19
  s=““
      k=i
  s=②

   

  
  flag=False
      For j=i+1To 20
  If ③

   

   Then
  s=s+“和“+NO（j）
  flag=True
  End If
  Next j
  If flag=True Then List3．AddItem s
  Next i
  End Sub
  Private Sub Form_Load （　?。?br />conn.ConnectionString=“Provider=microsoft.ACE．OLEDB.12.0；Data Source=“+App.Path+“\szcrb.jye.ai“
  conn.Open
  strsql=“select*from crb“
  Set rs.ActiveConnection=conn
  本過程其他代碼略
  End Sub
  組卷：3引用：1難度：0.5

  解析