Protected Overrides Sub OnClick(ByVal e As System.EventArgs)
  Num = Num + 1
  If Num > 2 Then Num = 0
  Me.BackColor = MyColors(Num)
End Sub 'OnClick