I then add a block of lines to the end, and I want to simultaneously scroll
to the end.  To do this I increase VScroll.Max by the number of lines added
and then I increase V.Scroll.Value to the new max.  The problem is that the
scroll bar first moves the bar up a little (when max is increased, because
the value is then less than max) and then moves it back to the bottom when
the value is set to the new max.

In Notepad, pasting lines continuously to the bottom does not cause this
scroll bar shudder.  The scrollbar stays in the max position, while the max
and the value are both incremented.

How does it do that?  How can I achieve the same with VB6's VScroll bar?

Any guidance would be appreciated.  Thanks.

Nigel

Ivar

Option Explicit
Private Declare Sub Sleep Lib "kernel32" _
(ByVal dwMilliseconds As Long)
Private Declare Function LockWindowUpdate _
Lib "user32" (ByVal hwndLock As Long) As Long

Private Sub Command1_Click()
With VScroll1
'LockWindowUpdate .hWnd
.Max = 200
Sleep 500
.Value = 200
End With
'LockWindowUpdate 0&
End Sub

Nigel

  With VScroll1
    .Visible = False
    .Max = .Max + Whatever
    .Value = .Max
    .Visible = True
  End With

LFS