阅读下图，回答下面小题。

Private Sub Timer1_Time( )

    For i= 0 To 10 Step 1

        Shape l(0) BackColor= RGB(Int(Rnd * 256), Int(Rnd * 256), In(Rnd * 256)

    Next i

End Sub