Protected Overrides Sub OnPaint(ByVal e As _
      System.Windows.Forms.PaintEventArgs)
        e.Graphics.DrawLine(Pens.Red, 0, 0, Me.ClientSize.Width, _
        Me.ClientSize.Height)
        e.Graphics.DrawEllipse(Pens.Green, 0, 0, Me.ClientSize.Width, _
        Me.ClientSize.Height)
    End Sub

________
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