Private Sub Command1_Click()
   Dim b(8) As Integer, i As Integer, j As Integer
   b(1) = 9: b(2) = 10: b(3) = 15: b(4) = 2
   b(5) = 16: b(6) = 9: b(7) = 7: b(8) = 15
   For i = 1 To 8
     For j = 1 To 8
       If i <> j And b(i) = b(j) Then Exit For
     Next j
     If j > 8 Then Print b(i)
   Next i
End Sub
这里j = 1 To 8 最大也只能取到8，为何会有这句呢？？
     If j > 8 Then Print b(i)
j 顶多等于 8 ，怎么会大于 8 的时候输出 b(i) 呢？

当j循环正常结束时，j等于9

额，那这段程序运行后，显示的结果是10 2 16 7 又怎么个回事呢？