Public Class TextBoxH
  Inherits TextBox

  Public Sub New()
    SetStyle(ControlStyles.FixedHeight, False)
  End Sub
End Class

Public Class DateTimePickerH
  Inherits DateTimePicker

  Public Sub New()
    SetStyle(ControlStyles.FixedHeight, False)
  End Sub
End Class

MinimumSize = 4;24

MinimumSize = 4;23

  Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load
    TextBox1.AutoSize = False
  End Sub

Public Class NumericUpDownH
  Inherits NumericUpDown

  Public Overrides Property MinimumSize() As Size
    Get
      Return New Size(MyBase.MinimumSize.Width, 23)
    End Get
    Set(value As Size)
      MyBase.MinimumSize = New Size(value.Width, value.Height)

    End Set
  End Property
End Class