为了安排寝室，需要将学生按性别分类。小陈设计了一个VB程序，运行该程序，单击“数据导入”按钮Command1后，左侧列表框List1中显示40位学生的编号和性别；然后单击“数据处理”按钮Command2，中间列表框List2中显示所有女生的信息，右侧列表框List3中显示所有男生的信息，并在相应的列表框下方显示人数。运行结果如下图所示。

实现上述功能的VB程序段如下，分析回答下列问题。
Dim a(1 To 40) As String  '数组a用于存储学生编号
Dim b(1 To 40) As String   '数组b用于存储学生性别
Private Sub Command1_Click
Dim i As Integer
List1.Clear
List2.Clear
List3.Clear
'在列表框List1中显示40位学生的编号和性别
For i＝1 To 40
.AddItem a(i)＋” ”＋b(i) ①
Next i
End Sub
Private Sub Command2_Click
Dim n As Integer   '用于存储女生人数
Dim m As Integer   '用于存储男生人数
Dim i As Integer
List2.Clear
List3.Clear
n＝0: m＝0
For i＝1 To 40
If  b(i)＝”女”  Then
List2.AddItem a(i)    '在列表框List2中显示女生信息
n＝n＋1
Else
List3.AddItem a(i)    '在列表框List3中显示男生信息

②
End If
Next i
Label1.Caption＝”女生人数：”＋Str(n)
Label2.Caption＝”男生人数：”＋Str(m)
End Sub
(1)小陈将学生的编号和性别分别存放在数组a和数组b中，这段代码书写在窗体的加载事件中，下列属于该事件的是（____）

A．Form_Click	B．Command1_Click
C．Form_Load	D．Form_Unload

(2)①和②加边框处分别有误，根据题意修改源代码，①处应修改为________，②处应修改为__________

（加试题）一个简单的四则混合运算式子（算式中只包含整数、+、-、*、/、=）的运算规则是先进行“*”或“/”，再进行“+”或“-”，下列是用 VB编写的简单四则混合运算的程序，运行程序时在文本框 Text1 中输入四则运算式子，单击命令按钮 Command1，在标签Label1 中输出结果。程序界面及代码如下。请回答以下问题。
(1) 若在文本框 Text1 中输入式子“12*5-32/4+20=”，则运行程序后在标签 Label1 中显示的内容是_________。

(2) 请在划线①②③处填入合适的代码，让程序能实现计算功能。
Private Sub Command1Click
Dim a(1 To 100) As Single, b(0 To 100) As String
Dim s As String, c As String   
Dim sz As Integer, i As Integer, k As Integer
s = Text1.Text:k = 0
For i = 1 To Len(s)

c = Mid(s, i, 1)

If c >= "0" And c <= "9" Then

sz = 0
Do While c >= "0" And c <= "9"
sz= ①________
i = i + 1
c = Mid(s, i, 1)
Loop
k = k + 1: a(k) = sz: b(k) = c
End If
Do While k > 1 And ②________
If b(k - 1) = "+" Then a(k - 1) = a(k - 1) + a(k)
If b(k - 1) = "-" Then a(k - 1) = a(k - 1) - a(k)
If b(k - 1) = "*" Then a(k - 1) = a(k - 1) * a(k)
If b(k - 1) = "/" Then a(k - 1) = a(k - 1) / a(k)
b(k-1) = b(k)
k = k - 1
Loop
Next i
Label1.Caption = "运算的结果是：" + Str(a(1))
End Sub
Function yxj(x As String) As Integer

If x = "*" Or x = "/" Then

yxj = 1

ElseIf x = "+" Or x = "-" Then

yxj = 2

Else

 ③________

End If

End Function

小杨同学编写了一个VB程序用于学校里7选3选课情况统计。该程序主要功能有：1．点击“生成选课组合”按钮 Commandl，生成35种选课组合；2．点击“统计选课情况”按钮 Command2，统计出各种组合的选课人数；运行界面如下图。实现上述功能的VB程序如下，请回答下列问题：

（1）分析程序代码，如图里“选课组合”序号为30的组合名称为：___________________。
（2）请在划线处填入合适的代码。请回答下列问题：
Dim zh(1 To 16) As String, zrs As Integer
Dim xk(1 To1000) As String'存放同学的选课科目组合，已知学生人数少于1000人
Dim zh2(1 To 35) As String'存放35种选课科目组合
Dim rstj(1 To 35) As Integer'存放各种选课组合选课人数
Private Sub Form_ Load()
‘本过程从数据库中读取学生的选课情况数据，存放在数组xk中，学生的总人数存放在变量zrs。’代码略
End Sub
Private Sub Command l_ Click( )
Dim i As Integer,j As Integer, m As Integer, n As Integer, k As Integer
Dim km(1 To 7)As String
Listl.Clear
List1. AddIton“序号”+“” +“组合名称”
km(1)= “物”:km(2)= “化”:km(3)= “生”km(4)= “政”
km(5)= “史”km(6)= “地”:km(7)= “技”
m= 1
For i= 1 To 5
For k= i+1 To 6

zh(m)=km(i)+ km(k)

m= m+ 1

Next k
Next i
j= 3:n= 1:y= j
For i= 1 To m

For k= y To 7

zh2(n)=___________________________________
If n< = 9 Then
Listl. AddItem n &""&" "& zh2(n)
Else
Listl. AddItem n &"  "& zh2(n)
End If
n= n+ 1

Next k

y= y+ 1

If y=8 Then

j= ___________________________  :y= j

    End If
Next i
End sub
Private Sub Command2_ Click( )
Dim i As Integer

List2. Clear

List2. Additon"组合名称"+""+"选课人数”

For i= 1 To 35

rstj(i)=_____________________________

List2 AddItem zh2(i)+" "+ Str (rstj (i))
Next i
End Sub
Function tj (zhmc As String) As Integer'统计某种选课组合的选课人数
Dim i As Integer, rs As Integer
rs= 0
For i= I To zrs

If zhmc = xk(i) Then

rs= rs+ 1

End If

Next i
tj= rs
End Function

VB标准函数RND的作用是返回一个大于等于0且小于1的随机数。只能产生大于等于100且小于200随机 整数的VB表达式是 （ ）

A．Int(Rnd*100)	B．Int(Rnd*101+100)
C．Int(Rnd*99+100)	D．Int(Rnd*100+100)

关于枚举算法的说法错误的是(   )

A．一般是通过循环中嵌套分支结构来实现的。

B．循环结构用来“枚举”，分支结构用于“检验”。

C．列举所有可能解的范围时，可以扩大但不能缩小，以防漏解。

D．采用枚举法时，也可能找不到符合条件的解。