Dim fileName As String = Reflection.Assembly.GetExecutingAssembly( _
          ).GetName().Name + ".Target.cur"
        Dim stream As IO.Stream = Reflection.Assembly.GetExecutingAssembly( _
        ).GetManifestResourceStream(fileName)
        Me.Cursor = New Cursor(stream)