Exactly, as i said in the first post i modified the Sub InsertAtImpl with this codes:
Dim Position As Int = sv.ScrollPosition + dividerHeight + ItemHeight'
'
' Original subroutine code here
'
sv.ScrollToNow(Position)
If i add one item everything works perfectly. But if i add, for example, 20 items at time (like adding for example 20 items of a chat conversation) it doesn't scroll correctly.
Take a look to the attached example an try to press on "Add 20 items" button
Any suggestion for fixing this problem?
I also tried to add DoEvents like this:
Dim Position As Int = sv.ScrollPosition + dividerHeight + ItemHeight'
'
' Original subroutine code here
'
DoEvents
sv.ScrollToNow(Position)
DoEvents
...but in this case everything is so slow and you can notice a "bouncing" effect.