How to hide the numericUpDown control's up and down arrows?

  • Thread starter Thread starter ABC
  • Start date Start date
A

ABC

How to hide the numericUpDown control's up and down arrows?

I only want the numeric textbox, but numericUpDown has up and down arrow is
not my want, how can I hide it?
 
Hello ABC,
How to hide the numericUpDown control's up and down arrows?

I only want the numeric textbox, but numericUpDown has up and down
arrow is not my want, how can I hide it?
Click to expand...

I don't think that you can hide the arrows on the NumericUpDown control.
 
Public Class TextBoxEx
Inherits TextBox
Private Const ES_NUMBER As Integer = &H2000

Protected Overrides ReadOnly Property CreateParams() As
System.Windows.Forms.CreateParams
Get
Dim params As CreateParams = MyBase.CreateParams
params.Style = params.Style Or ES_NUMBER
Return params
End Get
End Property

Protected Overrides Function ProcessCmdKey(ByRef msg As
System.Windows.Forms.Message, ByVal keyData As System.Windows.Forms.Keys) As
Boolean
If keyData = (Keys.Shift Or Keys.Insert) OrElse keyData =
(Keys.Control Or Keys.V) Then
Dim data As IDataObject = Clipboard.GetDataObject
If data Is Nothing Then
Return MyBase.ProcessCmdKey(msg, keyData)
Else
Dim text As String =
CStr(data.GetData(DataFormats.StringFormat, True))
If text = String.Empty Then
Return MyBase.ProcessCmdKey(msg, keyData)
Else
For Each ch As Char In text.ToCharArray
If Not Char.IsNumber(ch) Then
Return True
End If
Next
Return MyBase.ProcessCmdKey(msg, keyData)
End If
End If
Else
Return MyBase.ProcessCmdKey(msg, keyData)
End If
End Function
End Class

/claes
 
Back
Top