Adding a Horizontal ScrollBar to a ListBox
Just a simple code snippet that teaches users how to add that illusive Horizontal ScrollBar to a Listbox Control or any other control, for that matter.
AI
एआई सारांश: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.
सोर्स कोड
'Declaring the SendMessage API - To send a Message to other Windows Public 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 Const LB_SETHORIZONTALEXTENT = &H194 'Set the Horizontal Bar to 2 times its Width Dim lngReturn As Long Dim lngExtent As Long lngExtent = 2 * (Form1.List1.Width / Screen.TwipsPerPixelX) lngReturn = SendMessage(Form1.List1.hWnd, LB_SETHORIZONTALEXTENT, _ lngExtent, 0&)
मूल टिप्पणियाँ (3)
Wayback Machine से पुनर्प्राप्त