Protected Overrides Sub OnClick(ByVal e As System.EventArgs)
Dim MyBrush As New SolidBrush(Color.Black)
Dim N As Integer
For N = 0 To 10
  Me.CreateGraphics.DrawString(N, Me.Font, MyBrush, 0, N * 15)
  Me.CreateGraphics.DrawString(English(N),Me.Font,MyBrush, 15, N*15)
Next N
End Sub 'OnClick