【webbrowserでのスクロールイベントの取得に関して】
webbrowser上に自動実装されるスクロールのイベント及び、
スクロールの値の取得をまとめてみました。

'WithEvents:WebBrowser上のドキュメントイベントを取得


(VB 6.0)

'web browser スクロールイベント取得用
Private WithEvents w_webbr As HTMLBody        'webbrowserスクロールイベント用オブジェクト
Private st_pos_x As Long 'webbrowser html画面表示左座標
Private st_pos_y As Long 'webbrowser html画面表示上座標


'html読み込み完了
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
    Dim Doc As HTMLDocument
    Set Doc = from1.WebBrowser1.Document

    'web browser スクロールイベント取得
    Set w_webbr = Doc.body
End Sub


'スクロールイベント
Private Sub w_webbr_onscroll()
    Set Doc = from1.WebBrowser1.Document

    'スクロール座標取得
    On Error Resume Next

    '現在の表示位置を格納
    st_pos_x = Doc.documentElement.scrollLeft
    st_pos_y = Doc.documentElement.scrollTop
End Sub


'スクロール関数
    '画面の移動
    from1.WebBrowser1.Document.parentWindow.Scroll st_pos_x, st_pos_y


現状では、一回目のDocumentComplete時にスクロールイベントが取れていない
（調査中）がありますが、再度読み込みを行いDocumentCompleteで取得した
htmlDoc.bodyのスクロールイベントで取得確認は行っております。



以上

> 【webbrowserでのスクロールイベントの取得に関して】
> webbrowser上に自動実装されるスクロールのイベント及び、
> スクロールの値の取得をまとめてみました。
>
> 'WithEvents:WebBrowser上のドキュメントイベントを取得

趣旨が解らないのですが、質問でしょうか？
どれかの回答分でしょうか？

それとも、サンプル投稿用掲示板への投稿分でしょうか？