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

一、选题题（算法）

• 1．在Visual Basic中，表达式9Mod 4 的值是（　　）

  A．-1

  B．1

  C．-2

  D．-2.25
  组卷：1引用：1难度：0.9

  解析

• 2．在Visual Basic代码编辑窗口中，将窗体Form1的Caption属性值设置为“时钟”，正确的代码是（　　）

  A．Form1．Caption”时钟”

  B．Form1．Caption（”时钟”）

  C．Caption（时钟）

  D．Form1．Caption=”时钟”
  组卷：6引用：2难度：0.9

  解析

• 3．在Visual Basic中，表示鼠标单击的事件名是（　　）

  A．Load

  B．Click

  C．DblClick

  D．KeyPress
  组卷：1引用：1难度：0.5

  解析

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

• 9．张强喜欢研究汽车，他编写了一个模拟选汽车牌照号码的Visual Basic程序。程序运行界面如图所示，单击“开始”按钮Command1后，随机产生6个汽车牌照号码，并按序显示在列表框List1中，单击其中的一个号码后，该号码显示在文本框Text1中。每个号码的后5位是从0-9、A-Z的36个字符中随机产生。
  程序代码如下：
  Private Sub Command1_Click （　　）
  Dim p（1To 6）As String'数组p用于存储6个车牌号码
  Dim i As Integer,j As Integer,t As Integer
  Dim c As String,s As String
  Randomize'初始化随机数种子
  List1．Clear'清除列表框List1中的内容
  '随机产生6个5位号码
  For i=1To 6
  s=““
  For j=1To 5
  t=Int（Rnd

   

  *36）'产生一个0到35的随机整数
  If t＜=9Then
  c=Chr（t+48）'将t转换为相应的字符后赋值给c
  Else
  c=Chr（t-10+65）'将t转换为对应的英文大写字母后赋值给c
  End If
  s=

   

  
  Next j
  p（i）=s
  Next i
  '对数组中的5位车牌号码按字符串先后顺序进行排序
  For i=1To 5
  For j=1To 6-i
  If p（j）＞p（j+1）Then
  s=p（j+1）：p（j+1）=p（j）：p（j）=s
  End If
  Next j
  Next i
  '在6个随机号码前添加“浙A”
  For i=1To 6
  p（i）=“浙A“+p（i）
  List1．AddItem

   

  
  Next i
  End Sub
  '将选中的号码显示在文本框中
  Private Sub List1_Click （　　）
  Text1．Text=List1．List（List1．ListIndex）
  End Sub
  （1）对候选字符串进行排序时主要采用的算法是

   

  。（填：冒泡排序/选择排序）
  （2）在程序①和②横线处，填入适当的语句或表达式，把程序补充完整：
  程序中①横线处应填入

   

  。
  程序中②横线处应填入

   

  。
  组卷：1引用：1难度：0.1

  解析

三、操作题

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

  解析