Private Declare Function LockWindowUpdate Lib "user32.dll" (ByVal hwnd As _
    Long) As Long

 Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As _
   System.EventArgs) Handles Button4.Click
 
        LockWindowUpdate(Me.Handle)
        With ListView1.Items
            For i As Integer = 0 To 200
                .Add(i)
            Next
        End With
 
        LockWindowUpdate(0)
    End Sub

fg viperbone