devxlogo

ListViewScroll – Scroll a ListView control horizontally or vertically

ListViewScroll – Scroll a ListView control horizontally or vertically

Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal _    hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, _    lParam As Any) As LongConst LVM_FIRST = &H1000Const LVM_SCROLL = (LVM_FIRST + 20)' Scroll the contents of a ListView control horizontally and vertically.'' If the ListView control is in List mode, DX is the number of' columns to scroll. If it is in Report mode, DY is rounded to the' nearest number of pixels that represent a whole line.Function ListViewScroll(lvw As ListView, ByVal dx As Long, ByVal dy As Long)    SendMessage lvw.hwnd, LVM_SCROLL, dx, ByVal dyEnd Function

devx-admin

Share the Post: