［声明］ 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，就返回文件中的图标总数