设有n盏灯，放在一排．从1到n依次顺序编号．有n个人也从1到n依次编号．第1个人（1号）将灯全部关闭，第2个人（2号）将2的倍数的灯打开，第3个人（3号）将编号为3的倍数的灯做相反处理（该灯如果已打开，则将它关闭；如为关闭则将它打开），以后的人和3号一样，将编号为自己号数倍数的灯做相反处理．问当n个人操作后，哪几盏灯是亮的（亮灯为0，关闭为1）．程序代码如下：
Private Sub Command1_Click（　　）
  Const n=20
  Dim i As Integer,j As Integer
  Dim a（1 To n） As Integer
  For j=1 To n
     a（j）=0
  Next j
  For i=1 To n
     For j=1 To n
        If ①then
             ②
        End If
    Next j
  Next i
  For j=1 To n
     If a（j）=0 Then list1．AddItem Str（j）
  Next j
End Sub
为了实现程序该功能，在横线处填写正确代码．
①

j mod i=0

j mod i=0

 ②

a（j）=1-a（j）

a（j）=1-a（j）

．