使用枚举法解决问题，在列举问题的可能解的过程中（    ）

A．可以遗漏，但不应重复

B．不能遗漏，也不应重复。

C．可以重复，但不应遗漏。

D．可以遗漏，也可以重复。

有如下Visual Basic 程序段：
s = 0
For i =___1___To 5
s =" s" + 3
Next i
该程序段运行后，变量s的值是（   ）。

A．10

B．15

C．20

D．25

编写一段程序求1Í2Í3Í……Í100的值，程序代码如下：
Private Sub Command1_Click()
Dim i As Integer, t As Integer
t = 1
For i =" 1" To 100
    ①    
Next i
Text1.Text = Str(t)
End Sub
（1）  请补充①处的代码___________________。
（2）  运行此程序，单击Command1按钮，出现对话框如图所示：

请分析出现该错误的原因__________，如何修改可以解决此问题_______________________。

（加试题）有如下程序段：

For i = 2 To 6

For j = 1 To i - 1
If a(j) <= a(i) And d(j) >= d(i)  Then
d(i) =d(j)+1 : pre(i) = j
End If
Next j

Next i

max = 0 : k = 0

For i = 1 To 6

If  d(i)>max  Then max = d(i) : k = i

Next i

Do While k <> 0

st = a(k) & ,& st
k=pre(k)

Loop

Text1.Text = Mid(st, 1, Len(st) - 1)

数组元素a(1)到a(6)的值依次为“2,6,5,9,8,8”，数组d各元素的值初始化为1，数组pre各元素的值初始化为0，经过该程序段“加工”后，Text1中的值是(    )

A．2,5,9

B．2,6,8,8

C．2,5,8,8

D．2,5,6,8,8,9

下图所示的流程图实现的功能是求三角形的面积，回答以下问题：（共12分）
（1）判断①条件为? （2分）
（2）②处应填入的VB表达式是？（2分）
（3）③处应填入的VB表达式是？（2分）
（4）④处应填入的内容？（2分）
（5）⑤处应填入的内容？（2分）
（6）该算法采用的结构是？（2分）