如果将一个数据添加到列表框中，应用（  ）

A．LIST

B．REMOVEITEM

C．ADDITEM

D．CLEAR

某电信部门规定：拨打市话时，如果通话时间不超过3分钟（含3分钟），则收取通话费0.2元，如果通话时间超过3分钟，则超过部分以每分钟0.1元收取通话费（通话时间为整数）。下面是计算通话费用的流程图和程序，请分析并回答问题。
 
（1）用计算机解决问题时，首先应该确定程序“做什么？”，然后再确定程序“如何做？”请问“如何做？”是属于用计算机解决问题的___________步骤
（2）上图中的流程图中菱形表示的是________________
（3）在下列选项中，不属于VB的对象的是（_____）   
A.窗体的背景颜色 B.命令按钮   C.文本框 D.标签
（4）根据题意，完善流程图作图，填写空白处①______________________
（5）下图是计算通话费用程序窗体界面布局示意图。

Command1_Clik事件过程如下。请填写程序空白处。
Private Sub Command1_Click()
Dim ________as __________
x = Val(Text1.Text)
____________________ Then
’条件语句 
_________________________
’显出时间不超过3分钟的电话费
Else
Text2.Text = Str(0.2 + 0.1 * (x - 3)) ’显出通话时间超过3分钟时的电话费
End If
End Sub
（6）这段程序属于__________结构程序设计。
（7）要使一个命令按钮显示文字“确定”，正确的设置是把该命令按钮的（_________）。
A.属性Font设置为“确定” B.属性.ForeColor设置为“确定”
C.属性Caption设置为“确定” D.属性BorderStyle设置为“确定”
（8）“’条件语句”它对程序的运行（____________）
A.起一定作用 B.有时候起作用
C.不起任何作用，但是必须的 D.不起任何作用，但能增加程序的可阅读性
（9）在调试程序的时候，经常要设置断点，设置断点的快捷键是______________
（10）在程序调试程序过程中，___________（填：“编译错误”或“逻辑错误”或“执行错误”）是计算机检查不出来的

数组 a 存储降序排列的 m 个数据，数组 b 中存储的是升序排列的 n 个数据，且两个数组中存储的数据为区间1,20范围内的不重复的随机整数。现将两个数组的数据合并到 c 数组中，使 c 数组的数据为左右交替上升，如下表所示：

当窗体 Form1 加载时，自动产生 a、b 数组的数据，并分别显示在列表框 List1 与 List2
中，单击合并按钮 Command1 后，在 c 数组中保存按规则合并后的 a、b 数组的数据，并显示在列表框 List3 中。程序截图如下所示：

实现该功能的 VB 程序如下：
Const m = 5
Const n = 6
Dim a(1 To m) As Integer
Dim b(1 To n) As Integer
Dim c(1 To m + n) As Integer
‘窗体加载时，生成数组 a、b 中的数据，并按要求排序后显示在列表框中，代码略
Private Sub Command1_Click()
Dim pa As Integer, pb As Integer, pc As Integer, s As Integer, flag As Boolean
pa = m: pb = 1: pc = 1
flag = True
Do While ____________________  
If a(pa) < b(pb) Then

s = a(pa)

pa = pa - 1

Else

s = b(pb)

pb = pb + 1

End If
c(pc) = s
If flag Then

pc = m + n - pc + 1

Else

pc =　　

End If
__________________________
Loop
‘处理 a、b 数组中剩余数据，并在列表框 List3 中输出数组 c，代码略
End Sub
（1）窗体加载的事件处理过程名为__________。（填字母：

A．Form1_Click /	B．Form_Click /
C．Form1_Load /	D．Form_load）

（2）加框处代码有错，请改正。　__________
（3）在划线处填入合适的代码。

(加试题)有如下VB程序段：
Private Sub Command1_Click()
Dim i As Integer, s As Integer
s = 0
For i = 1 To 5 Step 3
s = s + fun(i)
Next i
Text1.Text = Str(s)
End Sub
Function fun(n As Integer) As Integer
If n = 1 Then
fun = 2
Else
fun = fun(n - 1) + n
End If
End Function
执行完该程序后，S的值为( )

A．7

B．11

C．13

D．25

第一个框架的默认名称是（____________________）