由 n 行数字组成的数字三角形如图所示。设计一个算法，对于由 n 行数字组成的数字三角形（数字范围1，50，计算从三角形的顶至底的路径经过的数字和的最大值，每一步可以从当前点走到左下方的点也可以走到右下方的点。

寻求路径最大值的算法设计如下：
按三角形的行划分，若有n 行，则有n-1 个步骤
① 从底层开始，本身数即为最大值
② 倒数第二层的计算取决于底层的数据：
12+6=18,13+14=27,24+15=39,24+8=32；
③ 倒数第三层的计算取决于底二层的数据：
27+12=39,39+7=46,39+26=65；
④ 倒数第四层的计算取决于底三层的数据：
46+11=57,65+8=73；
⑤ 最后的路径：13—8—26—15—24   其和为 86。
根据上述算法描述，设计程序界面如下图所示，点击“生成金字塔”按钮，在列表框中生成数字金字塔，点击“寻求路径最大值”按钮，在文本框 text1 中输出最大值。

依据上述描述设计如下 VB 程序：
Const n = 5
Dim sx As String
Dim i, j, k, a(1 To 100) As Integer
Private Sub Command1_Click()
List1.Clear
For i = 1 To n
For j = 1 To i

__________

sx = sx + Str(a((i - 1) * n + j))

Next j

For k = n To i Step -1

 sx = " " + sx

Next k

List1.AddItem sx

sx = ""

Next i
End Sub
Private Sub Command2_Click()
For i = n To 1 Step -1
For j = 2 To i

If__________Then

a((i - 2) * n + j - 1) = a((i - 1) * n + j - 1) + a((i - 2) * n + j - 1)

Else

a((i - 2) * n + j - 1) = a((i - 1) * n + j) + a((i - 2) * n + j - 1)

End If

Next j

Next i
__________
End Sub
请回答下列问题：
(1)若数字金字塔如图   ，输出路径最大值是______________________。
(2)请在①②③划线处填入合适的代码。

现要求编写 VB 程序实现如下功能：在文本框 Textl 中输入正整数 n (n 为奇数），单击 “生成” 命令按钮后，如下图所示，在文本框 Text2 中会显示一个有规律的对称数字串，形式为"1 3 …n-2 n n-2 3 1" 。例如 n=9 时，显示的数字串为 “1 3 5 7 9 7 5 3 1”

（1）根据代码可知，命令按钮 “生成 ” 的对象名是______________ 。
（2）实现上述功能的 VB 程序如下。请在划线处填入合适代码。
Private Sub Com1 _Click()
Dim n As Integer, i As Integer, s As String
①__________
s = ""
For i = 1 To n
If   i<= n \2 + 1   Then
s = s + Str (2*i-1)
Else
s = s + ②__________ 
End If
Next  i
③__________
End Sub

小明编写一个模拟qq登录的VB程序。当输入用户名、密码和验证码，点击登录按钮后，会跳出信息框提示是否验证成功。部分程序与流程图如下所示：

uname = Text1.Text '输入用户名
psd = Text2.Text    '输入密码
vcode = Val(Text3.Text) '输入验证码
If vcode <> Val(Label3.Caption) Then
MsgBox “” ' Label3显示的是随机验证码
ElseIf uname <> "admin" Or psd <> "123456" Then
MsgBox “    ”
Else
MsgBox “    ”
方框中正确的语句是（ ）。

A．①中“验证成功”	B．②中“输出用户名或密码有误”
C．②中“验证成功	D．③中“输出验证码错误”

“杨辉三角”问题，如图所示，其规律如下：其显著特征是除斜边上的1以外，其余数值均等于其肩部两数之和。编写VB程序，其功能如下：在文本框Text1中输入20以内的整数，点击“打印”按钮，在列表框list1中输出杨辉三角，程序界面如图所示，VB程序代码如下。

实现上述功能的VB程序如下，请回答下列问题：
(1)代码“Private Sub Command1_Click()”中的Command1_Click()属于_________(单选，填字母：

A．对象名/

B．属性名/

C．事件名/

D．事件过程)。

(2)请在划线处填入合适的代码。
(3)若将加框处代码改为“1 To i”，则__________(选填：会/不会)影响程序结果。
Private Sub Command1_Click()
Dim a (20) As Long
Dim I As Integer，j As Integer，s As String
List1.Clear
n＝Val(Text1.Text)
a(1)＝1
List1.AddItem Str(a(1))
For i＝2 To n
s＝""
For j＝i To 1 Step－1
a(j)＝_____
s＝s＋Str(a(j))
Next j
_____
Next i
End Sub

为了丰富学生业余生活，学校举办校园歌手大赛，邀请了5位音乐老师作为评委打分，打分的上限是10分。统计选手得分时，去掉一个最高分，再去掉一个最低分，取评委打分的平均值作为选手的最终得分。程序运行结果界面如图所示。

请分析任务，完成下列题目。
程序代码如下：
Private Sub Command1_Click()
Dim s, As single
Dim Max , Min ,I As Integer
Dim a(5) As Integer
Max = 0
Min =    ①      
s = 0   
For i = 1 To 5
a(i) = InputBox("请输入第" & i & "个分数")
s = s + a(i)
If     ②   Then Max = a(i)  
If  Min > a(i) Then Min = a(i)   
Next i
s = ③  
Text1.Text = Max
Text2.Text = Min
Text3.Text = s
End Sub
Private Sub Command2_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
End Sub
Private Sub Command3_Click()
End
End Sub
请分析任务，完成下列题目。
【小题1】在界面设计阶段，下列能清空文本框中内容的属性是

A．name

B．text

C．font

D．value

【小题2】在界面设计阶段，当双击窗体上的“计算”命令时，所打开的窗口是

A．代码窗口

B．属性窗口

C．工具箱窗口

D．工程资源管理器窗口

【小题3】下列控件在本程序窗体中用到的是

A．列表框

B．单选按钮

C．标签

D．组合框

【小题4】为精确计算选手的最终得分，程序中变量s的数据类型应定义为

A．整型

B．单精度型

C．字符型

D．布尔型

【小题5】在Visual Basic 6.0中，下列是窗体文件默认扩展名的是

A．vbp

B．frm

C．bas

D．exe

【小题6】程序中①所在位置表达式正确的是

A．0

B．1

C．5

D．10

【小题7】程序中②所在位置表达式正确的是

A．Max < a(i)

B．Max >a(i)

C．Max =a(i)

D．Max <> a(i)

【小题8】程序中③所在位置表达式正确的是

A．s/3

B．(s+Max+ Min)/5

C．(s - Max - Min) / 3

D．(s - Max - Min) / 5

【小题9】在设计程序界面时，要把Command1命令按钮上显示的文字“计算”字体设成“微软雅黑”，下列Command1控件的属性应设置的是

A．Caption

B．Font

C．Default

D．name

【小题10】变量s所表示的含义是

A．最低分

B．最高分

C．评委打分

D．最终得分

【小题11】当一个选分的得分分别为9，8，9，7，8的时候，下列最终得分计算正确的是

A．8

B．8.33

C．7.66

D．7

【小题12】程序中Command1控件响应的事件是

A．单击事件

B．双击事件

C．载入事件

D．活动事件

【小题13】程序中数组a(5)包含的元素个数是

A．1

B．5

C．6

D．10

【小题14】程序“For i = 1 To 5 ……Next i”中“s = s + a(i) ”被执行的次数是

A．1

B．4

C．5

D．6

【小题15】下图程序结构属于

A．顺序结构

B．分支结构

C．循环结构

D．混合结构