Highlights
All Snippets
Top 100 Snippets
Librarians
gbCodeLib

By Language
VB6
JavaScript
Perl
HTML
SQL
Java
DOS

GBIC >> Source Code >> Visual Basic >> Snippet

ComboBox - change width of drop down part


Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" _
      ( ByVal hwnd As Long , ByVal wMsg As Long , ByVal wParam As Long , lParam As Any) As Long

Public Sub SetComboWidth(X As ComboBox, iWidth As Long )
   SendMessage X.hwnd, &H160, iWidth, 0&
End Sub