2016年浙江省普通高校高考信息技術(shù)模擬試卷（2）

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

• 1．二維碼掃描是指通過智能手機(jī)客戶端應(yīng)用軟件獲取二維碼圖片中的內(nèi)容和信息．小汪正在使用新浪微博手機(jī)客戶端掃描二維碼，如圖所示．掃描二維碼這個(gè)過程體現(xiàn)了（　?。?/h2>

  A．虛擬現(xiàn)實(shí)	B．人工智能
  C．基于內(nèi)容的檢索	D．光學(xué)字符識別
  組卷：6引用：1難度：0.9

  解析

• 2．在WORD中輸入文字“123高三＜6＞班加油！”，自動(dòng)更正的屬性面板如圖所示則最終顯示的文字內(nèi)容為（　?。?/h2>

  A．123高三＜6＞班加油！	B．123高三＜6＞班123
  C．高三＜6＞班加油！	D．加油！高三＜6＞班加油！
  組卷：3引用：1難度：0.9

  解析

• 3．小黃最近在信息技術(shù)課堂中學(xué)習(xí)了ASCII碼，知道了字母“a”的ASCII碼為61H，好學(xué)的他想知道自己姓的首字母“H”在計(jì)算機(jī)中存儲時(shí)的二進(jìn)制代碼為（　　）

  A．41H

  B．1001000B

  C．48H

  D．01001000B
  組卷：3引用：1難度：0.9

  解析

• 4．使用ACCESS軟件創(chuàng)建的“圖書銷售”數(shù)據(jù)表，如圖所示．
  則圖中“”按鈕的作用是（　?。?/h2>

  A．查看上一條記錄	B．查看下一條記錄
  C．查看最后一條記錄	D．插入一條新的記錄
  組卷：4引用：1難度：0.7

  解析

• 5．下列軟件中，屬于電子郵箱管理軟件的是（　?。?/h2>

  A．Outlook Express	B．Access
  C．WinHex	D．UltraEdit
  組卷：5引用：1難度：0.7

  解析

二、非選擇題（本大題共5小題，其中第13小題4分，第14小題5分，第15小題8分，第16小題4分，第17小題5分，共26分）

• 16．小明想用VB編程制作一個(gè)名次計(jì)算器，首先將同學(xué)的成績錄入到計(jì)算機(jī)中，同時(shí)存放在數(shù)組a中，顯示在左邊列表框中．點(diǎn)擊“排序”按鈕后，程序會(huì)將成績從高到低依次排序顯示在右邊的列表框中．運(yùn)行界面如圖所示，請?jiān)趦蓚€(gè)橫線處填入代碼．
  Dim a（1To 100）As Single
  Dim shu As Integer
  Private Sub Command1_Click
  Dim i,j,k As Integer
  Dim t As Single
  For i=1To shu-1
  k=i
  For j=i+1 To shu
  If ①

   

  Then
  t=a（j）：a（j）=a（k）：a（k）=t
  End If
  Next j
  Next i
  For i=1 To shu
  List2．AddItem“第“& Str（i） &“名：“& Str（a（i））
  Next i
  End Sub
  Private Sub Text1_KeyPress（KeyAscii As Integer）
  Dim cj As Single
  If KeyAscii=13Then
  cj=Val（Text1．Text）
  If cj＞0Then
  ②

   

  
  List1．AddItem Str（shu） &“：“& Str（cj）
  a（shu）=cj
  End If
  Text1．Text=““
  End If
  End Sub.
  組卷：9引用：2難度：0.1

  解析

• 17．小王模擬超市收銀機(jī)掃描商品條形碼后計(jì)算總價(jià)的過程制作了一個(gè)VB程序．功能如下：在文本框Text1中輸入商品條形碼，按回車鍵后會(huì)將已經(jīng)輸入的條形碼顯示在列表框List1中，同時(shí)將商品明細(xì)顯示在列表框List2中．點(diǎn)擊按鈕“計(jì)算商品總價(jià)”后，會(huì)將所有商品的總價(jià)顯示在文本框Text2中．程序界面如圖所示：
  
  實(shí)現(xiàn)上述功能的部分VB程序如下，請?jiān)谌齻€(gè)橫線處填入合適代碼．
  '定義全局?jǐn)?shù)組變量
  Dim a（1To 10）As Long
  Dim b（1To 10）As String
  '自動(dòng)加載條形碼信息以及對應(yīng)的商品信息
  Private Sub Form_Load
  Dim i As Integer
  a（1）=503741
  For i=2To 10
  a（i）=a（i-1）+1
  Next i
  b（1）=“可樂 5.00“
  b（2）=“薯片 7.50“
  b（3）=“牛奶 5.60“
  b（4）=“橙汁 7.50“
  b（5）=“面包 4.00“
  b（6）=“蜂蜜 28.00“
  b（7）=“蛋糕 12.00“
  b（8）=“綠箭 3.50“
  b（9）=“餅干 6.00“
  b（10）=“雪碧 5.00“
  End Sub
  '輸入條形碼，查找條形碼，并顯示條形碼及其對應(yīng)的商品信息
  Private Sub Text1_KeyPress（KeyAscii As Integer）
  Dim txm As Long：
  Dim i As Integer：
  Dim j As Integer
  txm=Val（Text1．Text）
  If KeyAscii=13Then
  If txm＞=503741And txm＜=503750Then
  List1．AddItem txm
  Text1．Text=““
  i=1：j=10
  Do While i＜=j
  ①

   

  
  If txm=a（m） Then
  List2．AddItem b（m）
  Exit Do
  ElseIf txm＞a（m） Then
  i=m+1
  Else
  ②

   

  
  End If
  Loop
  Else
  MsgBox“條形碼輸入錯(cuò)誤，無此商品“
  Text1．Text=““
  End If
  End If
  End Sub
  '計(jì)算所購商品的總額
  Private Sub Command1_Click
  Dim i As Integer,mx As String,jg As String,sum As Single
  For i=0To 9
  If List2．List（i）＜＞““Then
  mx=List2．List（i）
  sum=sum+Mid（mx,4）
  End If
  Next i
  Text2．Text=③

   

  
  End Sub.
  組卷：23引用：1難度：0.1

  解析