2011年浙江省高中信息技术会考试卷（11）

一、选择题（共7小题，每小题3分，满分21分）

• 1．在Visual Basic中，用变量code存储学生的借阅卡编码（如“CH20130036”），则变量code的数据类型应说明为（　　）

  A．Integer

  B．Single

  C．String

  D．Date
  组卷：6引用：5难度：0.9

  解析

• 2．将数学表达式a≤b≤c写成Visual Basic表达式，正确的是（　　）

  A．a＜=b＜=c	B．a＜=b Or b＜=c
  C．a＜=b And b＜=c	D．a＜=b Not b＜=c
  组卷：3引用：3难度：0.9

  解析

• 3．在Visual Basic中，表达式Len（“-100“）+100的值是（　　）

  A．0

  B．104

  C．200

  D．-100100
  组卷：1引用：2难度：0.7

  解析

二、填空题（共3小题，每小题3分，满分9分）

• 10．郑均收集了某公司生猪生长各阶段的产肉比数据，他设计了如下Visual Basic程序进行数据处理．程序运行界面如图所示，左边列表框List1中显示生猪生长的各阶段编号及对应的产肉比，单击“排序”按钮Command1后，右边的列表框List2中显示按产肉比从高到低排序后的数据．所收集到的不同生长阶段编号和对应的产肉比数据已分别保存在数组a和数组b中．
  
  排序部分程序如下：
  Dim a（1To 10）As String′数组a用于存储阶段编号
  Dim b（1To 10）As Single′数组b用于存储产肉比
  Private Sub Command1_-Click （　　）
  Dim i As Integer,j As Integer,k As Integer,t As Single,s As String
  For i=1To 9
  k=i
  For j=i+1To 10
  If ① Then k=j
  Next j
  If k＜＞i Then
  s=a（i）：a（i）=a（k）：a（k）=s
  t=b（i）：②：b（k）=t
  End If
  Next i
  For i=1To 10
  List2．AddItem a（i）+””+Str（b（i））
  Next i
  End Sub
  Private Sub Form Load （　　）′此过程用于对数组a和数组b进行赋值，并显示在List1中，代码略
  End Sub
  （1）解决此问题采用的算法是

   

  ．（填“选择排序”或“冒泡排序”）
  （2）在程序①和②画线处填入适当的语句或表达式，将程序补充完整：
  程序中①画线处应填入

   

  ．
  程序中②画线处应填入

   

  ．
  组卷：20引用：3难度：0.1

  解析

三、解答题（共1小题，满分0分）

• 11．打开考生文件夹下“VB”文件夹中的“test.jye.ai”，该VB程序的功能是：单击“开始”按钮Command1，小熊开始“滑冰”；单击“停止”按钮Command2，“滑冰”动作停止；单击“退出”按钮Command3，结束并退出程序。程序运行界面如图所示：
  完成以下操作：
  （1）将命令按钮Command1的Caption属性值设置为“开始”；
  （2）为“停止”按钮Command2添加Click事件过程，并将“VB”文件夹下“code.jye.ai”文件中的所有代码复制到该事件过程中。调试程序正确，并保存窗体文件test。frm和工程文件test。vbp。
  组卷：0引用：1难度：0.9

  解析