Cita: eso me da error por todas partes.
Cual errror..?? es el que yo he ocupado en varias ocasiones..
Intentalo si quieres de ésta forma tambien.
Cita: Dim hBitmap As Bitmap = ImageList1.Images(5)
Dim hIcon As IntPtr = hBitmap.GetHIcon()
Me.niIcono.Icon = Icon.FromHandle(hIcon)