Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
  System.EventArgs) Handles MyBase.Load
        Dim oStream As System.Io.Stream
 
        oStream = Me.GetType().Assembly.GetManifestResourceStream( _
          Shooter.Target.cur)
 
        Me.Cursor = New Cursor(oStream)