Scroll (ILEADRasterImgList) example for Visual Basic

Private Sub LEADImgList1_Scroll ()
    Form1.Caption = "Page: " & CStr(LEADImgList1.CurrentPage) & " of " & CStr(LEADImgList1.PageCount)
End Sub