［声明］

Declare Function ExtractIcon Lib "shell32.dll" Alias "ExtractIconA" (ByVal hInst As Long, ByVal lpszExeFileName As String, ByVal nIconIndex As Long) As Long

［说明］

判断一个可执行文件或DLL中是否有图标存在，并将其提取出来

［参数表］

hInst ---------- Long，当前应用程序的实例句柄。也可用GetWindowWord函数取得拥有一个窗体或控件的实例的句柄

lpszExeFileName - String，在其中提取图标的那个程序的全名

nIconIndex ----- Long，欲获取的图标的索引。如果为-1，表示取得文件中的图标总数

［返回值］

Long，如成功，返回指向图标的句柄；如文件中不存在图标，则返回零。如果nIconIndex设为-1，就返回文件中的图标总数