VBNet - все что Вы хотели знать о VB, но не знали где найти!

Visual Basic, .NET, ASP, VBA, VBScript

	Библиотека кодов
	Стандартные элементы >>> Combo Box

	Установить ширину ниспадающей части ComboBox
	Добавьте элемент ComboBox на форму Private Declare Function SendMessageLong Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long Private Const CB_SETDROPPEDWIDTH = &H160 Private Sub Form_Load() 'Число '180' устанавливает ширину ниспадающей части: замените его любым вашим числом r = SendMessageLong(Combo1.hwnd, CB_SETDROPPEDWIDTH, 180, 0) End Sub

VBNet online (всего: 52050)

Лучшие материалы

ActiveX контролы (112)

Примеры кода (546)

Статьи по VB (136)