Foros del Web » Programación para mayores de 30 ;) » .NET »

Alguien Me Puede Ayudar Con Esto Por Favor

Estas en el tema de Alguien Me Puede Ayudar Con Esto Por Favor en el foro de .NET en Foros del Web. HOLA MIRAD HE ENCONTRADO UN CODIGO PARA OPTIMIZAR LA CARGA DE UN LISTVIEW PERO EN VISUAL BASIC 6.0 ESTE ES EL CODIGO Private Declare Sub ...
  #1 (permalink)  
Antiguo 30/01/2004, 14:32
 
Fecha de Ingreso: agosto-2003
Mensajes: 398
Antigüedad: 20 años, 8 meses
Puntos: 0
Alguien Me Puede Ayudar Con Esto Por Favor

HOLA MIRAD HE ENCONTRADO UN CODIGO PARA OPTIMIZAR LA CARGA DE UN LISTVIEW PERO EN VISUAL BASIC 6.0
ESTE ES EL CODIGO
Private Declare Sub InvalidateRect Lib "user32" (ByVal hWnd As Long, ByVal t As Long, ByVal bErase As Long)

Private Declare Sub ValidateRect Lib "user32" (ByVal hWnd As Long, ByVal t As Long)


Private Sub Command2_Click()
Dim I As Long
ListView1.View = 3
With ListView1.ListItems
.Clear
For I = 1 To 1000
.Add , , "test " & CStr(I)
ValidateRect ListView1.hWnd, 0&
If (I Mod 10) = 0 Then InvalidateRect ListView1.hWnd, 0&, 0&
DoEvents
Next I
End With
InvalidateRect ListView1.hWnd, 0&, 0&
End Sub

ALGUIEN ME DICE COMO SERIA EN VISUAL BASIC .NET
POR FAVOR OS LO SUPLICO ES MUY IMPORTANTE LO NECESITO

DE VERDAD OS LO PIDO POR FAVOR AYUDADME

GRACIAS SALUDOS
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 04:38.