Using bmp As New Bitmap(16, 16), _
            g As Graphics = Graphics.FromImage(bmp), _
            p As New Pen(Color.Red, 2)
            g.DrawLine(Pens.Red, 7, 0, 7, 15)
            g.DrawLine(Pens.Red, 0, 7, 15, 7)
            Me.Cursor = New Cursor(bmp.GetHicon)
        End Using

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist