Функция ExtractIconEx извлекает пиктограммы из файлов с расширением EXE, DLL и ICO.
Declare Function ExtractIconEx Lib "shell32.dll" Alias "ExtractIconExA" (ByVal lpszFile As String, ByVal nIconIndex As Long, phiconLarge As Long, phiconSmall As Long, ByVal nIcons As Long) As Long
lpszFile - имя файла, в котором находятся пиктограммы. nIconIndex - индекс извлекаемой пиктограммы, если phiconLarge и phicoSmall не равны 0, в противном случаее функция возвращает количество пиктограмм, находящихся в файле. phiconLarge - массив, получающий описатели больших пиктограмм. Установите равным 0, если количество получаемых пиктограмм не больше одной. phiconSmall - массив, получающий описатели малых пиктограмм. Установите равным 0, если количество получаемых пиктограмм не больше одного. nIcons - число пиктограмм, извлечённых из файла.