If e.Clicks = 1 Then
  MyPen.Color = Color.Red
Else
  MyPen.Color = Color.Blue
End If