Se la tua immagine è una bitmap:
codice:
Dim i As Icon = Icon.FromHandle(b.GetHicon)
Dove b contiene la tua bitmap;

HTH