ConvertIconToBitmap
将图标图片转换为位图图片。
语法:ConvertIconToBitmap( IconPicture [ , BackColor ] ) As Object
- IconPicture
- 必需 Object。一个持有图标(
vbPicTypeIcon)或光标(vbPicTypeIcon)的stdole.StdPicture。 - BackColor
- 可选 Variant。将透明像素展平到的背景颜色,以OLE颜色值给出。如果省略,则使用系统Window颜色。
返回的图片是一个全新的位图类型stdole.StdPicture,图标栅格化在所选背景之上。原始图标图片保持不变。
示例
vb
Dim Bmp As StdPicture
Set Bmp = ConvertIconToBitmap(MyIconPicture, RGB(255, 255, 255))
Set Picture1.Picture = Bmp