Speedy List Boxes

Speedy List Boxes

One way to speed list-box loading is to eliminate the constant redrawingrequired while loading. You can do this by calling the LockWindowUpdateAPI. LockWindowUpdate accepts an HWND as a parameter to start the lockand a zero parameter to unlock it. Only one window can be locked at a time.If LockWIndowUpdate is called with another HWND, the currently locked windowwill be unlocked. To run this sample, put a command button and a list box on a form andpaste in this code. Your code may not require the DoEvents within the loopthat adds items, and a tight basic loop will keep the list from updating.However, there are times when the DoEvents is required.

 Private Declare Function LockWindowUpdate Lib "user32" (ByVal hwndLock As Long) As LongPrivate Sub Command1_Click()	Dim i%	LockWindowUpdate (List1.hWnd)	For i% = 1 To 1000		List1.AddItem Str$(i%)		DoEvents	Next	LockWindowUpdate (0&)End Sub
See also  5 Benefits of Using Time Tracking Software

About Our Editorial Process

At DevX, we’re dedicated to tech entrepreneurship. Our team closely follows industry shifts, new products, AI breakthroughs, technology trends, and funding announcements. Articles undergo thorough editing to ensure accuracy and clarity, reflecting DevX’s style and supporting entrepreneurs in the tech sphere.

See our full editorial policy.

About Our Journalist