Dim newPos As Point = Form1.GroupBox1.PointToScreen( _
          Form1.Button1.Location)
        newPos.Offset(Form1.Button1.Width / 2, Form1.Button1.Height / 2)
        Windows.Forms.Cursor.Position = newPos

________
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