Setting the height of a combobox control

Setting the height of a combobox control
<URL:http://dotnet.mvps.org/dotnet/faqs/?id=comboboxheight&lang=en>
----------------------------------------------------------------------------

Setting the height of a combobox control

.NET 1.1 does not provide a way to change the height of a combobox control.
This can be archieved by sending 'CB_SETITEMHEIGHT' with -1 as index to the
combobox control:

\\\
Private Declare Auto Function SendMessage Lib "user32.dll" ( _
    ByVal hWnd As IntPtr, _
    ByVal wMsg As Int32, _
    ByVal wParam As IntPtr, _
    ByVal lParam As IntPtr _
) As IntPtr

Private Const CB_ERR As Int32 = -1
Private Const CB_SETITEMHEIGHT As Int32 = &H153

Private Function SetComboBoxEditHeight( _
    ByVal ComboBox As ComboBox, _
    ByVal Height As Integer _
) As Boolean
    Return _
        SendMessage( _
            ComboBox.Handle, _
            CB_SETITEMHEIGHT, _
            New IntPtr(-1), New IntPtr(Height) _
        ) <> New IntPtr(CB_ERR)
    ComboBox.Refresh()
End Function
///

Usage:

\\\
Debug.Assert(SetComboBoxEditHeight(Me.ComboBox1, 50))
///