Protected Overrides Sub OnMouseMove(ByVal e As System.Windows.Forms.MouseEventArgs)
  If e.X > 25 And e.X < Me.Width - 25 Then
     Me.Text = "Yes"
  Else
     Me.Text = "No"
  End If
End Sub 'OnMouseMove