imageクラスからiconクラスに変換したいです

質問

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

回答No.1

AlexSuns · ベストアンサー

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

お礼

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

補足

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