Visual Basic, .NET, ASP, VBA, VBScript
 
  Библиотека кодов  
  Работа с контролами  
     
  Увеличение быстродействия при заполнении какого-либо элемента данными  
  Этот пример покажет, как можно запретить какой-либо области формы (окна) перекрашиваться. Данный пример ускоряет заполнение элементов ListBox или ListView большим количеством элементов. Разместите на форме элемент CommandButton и элемент CheckBox.

Скопируйте и вставьте в события формы следующий код, запустите проект на выполнение. Нажмите на кнопку, запомните результат, затем поставьте галочку в элемент CheckBox и снова нажмите на кнопку. Надеюсь, вы заметили разницу?


Private Declare Function LockWindowUpdate Lib "user32" (ByVal hwndLock As Long) As Long
Private Declare Function timeGetTime Lib "winmm.dll" () As Long

Private Sub Command1_Click()
Dim i As Long
Dim lTIme As Long
lTIme = timeGetTime()
If (Check1.Value = Checked) Then
LockWindowUpdate List1.hWnd
End If
List1.Clear
For i = 1 To 10000
List1.AddItem "Test " & i
Next i
If (Check1.Value = Checked) Then
LockWindowUpdate 0
List1.Refresh
End If
MsgBox "Time: " & timeGetTime - lTIme
End Sub
 
     
  VBNet online (всего: 51566)  
 

Логин:

Пароль:

Регистрация, забыли пароль?


В чате сейчас человек
 
     
  VBNet рекомендует  
   
     
  Лучшие материалы  
 
ActiveX контролы (112)
Hitman74_Library (36119)
WindowsXPControls (20739)
FlexGridPlus (19374)
DSMAniGifControl (18295)
FreeButton (15157)
Примеры кода (546)
Parol (18027)
Passworder (9299)
Screen saver (7654)
Kerish AI (5817)
Folder_L (5768)
Статьи по VB (136)
Мое второе впечатление... (11236)
VB .NET: дорога в будущее (11161)
Основы SQL (9225)
Сообщения Windows в Vi... (8788)
Классовая теория прогр... (8619)
 
     
Техническая поддержка MTW-хостинг | © Copyright 2002-2011 VBNet.RU | Пишите нам