プロが教える店舗&オフィスのセキュリティ対策術

ご存知の方、教えて頂けますか?
ImageListの中身、imageクラスをNotifyIconのアイコンに設定する為に、iconクラスに変換したいのですが
どのようにすれば良いでしょうか?もしかして出来ないのでしょうか?
申し訳ありませんが、宜しくお願いします。

A 回答 (1件)

 Dim img As Image = Me.ImageList1.Images(0)


 Using bmp As New Bitmap(img), ico As Icon = Icon.FromHandle(bmp.GetHicon())
   Me.Icon = ico
 End Using


分解するとこんな感じ
 Dim img As Image = Me.ImageList1.Images(0)
 Using bmp As New Bitmap(img)
   Using ico As Icon = Icon.FromHandle(bmp.GetHicon())
     Me.Icon = ico
   End Using
 End Using

この回答への補足

無事実行することが出来ました。
ありがとうございます。

補足日時:2007/02/15 19:42
    • good
    • 0
この回答へのお礼

ありがとうございます!!
助かりました!!

お礼日時:2007/02/14 10:30

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!