[RESOLVED] Listview clear/adding items blinking, best approach to stop the blink

[Max187Boucher]

I am currently adding like this

Public Sub UpdateBooks()
Dim Rs As cRecordset  'vbrichclient5
Dim lstItem As ListItem

  With ListView1
      .Visible = False
      .ListItems.Clear
        Set Rs = BitFinex.MemDB.GetRs("SELECT * FROM vwBookBids")
          Do While Not Rs.EOF
              Set lstItem = .ListItems.Add(, , Rs("Price").Value)
                  lstItem.SubItems(1) = Rs("Amount").Value
              Rs.MoveNext
          Loop
      .Visible = True
  End With

End Sub

I use .visible = false/true at the moment, but there is a flicker, I have tried to use a .Refresh instead of visible false/true and it did stop the flicker however the loading is very slow (because of the refresh in a loop)..=

What solutions have you guys tried and been successful with the results?