Public Overrides Function PreProcessMessage( _
   ByRef msg As System.Windows.Forms.Message) As Boolean
   If msg.Msg = &H102 Then
      If msg.WParam.Equals(New IntPtr(&H2E)) _
         AndAlso msg.LParam.Equals(New IntPtr(&H530001)) Then
         ' Point in the numeric keypad pressed
         If Thread.CurrentThread.CurrentCulture.NumberFormat.NumberDecimalSeparator = "," Then
            ' And the decimal separator is a ',' for the current settings
            ' Change the message to enter a comma instead of a poin
            msg.WParam = New IntPtr(&H2C)
            msg.LParam = New IntPtr(&H330001)
         End If
      End If
  End If

  ' Do the default actions
   Return MyBase.PreProcessMessage(msg)
End Function