コマンドボタンにアイコンを表示 (ID:142518)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 グーグル先生に聞いて最初に出てきたページですが参考になりますか？ http://support.microsoft.com/kb/161299/ja 上記ページの CreateBitmapPicture 関数ではビットマップの変換なので、 OleCreatePictureIndirect の第１引数に渡す PICTDESC 構造体をアイコン用に修正してください。 こんな感じで定義しておけばいいと思います。 Type PICTDESC cbSizeofstruct As Long picType As Long hicon As OLE_HANDLE reserved1 As Long reserved2 As Long End Type