2017-2018學年浙江省嘉興市七校高二（下）期中信息技術試卷

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

• 1．下列關于信息與信息技術的說法，下列說法不正確的是（　?。?/h2>

  A．短信詐騙體現(xiàn)了信息具有真?zhèn)涡?/label>

  B．典型的近代信息技術有攝影技術、廣播和電視技術等

  C．計算機加工處理音頻信息，本質上是通過計算來完成的

  D．信息表達的數字化就是表達信息時要遵循一定的標準，以利于信息的交流
  組卷：2引用：1難度：0.8

  解析

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

  A．網頁文件是用HTTP語言來描述的

  B．網頁可能含有圖形圖象、動畫等素材，故不能用記事本編輯網頁

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

  D．將IE瀏覽器中將當前瀏覽的網頁添加到收藏夾，實質上是保存該網頁的URL
  組卷：8引用：2難度：0.6

  解析

• 3．使用Word軟件編輯文檔，部分界面如圖所示。下列說法正確的是（　?。?br />

  A．文中批注的用戶是S1

  B．刪除文中的“卜算子”，批注內容不會被刪除

  C．文中有4處修訂

  D．修訂前，第一行文字為“驛外斷橋邊，寂寞開無主。已是黃昏獨自愁，更著風和雨?！?/label>
  組卷：23引用：3難度：0.5

  解析

• 4．使用Access軟件打開數據庫，部分界面如下所示，下列說法正確的是（　　）

  A．當前數據庫至少包含9張數據表

  B．當前正處在“數據表視圖”界面，故不可以修改字段的數據類型

  C．已打開的數據表名稱是“學生”，共有23條記錄

  D．可以在當前記錄前，插入一條新記錄
  組卷：0引用：1難度：0.6

  解析

• 5．某算法的部分流程圖如圖所示，執(zhí)行這部分流程后，變量a的值是（　?。?br />

  A．4

  B．2

  C．1

  D．46
  組卷：2引用：2難度：0.7

  解析

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

• 16．編寫VB程序，實現(xiàn)如下功能：在文本框Text1中輸入自然數n,單擊“生成隨機數”命令按鈕Command1，則生成n個[1，100]區(qū)間內的整數，并顯示在列表框List1中，單擊“計算”按鈕Command2，標簽Label4中輸出最大數及該數在數列中的位置，標簽Label6中輸出最小數及該數在數列中的位置，運行效果如下圖所示，程序代碼如下，但加框處代碼有錯，請改正。
  
  Dim d（1 To 100）As Integer
  Dim n As Integer
  Private Sub Command1_Click （　?。?br />Dim i As Integer
  Randomize
  n=Val（Text1．Text）
  For i=1 To n
  
  List1．AddItem Str（d（i））
  Next i
  End Sub
  Private Sub Command2_Click（　　）
  Dim i As Integer,min As Integer,max As Integer
  Dim maxpos As Integer,minpos As Integer
  max=d（1）
  
  For i=2 To n
  If max＜d（i） Then max=d（i）：maxpos=i
  If min＞d（i） Then min=d（i）：minpos=i
  Next i
  Label4．Caption=Str（max）+“位置：“+Str（maxpos）
  Label6．Caption=Str（min）+“位置：“+Str（minpos）
  End Sub
  組卷：1引用：1難度：0.6

  解析

• 17．編寫VB應用程序，當用戶輸入的一串由字母、數字等字符組成的字符串，統(tǒng)計其中每個字母出現(xiàn)的次數（不分大小寫）．程序運行時界面如圖1所示．
  
  （1）設計應用程序界面時，為添加標簽對象“輸入字串：”，應使用圖2所示的“控件工具箱”中的

   

  （填寫相應編寫），并在圖3所示的“屬性窗口”中，將

   

  屬性設置為“輸入字串：”．
  
  （2）程序運行時，在Text1中輸入字符串，單擊“統(tǒng)計”按鈕，在List1中顯示統(tǒng)計結果．請在橫線處填入合適代碼．
  ‘函數IsLetter（x）功能，若x是字母，則返回值為字母x在字母序列“A”～“Z”中的序號，如字母“A”的序號為0，字母“D”的序號為3．若x不是字母，則返回值為-1．
  Function IsLetter（x As String） As Integer
  If“A“＜=x And x＜=“Z“Then
  IsLetter=Asc（x）-Asc（“A“）
  ElseIf“a“＜=x And x＜=“z“Then
  IsLetter=Asc（x）-Asc（“a“）
  Else
  

   

  
  End If
  End Function
  Private Sub Command1_Click

   

  
  Dim f（25）As Integer,m As Integer,n As Integer
  Dim s As String,c As String
  List1．Clear
  For m=0To 25‘初始化數組f
  f（m）=0
  Next m
  s=Text1．Text
  For m=1To Len（s）‘依次讀取字符串中的每個字符進行判斷
  c=Mid（s,m,1）
  n=IsLetter（c）
  If n＜＞-1Then f（n）=f（n）+1
  Next m
  For m=0To 25‘輸出統(tǒng)計結果，沒有出現(xiàn)的字母不輸出
  If

   

  Then
  List1．AddItem （Chr（m+Asc（“a“）） &“：“& f（m））
  End If
  Next m
  End Sub.
  組卷：11引用：4難度：0.1

  解析