>244
ピクチャーボックスのImageオブジェクトを
SaveメソッドでStreamオブジェクトに保存して、
それ使ってCursorクラスを作ればいいんじゃないか…って試してみたが、

見　事　失　敗　し　ま　す　た　。

Saveメソッドのトコで「値を Null にすることはできません。」だってさ。
ソースはこんな感じ。Imageはデザイン画面で設定してある。
俺、なんか勘違いしてるのかなぁ？

Dim MyStream As New System.IO.MemoryStream()
Me.PictureBox1.Image.Save(MyStream, Imaging.ImageFormat.Icon)
Me.Cursor = New Cursor(MyStream)

ちなみにこんな感じでStreamからカーソルが変更されるのは確認してるから、
Streamオブジェクトが作れれば何とかなると思うんだけど…

Dim myFileStream As New System.IO.FileStream([.Icoファイルのパス], IO.FileMode.Open)
Me.Cursor = New Cursor(myFileStream)