Public Overrides Function PreProcessMessage(ByRef m As Message) As Boolean
         MyBase.PreProcessMessage(m)
      	 If CType(m.WParam.ToInt32, Keys) = Keys.Tab Then Return False
         If Locked AndAlso Not m.Msg = WM_PAINT Then Return True     
      End Function