用物理天平测量物体的质量。待测物体的质量为X克（X为小于1000的整数），以下程序功能为计算天平砝码盘中所需的砝码。已知天平可用的砝码为500克1个，200克1个，100克2个，50克1个，20克1个，10克2个，5克1个，2克2个，1克1个。程序界面如图所示。

Private Sub Command1_Click()

Dim a(1 To 12) As Integer, i As Integer, x As Integer

a(1) = 500: a(2) = 200: a(3) = 100: a(4) = 100: a(5) = 50: a(6) = 20

a(7) = 10: a(8) = 10: a(9) = 5: a(10) = 2: a(11) = 2: a(12) = 1

i = 1

x = Val(Text1.Text)

List1.Clear

Do While  ①   

If x >= a(i) Then

List1.AddItem Str(a(i))

   ②   

End If

i = i + 1

Loop   

End Sub

（1）上述代码中“List1.Clear”中的Clear是对象List1的
（选填： 属性 / 事件 / 方法）。
（2）为实现以上功能，画线①处应填入的代码为   
画线②处应填入的代码为  
（3）程序运行正确后，在文本框内输入708，并单击“计算”按钮。则程序运行结果为
（选字母A/B/C）。

A		B		C

 

某Visual Basic工程的相关视图如下图所示：

从图中信息可知，下列说法不正确的是(  )

A．窗体中有一个按钮对象，名称为Command1

B．该程序中用到了Timer控件

C．当前代码窗口中显示的事件处理过程名为“Command1_Click”

D．该工程的窗体文件名“snow.vbp”

在VB程序设计中，若要修改窗体标题为“欢迎来到VB的世界！” （如下图所示），则应修改Form对象的（   ）属性值。

A．Font

B．Caption

C．Text

D．BorderStyle

窗体装载事件过程可以对程序进行初始化。VB窗体装载事件过程的名称是（   ）

A．Command1_Click

B．Form_Click

C．Form_Load

D．Form_DblClick

某 VB 程序代码如下：
Private Sub Command1_Click()
Dim a As Integer, b As Single
a = Val(Text1.Text)
b = 3.14 * a ^ 2
Text2.Text = "圆面积为：" + b
End Sub
在 Text1 中输入 3，单击命令按钮 Command1 后，将会出现的提示信息是：（   ）

A．类型不匹配	B．溢出
C．无效的过程调用或参数	D．未找到方法或数据成员