学进去

小李编写了“数字游戏”的 VB 程序，功能是查找符合下列条件的3 个三位数：
①3 个数中包含 1-9 的全部数字，且不重复；
②3 个数的大小之比为 1：2：3。
如“192、384、576”是符合规则的一种组合。
现编写程序功能如下：单击“计算”按钮 Command1，在列表框 List1 中输出符合条件的数字组合，在标签 Label1 中输出组合数量。程序运行界面如图所示。

（1）上图程序运行界面中，有 Caption 属性的对象共_______ （填数字）类。
（2）实现程序功能的 VB 代码如下，请在划线处填入合适的代码。
Private Sub Command1_Click()
Dim f(0 To 9) As Integer
Dim i As Long, j As Integer, s As Integer
Dim tmp As Long, t As Integer, count As Integer
count = 0
For i = 123 To 333
For j =①______ 
f(j) = 0
Next j
tmp = i + 2 * i * 1000 + 3 * i * 1000000
Do While tmp > 0
t =②_____ 
tmp = tmp \ 10
f(t) = 1
Loop
s = 1
For j = 1 To 9
s = s * f(j)
Next j
If③______ Then
List1.AddItem Str(i) + Str(2 * i) + Str(3 * i)
count = count + 1
End If
Label1.Caption = "共有" + Str(count) + "种组合"
Next i
End Sub