小金编写了一个统计随机数分布的VB程序，部分程序如下所示，在调试程序的时候出现如右图所示的错误信息：

n =0 : m = 0
For  i =1 To 100
If  Rnd > 0.5  Then
n = n + 1
Else
m = m + 1
Next  i
……
小金仔细分析该程序段后，发现其中缺少了（ ）

A．For

B．End If

C．Next

D．If

在VB中，下列选项属于字符串型数据的是

A．2356

B．"BX277"

C．BX277

D．2014-5-28

有如下Visual Basic程序段：
a = 9
b = "Command Button"
c = Len(b)
If a > 0 And a < c Then
Label1.Caption =Mid(b,a,6)
Else
Label1.Caption = "error"
End If
该程序段运行后，在标签Label1上显示的是____________

A．error

B．6

C．Button

D．Command

VB程序设计采用的编程机制是_____________________

请认真阅读并分析下面Visual Basic程序代码，按要求完成题目。
　  Dim a(1 To 6) As Integer
　  Dim n, i, j, k As Integer
　  Private Sub Command1_Click()
For i =" 1" To n - 1
　For j =   （1） To n
   　If a(i) < a(j) Then
k = a(i):  （2）  : a(j) = k
End If
Next j
Next i
For i =" 1" To n
    list2.AddItem Str(a(i))
Next I
　  End Sub
　Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii =" 13" Then
n =" n" + 1
a(n) = Val(    (3)  )
List1.AddItem Str(a(n))
Text1.Text = "": Text1.SetFocus
End If
End Sub
（1）程序中出现了text和list两种控件，其中list控件的中文名称是列表框，text控件的中文名称是 。
（2）在上述程序段中3处带序号的空白地方补充恰当的语句，完善程序。