1. (2017高二上·温州期末) 要列出所有用数字1、2、3、0组成的没有重复数字的三位数，小赵利用软件编写了程序，界面如图，在 list1 中显示所有满足条件的三位数，在 label1 中显示满足条件的三位数的个数。

 

  实现上述功能的 VB 程序代码如下，请回答下列问题。

Private Sub Command1_Click() Dim a, b, c, d, z As Integer d = 0

For a = 1 To 3  'a代表百位

   For b = 0 To 3  'b代表十位

      For c = 0 To 3

        If a <> b And b <> c And c <> a Then                      ①                        list1.AddItem  str(z)            d = d + 1

        End If

      Next c

   Next b Next a

label1.Caption = "共有" +       ②          + "个数"

End Sub

1. （1） 程序代码中Command1_Click()代表   (填写编号:1、属性名2、方法名3、事件名4、过程名)
3. （2） 为实现上述功能，请填写正确的代码

   划线①处应填入的代码为 ；划线②处应填入的代码为