latSB(m_hWnd)
      If (Err.Number &lt;&gt; 0) Then
          'Can't find DLL entry point InitializeFlatSB in COMCTL32.DLL
          ' Means we have version prior to 4.71
          ' We get standard scroll bars.
          m_bNoFlatScrollBars = True
      Else
         Style = m_eStyle
      End If
   End If
      
End Sub

Private Sub GetWindowsVersion( _
      Optional ByRef lMajor = 0, _
      Optional ByRef lMinor = 0, _
      Optional ByRef lRevision = 0, _
      Optional ByRef lBuildNumber = 0 _
   )
D