编写代码在 窗口中进行。

A．属性窗口

B．布局窗口

C．代码窗口

D．立即窗口

统计列表框选项个数属性的是（    ）

A．List

B．Listcount

C．Listindex

D．Selected

编写VB程序，实现如下功能：在文本框Text1中输入包含数字、字母的字符串，单击“统 计”按钮Commandl，统计该字符串中数字字符的个数，并在标签Label1中输出结果。界面如1图所示。

1图 2图
（1）在设计应用程序界面时，应使用2图所示“控件工具箱”中的___①___（填写相应编号）添加“统计”按钮。
（2）为实现上述功能，请在划线处填入合适代码或选项。
Private Sub Commandl_Click()
Dim s As String，c As String
Dim i As Integer，n As Integer，num As Integer
s = ____②___(填程序代码）
num = 0
n = Len(s)
__③__'(填字母:从下列A、B、C三个选项中选取一项）
__④___'(填字母:从下列A、B、C三个选项中选取一项）
If  c>= "0" And c<= "9"  Then
num =" num" + 1
End If
Next  i
Labell. Caption = str(num)
End Sub
划线③、④的选项：

A．Do While i <=" n"

B．c =" Mid(s,i,1)"

C．For i =" 1" To n

设x="4,y=6,则能在Text1控件上能显示A=" 10的语句是(    )

A．Text1 = "A=x+y"

B．Text1.text = "A="+Str(x+y)

C．Text = "A="+Str(x+y)

D．Text1.text = "A="+Val(x+y)

数学中的“自守数”：如果一个数的平方数的末几位等于该数本身，这个数就是自守数。例如：
5*5=25
6*6=36
25*25=625
76*76=5776
……
那么，5、6、25、76 等数被称为自守数。小袁编写一个 VB 程序，实现如下功能：找出 10000 以内所有可能的自守数，单击“统计”按钮 Command1，将符合要求的自守数显示在列表框 List1 中，统计个数显示在标签 Label1 中，运行界面如图所示。

（1）程序运行时要在按钮上显示“统计”，应设置该按钮的________属性。
（2）为实现上述功能，请在划线处填入合适的代码。
Private Sub Command1_Click()
Dim n As Single, k As Integer, t As Integer, c As Integer
List1.Clear c=0
For n = 5 To 10000
k = Len(Trim(n))   'Trim()函数用于删除字符串前后的空格
t = (n * n)    Mod
If t = n Then
① _     List1.AddItem   Str(n)
②     
End If
Next n

Label1.Caption = "自守个数为：" + Str(c)

End Sub
为实现上述功能，划线处应填入的代码分别为
①__________________________________________ 。
②___________________________________________。
（3）解决该问题采用了_______（选填：枚举/解析）算法。