Private WithEvents client As New MdiClient
 
    Public Sub New()
 
        InitializeComponent()
 
        For Each c As Control In Me.Controls
            If TypeOf c Is MdiClient Then
                client = c
                Exit For
            End If
        Next c
    End Sub
 
    Private Sub MC_Paint(ByVal sender As Object, ByVal e As _
      System.Windows.Forms.PaintEventArgs) Handles client.Paint
        Using f As New Font("Arial", 20, FontStyle.Bold, GraphicsUnit.Point, 0)
            e.Graphics.DrawString("Some data in background", f, Brushes.Green, _
              50, 100)
        End Using
    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