d If
   
   If (m_bHasVerticalScroll) Then
      tSIVert.cbSize = Len(tSIVert)
      tSIVert.fMask = SIF_RANGE Or SIF_PAGE Or SIF_POS Or SIF_TRACKPOS
      GetScrollInfo m_hWnd, SB_VERT, tSIVert
      lVertOffset = deltaToScrollAmount(lYOffset, m_eVerticalMode, tSIVert)
      If Not (lVertOffset = 0) Then
         bDoIt = True
         If (m_eVerticalMode = eLineBased) Then
            If (lVertOffset &lt; 32) Then
               If (timeGetTime() - m_lLastVertTime) &lt; 100 Then
                  bDoIt = F