下列程序的功能是：当用户点击窗体下方的“石头”（command1）、“剪子”（command2）、“布”（command3）任意一个按钮的时候，电脑也会在Label1上随机显示出一个石头、剪刀、布（显示在label1上），程序判断出胜负（平局算负）将结果显示到label3上。

Private Sub Command1_Click()
Label1.Caption = sj ‘计算机随机产生一个值
Label2.Caption = Command1.Caption
If cp(Label1.Caption, Label2.Caption) Then ‘判断胜负
①     = "乙方负"
Else
Label3.Caption = "乙方胜"
End If
End Sub
Function sj() As String '随机生成石头、剪刀、布
i = ②   ‘随机生成1~3任一整数
If i = 1 Then sj = "石头"
If i = 2 Then sj = "剪刀"
If i = 3 Then sj = "布"
End Function
①____________②_________________

下列VB程序运行时，在文本框Text1中输入2，单击命令按钮Command1后，文本框Text2的内容是________。
Private Sub Command1_Click()
Dim t As Single, h1 As Single, h2 As Single
Const g = 9.8
t = Val(Text1.Text)
h1 = (g * t ^ 2) / 2
h2 = Int(h1)
Text2.Text = Str(h2)
End Sub

某VB程序段代码如下：
Private Sub Command1_Click()
Dim data(1 To 100) As Integer
For i = 1 To 100
data(i) = Int(Rnd * 1000)
Next
num = Val(Text1.Text)
For i = 1 To 100
If data(i) = num Then Exit For
Next
If i <= 100 Then
MsgBox "找到该数，是第" & i & "个数"
Else
MsgBox "该数不在数组中"
End If
End Sub
方框中的程序算法是：

A．二分查找

B．冒泡排序

C．递归算法

D．顺序查找

有一组数，依次为3、2、8、5、9，若采用选择排序算法对其进行从大到小排序，其中排序方向为从前向后，则第二趟的排序结果是:

A．9  2  8  5  3

B．9  5  8  2  3

C．9  8  2  5  3

D．9  2  8  3  5

下列程序的功能是对某校2011年3月份技术高考成绩进行排名分析，数组a中保存学生技术考试的成绩，数组b中保存学生的姓名，第i个学生的技术成绩保存在a(i)中，对应的学生姓名保存在b(i)中，最后按技术成绩从高到低进行排序。程序界面如图所示，左边列表框List1中显示的是所有学生到的原始数据，单击"排序"按钮（Command1）后，在右边的列表框List2中显示排序完成后的结果（按成绩从高到低排列）。

（1）虚线内程序段所采用的排序算法名称是 。
（2）程序加框处代码有错，请改正。

在VB语句dim s(9) as integer中，数组s的变量个数和类型是：

A．9 整型

B．10 整型

C．9 单精度型

D．10 单精度型

VB语句Text1.text="浙江省"用于在文本框中显示文字“浙江省”，该语句中的"text"是：

A．类名

B．对象名

C．属性名

D．属性值

在Visual Basic中使用”Caption”属性显示文字的控件类是 ( )

A．Label（标签）

B．TextBox（文本框）

C．shape（形状）

D．ListBox（列表框）

将数学表达式写成VB表达式，正确的是：

A．	B．
C．x^2<=y+z	D．x^2≤y+z

For i= 1 To 6
a(i)=i+1
Next i
程序运行后，变量i的值是：

A．7

B．6

C．1

D．0