2011年浙江省高中信息技術(shù)會(huì)考試卷（16）

一、選題題（算法）

• 1．在Visual Basic中，下列能作為變量名的是（　?。?/h2>

  A．5a

  B．If

  C．Abs

  D．Tea
  組卷：8引用：4難度：0.9

  解析

• 2．在Visual Basic中，若需將150位員工工號(hào)（如“B01036”）分別存儲(chǔ)在數(shù)組n的n（1）～n（150）元素中，則下列說(shuō)明語(yǔ)句最合適的是（　?。?/h2>

  A．Dim n（1 To 150）As Single

  B．Dim n（1 To 150）As String

  C．Dim n（1 To 150）As Integer

  D．Dim n（1 To 150）As Boolean
  組卷：18引用：3難度：0.9

  解析

• 3．下列Visual Basic表達(dá)式中，只能產(chǎn)生[0，8）中的隨機(jī)實(shí)數(shù)的是（　?。?/h2>

  A．Rnd（　　）*8	B．Rnd（　?。?9
  C．Int（Rnd（　?。?8）+1	D．Int（Rnd（　　）*9）+1
  組卷：3引用：1難度：0.7

  解析

二、填空部分

• 9．鄭強(qiáng)收集了某月部分品牌電腦在某城市的銷(xiāo)售量，并設(shè)計(jì)了一個(gè)Visual Basic排序程序。程序運(yùn)行界面如圖所示，左邊列表框List1中顯示排序前數(shù)據(jù)，單擊“排序”按鈕Command1，在右邊列表框List2中顯示按銷(xiāo)售量從高到低排序后的結(jié)果。程序中數(shù)組a和數(shù)組b分別存儲(chǔ)品牌名稱(chēng)和對(duì)應(yīng)的銷(xiāo)售量。
  
  程序代碼如下：
  Const n As Integer=10'n為品牌數(shù)
  Dim a（1To n） As String'數(shù)組a用于存儲(chǔ)品牌名稱(chēng)
  Dim b（1To n） As Integer'數(shù)組b用于存儲(chǔ)銷(xiāo)售量
  Private Sub Command1_Click （　?。?br />Dim i As Integer,j As Integer,c As Integer,t As String
  For i=1To

   

  
  For j=1To n-i
  If

   

  Then
  c=b（j+1）：b（j+1）=b（j）：b（j）=c
  t=a（j+1）：a（j+1）=a（j）：a（j）=t
  End If
  Next j
  Next i
  For i=1To n
  List2．AddItem a（i）+““+Str（b（i））
  Next i
  End Sub
  Private Sub Form_Load

   

  
  '此過(guò)程用于對(duì)數(shù)組a和數(shù)組b進(jìn)行賦初值，并顯示在List1中，代碼略
  End Sub
  （1）解決此問(wèn)題采用的算法是

   

  。（填：選擇排序/冒泡排序）
  （2）在程序①和②橫線處填入適當(dāng)?shù)恼Z(yǔ)句或表達(dá)式，將程序補(bǔ)充完整：
  程序中①橫線處應(yīng)填入

   

  。
  程序中②橫線處應(yīng)填入

   

  。
  組卷：0引用：1難度：0.1

  解析

三、操作題

• 10．打開(kāi)考生文件夾下“VB”文件夾中的“test.jye.ai”，該VB程序的功能是：運(yùn)行程序，出現(xiàn)“奔跑”畫(huà)面；單擊“加速”按鈕Command1，奔跑速度加快；單擊“停止”按鈕Command2，奔跑停止；單擊“結(jié)束”按鈕Command3，退出程序。程序運(yùn)行界面如圖所示：
  完成以下操作：
  （1）將命令按鈕Command1的Caption屬性值設(shè)置為“加速”；
  （2）為“停止”按鈕Command2添加Click事件過(guò)程，并將“VB”文件夾下“code.jye.ai”文件中的所有代碼復(fù)制到該過(guò)程中。調(diào)試程序正確，并保存窗體文件test。frm和工程文件test。vbp。
  組卷：0引用：2難度：0.9

  解析