2015年浙江省杭州市高考信息技術(shù)模擬試卷（9）

一、選擇題（共9小題，每小題2分，滿分18分）

• 1．微信“掃一掃”功能能夠掃描二維碼得到相關(guān)人員的名片或網(wǎng)站網(wǎng)址信息，該過程屬于（　　）

  A．信息采集

  B．信息編碼

  C．信息發(fā)布

  D．信息表達(dá)
  組卷：6引用：2難度：0.9

  解析

• 2．用UltraEdit軟件觀察“Yellow黃色”這幾個(gè)字符的內(nèi)碼，如圖所示：
  
  則“Zoo”這幾個(gè)字符的內(nèi)碼是（　　）

  A．60 4F 4F

  B．60 6F 6F

  C．5A 6F 6F

  D．5A 6F 4F
  組卷：6引用：2難度：0.9

  解析

• 3．某網(wǎng)店有評(píng)價(jià)如圖所示，則該評(píng)價(jià)屬于（　?。?br />

  A．個(gè)人推薦	B．統(tǒng)計(jì)評(píng)價(jià)
  C．專家評(píng)價(jià)	D．核心刊物評(píng)價(jià)
  組卷：6引用：2難度：0.9

  解析

• 4．使用Word編輯某文檔，部分界面如圖所示
  
  如果全部接受圖中所示的修訂內(nèi)容，則第一句中的文字將變?yōu)椋ā　。?/h2>

  A．紅外簡稱為IR，它是一種電磁波，波長范圍為760nm～1mm之間

  B．紅外線英文簡稱為IR，它是一種電磁波，波長范圍為760nm～1mm之間

  C．紅外簡稱是紅外線，它是一種電磁波，波長范圍為760nm～1mm之間

  D．紅外簡稱為IR，它是一種電磁波，紅外編碼的波長范圍為760nm～1mm之間
  組卷：7引用：2難度：0.9

  解析

• 5．某access數(shù)據(jù)庫打開后如圖所示，下列描述正確的是（　　）
  

  A．該數(shù)據(jù)庫文件名為“l(fā)og：數(shù)據(jù)庫”

  B．該數(shù)據(jù)庫里共有5張表

  C．表“connectionlog”是一張空表

  D．表“user_syfwrzb”只有2條記錄
  組卷：6引用：2難度：0.7

  解析

• 6．某算法流程圖如圖所示，該算法實(shí)現(xiàn)的功能為（　?。?br />

  A．交換x,y兩數(shù)的值	B．求x,y兩數(shù)最大值
  C．求x,y兩數(shù)最小值	D．以上都不對(duì)
  組卷：8引用：4難度：0.5

  解析

二、綜合題：共7分．

• 19．自冪數(shù)是指一個(gè) n 位數(shù)，它的每個(gè)位上的數(shù)字的 n 次冪之和等于它本身。使用枚舉法尋找5位數(shù)以內(nèi)的自冪數(shù)算法如下：
  （1）使用循環(huán)列出1到99999中的每一個(gè)數(shù)zmsknz
  （2）通過自定義函數(shù)ddknzms拆解得到每個(gè)數(shù)中的每位數(shù)上的數(shù)碼及它們對(duì)應(yīng)的n次冪之和
  （3）將zmsknz與ddknzms進(jìn)行比較，若相等則說明是自冪數(shù)，可將其加入列表。
  編寫VB程序，使用枚舉法得到5位數(shù)以內(nèi)的自冪數(shù)，程序設(shè)計(jì)界面如圖所示：
  請(qǐng)根據(jù)算法及相應(yīng)注釋將下面的程序補(bǔ)充完整：
  Function ddknzms（zmsknz As Long） As Long'得到可能的自冪數(shù)
  Dim zmsknz_str As String'字符串類型自冪數(shù)可能值
  Dim zmsknz_length As Integer,zmswsxh As Integer'字符串類型自冪數(shù)可能值字符個(gè)數(shù)
  zmsknz_str=Trim（Str（zmsknz））
  zmsknz_length=Len（zmsknz_str）
  For zmswsxh=1To zmsknz_length
  ddknzms=ddknzms+Val（Mid（zmsknz_str,zmswsxh,1））^①

   

  
  Next zmswsxh
  End Function
  Private Sub Command1_Click
  Const ZMSWS=
  Dim zmsknz As Long,zmsknz_zz As Long
  zmsknz_zz=10^ZMSWS-1
  For zmsknz=1To zmsknz_zz
  If  ②

   

  Then List1．AddItem （Str（zmsknz））
  Next zmsknz
  End Sub。
  組卷：8引用：1難度：0.1

  解析

• 20．某校學(xué)生會(huì)選舉需要從學(xué)校數(shù)據(jù)庫中隨機(jī)抽取若干名學(xué)生作為監(jiān)票人。該數(shù)據(jù)庫文件名為school。mdb,其中數(shù)據(jù)表student存儲(chǔ)有關(guān)學(xué)生學(xué)號(hào)（xuehao）、姓名（xingming）相關(guān)信息，括號(hào)內(nèi)的內(nèi)容為對(duì)應(yīng)字段名。該程序編輯界面如圖所示，相關(guān)對(duì)象名可參考標(biāo)識(shí)圖。
  cqxhxm
  xskcqxhxm
  當(dāng)主持人點(diǎn)擊按鈕“生成抽號(hào)”后，下方的標(biāo)簽會(huì)顯示可抽取的學(xué)號(hào)姓名，一定時(shí)間后顯示被抽取作為監(jiān)票人的學(xué)號(hào)姓名。
  cz
  cq
  'xxxss：學(xué)校學(xué)生數(shù)，kcq：可抽取
  'xhxm：學(xué)號(hào)姓名，kcq：可抽取
  Dim xxxss As Integer
  xhxmbq
  Dim xhxm（3000）As String
  Dim kcq（3000）As Boolean
  
  'cq_Click：啟用兩個(gè)定時(shí)器
  Private Sub cq_Click （　?。?br />cqxhxm.Enabled=True
  xskcqxhxm.Enabled=True
  End Sub
  
  Private Sub cz_Click'初始化數(shù)組kcq,使每個(gè)元素?cái)?shù)據(jù)都處于可顯示狀態(tài)
  For i=0To xxxss-1
  ①

   

  
  Next i
  End Sub
  
  Private Sub xskcqxhxm_Timer'若數(shù)組kcq第x個(gè)元素處于可抽取狀態(tài)，則顯示數(shù)組xhxm第x個(gè)元素
  x=Int（Rnd*xxxss）
  If kcq（x） Then xhxmbq.jye.ai=kcq（x）'②

   

  
  End Sub
  
  Private Sub Form_Load （　　）'從數(shù)據(jù)庫中提取需要的學(xué)號(hào)姓名相關(guān)數(shù)據(jù)并初始化數(shù)組kcq
  Randomize
  xxxss=0
  Dim conn As New ADODB．Connection,rs As New ADODB．Recordset
  Dim str_conn as String,str_sql As String
  str_conn=“driver=Microsoft access driver（*．mdb）；DBQ=“&app.jye.ai&“\school.jye.ai“；
  conn.jye.ai str_conn
  str_sql=“select*from students“
  rs.jye.ai str_sql
  Do While Not rs.eof
  xxxss=xxxss+1
  xhxm（xxxss）=rs.jye.ai（“xuehao“）&rs.jye.ai（“xingming“）
  rs.movenext
  Loop
  For i=0To xxxss-1
  kcq（i）=True
  Next i
  End Sub
  
  Private Sub cqxhxm_Timer'決定抽取的學(xué)號(hào)姓名作為監(jiān)票人
  xskcqxhxm.Enabled=False
  For i=0To xxxss-1
  If xhxmbq.Caption=xhxm（i） Then kcq（i）=False
  Next i
  cqxhxm.Enabled=False
  End Sub。
  組卷：3引用：1難度：0.1

  解析