TION = 4
    Private Const SB_THUMBTRACK = 5
    Private Const SB_TOP = 6
    Private Const SB_VERT = 1

    Private Const SIF_RANGE = &amp;H1
    Private Const SIF_PAGE = &amp;H2
    Private Const SIF_POS = &amp;H4
    Private Const SIF_DISABLENOSCROLL = &amp;H8
    Private Const SIF_TRACKPOS = &amp;H10
    Private Const SIF_ALL = (SIF_RANGE Or SIF_PAGE Or SIF_POS Or SIF_TRACKPOS)

   Private Const ESB_DISABLE_BOTH = &amp;H3
   Private Const ESB_ENABLE_BOTH = &amp;H0
   
   Private Const SBS_SIZEGRIP = &am