袜子颜色配对问题。现有不同颜色的袜子若干（袜子的颜色用数字编号1~15表示）,颜色相同的袜子才能组成一双，其中有几只袜子是落单的，现要求找出落单袜子的颜色以及能够配对的袜子数量。编写程序解决该问题，程序运行时，在文本框Text1中依次输入袜子的颜色编号(数据都用逗号分隔并以逗号结尾)，单击“查找”按钮，在列表框List1中输出落单袜子的颜色编号，在标签label1中现实能配对的袜子数量。运行界面如图所示，实现上述功能的VB程序如下。

请回答下列问题：
（1）写出VB代码中的方法名____________（只需填一个方法名）；
（2）根据题意，请在划线处填入合适代码；
（3）加框处程序代码有错，请改正。
Const n = 15
Private Sub Command1_Click()
Dim a(1 To n) As Integer  '数组a存放不同颜色袜子的数量，默认值为0
Dim s As String, ch As String
Dim c As Integer, i As Integer, t As Integer
List1.Clear
s = Text1.Text
t = 0 ：c = 0 : i = 1
Do While i <= Len(s)
ch = Mid(s, i, 1)
If ch >= "0" And ch <= "9" Then
t = t * 10 + Val(ch)
Else
a(t) = _____________
t = 0
End If
i = i + 1
Loop
For i = 1 To n
If __________ Then List1.AddItem "落单袜子的颜色为" + Str(i)
c =　　_______________　　
Next i
Label1.Caption = "能配对的袜子有" + Str(c) + "双"
End Sub

编写一个“十进制转二进制”的VB程序，功能如下：在文本框Text1中输入0~255之间的整数，单击“转换”按钮Command1后，在Text2上显示对应的二进制数｡程序设计界面和运行界面分别如图a和图b所示｡

（1）要使程序运行时，按钮Command1上显示“转换”，下列方法不可行的是________________（单选，填字母：

A．界面设计时，选中对象Command1，设置Caption属性为“转换”/

B．在From_Load事件处理过程中添加语句Command1.Caption=＂转换＂/

C．在Form_Load事件处理过程中添加语句Command1.Text=＂转换＂）｡

（2）实证上述功能的 VB 程序如下，请在划线处填入合适代码｡
Private Sub Command1_Click()
Dim i As Integer, n As Integer, k As Integer, s
As String
n=Val(Text1. Text)
k=1:s=""
Do While 2^k < n
k=k+1
Loop
Do While n<>0
If n>=2^(k-1) Then
s=s+"1"
①__________
Else
s=s+"0"
End If
k=②_________
Loop

Text2. Text = s
End Sub
（3）若删除加框处的代码，在文本框Text1输入12，单击“转换”按钮，则文本框Text2中显示的内容是________________｡

下列图标中，表示VB控件工具箱中的文本框控件的是(   )

A．

B．

C．

D．

某Visual Basic程序如下：( )
Private Sub Command1_Click()
Dim a(-1 To 8) As Integer
Dim i As Integer
For i =" -1" To 8
a(i) =" i" * i
Next i
List1.AddItem Str (a(i))
End Sub
运行程序，单击命令按钮Command1后，出现的错误提示为（   ）

A．下标越界	B．子程序或函数未定义
C．溢出	D．类型不匹

下列说法正确的是（   ）

A．LABEL可以输入数据

B．TEXT只能输入数据

C．LABEL既能输入数据又能输出数据

D．TEXT既能输入数据又能输出数据。