mp; " images."
            If (m_tID.idCount &gt; 0) Then
               
               ' loop through reading the directory information:
               ReDim m_tIDE(0 To m_tID.idCount - 1) As ICONDIRENTRY
               For iEntry = 1 To m_tID.idCount
                  ReadFile hFile, m_tIDE(iEntry - 1), Len(m_tIDE(iEntry - 1)),
                   dwBytesRead, ByVal 0&amp;
                  If (dwBytesRead &lt;&gt; Len(m_tIDE(iEntry - 1))) Then
                     sFail = "Icon Directory Array is Corrupt