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

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

• 1．小葉利用手機(jī)12306軟件網(wǎng)上購買火車票，部分界面如圖所示，從圖中可以獲取到的正確信息是（　　） 
  

  A．購買的是G584次列車，發(fā)車時間2016年3月10日，上車地點(diǎn)為杭州東車站

  B．若想要購票成功，必須提供正確的身份證號碼和正確點(diǎn)擊“游艇”“噴泉”的圖片

  C．該票的乘車區(qū)間是武漢至寧波，運(yùn)行時長大約4小時55分鐘

  D．該票是一張成人二等票，價格是395.5元，是一名身份證尾號為2134的乘客購買的
  組卷：10引用：1難度：0.9

  解析

• 2．小敏查看了某購物網(wǎng)站賣家的信用評價等信息，其部分頁面如圖所示，圖中好評率“99.19%”代表的含義是（　　）

  A．個人推薦	B．專家評價
  C．統(tǒng)計評價	D．核心期刊評價
  組卷：8引用：4難度：0.9

  解析

• 3．如圖所示，由圖a得到圖b,采用的操作是（　　）
  

  A．旋轉(zhuǎn)、透視	B．裁剪、旋轉(zhuǎn)
  C．裁剪、水平翻轉(zhuǎn)	D．裁剪、垂直翻轉(zhuǎn)
  組卷：6引用：1難度：0.9

  解析

• 4．字符“A”比“a”的ASCII碼值小32（十進(jìn)制），已知字符“K”的二進(jìn)制為1001011，則字符“k”的二進(jìn)制ASCII碼值是（　　）

  A．111011

  B．1101011

  C．110101

  D．1011011
  組卷：16引用：6難度：0.7

  解析

• 5．如圖所示是一個使用Access軟件創(chuàng)建的數(shù)據(jù)表，該表記錄了部分教材的情況．
  
  下列說法正確的是（　　）

  A．書號、價格為數(shù)字型

  B．編號為自動編號型，書號為數(shù)字型

  C．書號為文本型，價格為貨幣型

  D．書號為文本型，價格為數(shù)字型
  組卷：9引用：2難度：0.5

  解析

四、解答題（共2小題，滿分13分）

• 16．有序序列合并．
  將兩個不下降有序序列合并為一個不下降有序序列．下面程序模擬該功能，程序界面如圖所示，單擊“生成序列一”按鈕Command1生成10個有序數(shù)字，并在List1中顯示，單擊“生成序列二”按鈕Command2生成10個有序數(shù)字，并在List2中顯示，單擊“序列合并”按鈕Command3，將兩組數(shù)據(jù)進(jìn)行合并，并在List3中顯示．
  序列一中的數(shù)據(jù)存儲在a數(shù)組中，序列二中的數(shù)據(jù)存儲在b數(shù)組中，合并后的數(shù)據(jù)存儲在c數(shù)組中．
  實(shí)現(xiàn)上述功能的VB代碼如下，但加框處代碼有錯，請改正．
  Dim a（1To 10）As Integer
  Dim b（1To 10）As Integer
  Dim c（1To 20）As Integer
  Private Sub Command1_Click

   

  
  '生成10個不下降有序數(shù)字，存儲在a（1）到a（10）中，并在List1中顯示
  '代碼略
  End Sub
  Private Sub Command2_Click

   

  
  '生成10個不下降有序數(shù)字，存儲在b（1）到b（10）中，并在List2中顯示
  '代碼略
  End Sub
  Private Sub Command3_Click

   

  '將數(shù)a組和b數(shù)組合并，存儲在c數(shù)組中
  Dim i As Integer,j As Integer,k As Integer
  i=1'變量i表示a數(shù)組中第1個未處理的數(shù)
  j=1'變量j表示b數(shù)組中第1個未處理的數(shù)
  t=0'變量t表示c數(shù)組中已加入的數(shù)的個數(shù)
  Do While'第（1）處錯誤
  t=t+1
  If a（i）＜b（j）Then
  c（t）=a（i）
  i=i+1
  Else
  c（t）=b（j）
  j=j+1
  End If
  Loop
  
  If i＜=10Then
  For k=i To 10
  t=t+1
  '第（2）處錯誤
  Next k
  End If
  If j＜=10Then
  For k=j To 10
  t=t+1
  c（t）=b（k）
  Next k
  End If
  List3．Clear
  For i=1To 20
  List3．AddItem（Str（c（i）））
  Next i
  End Sub.
  組卷：11引用：1難度：0.1

  解析

• 17．小明想用VB編程制作一個名次計算器，首先將同學(xué)的成績錄入到計算機(jī)中，同時存放在數(shù)組a中，顯示在左邊列表框中．點(diǎn)擊“排序”按鈕后，程序會將成績從高到低依次排序顯示在右邊的列表框中．運(yùn)行界面如圖所示，請在兩個橫線處填入代碼．
  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

  解析