Export BMP File To Icon File
With the code below you can
save BMP file as ICO File.
Preparations
Add
1 ImageList Control
to your form.
Form Code
Private Sub
Form_Load()
' Load the picture into
the ImageList. replace "d:\myDir\File.bmp"
' with
the BMP file name you want to export.
ImageList1.ListImages.Add , ,
LoadPicture("d:\myDir\File.bmp")
' Save the icon file. replace "d:\myDir2\File2.ico" with the
new Icon
' file you want to create.
SavePicture ImageList1.ListImages(1).ExtractIcon,
"d:\myDir2\File2.ico"
End Sub