Public Class eQM_cls_Main
    Public Shared frmMainWindow As New frm_MainWindow()
    Public Shared frmPersonal As New eQM_Personal.frmPersonal()
End Class

    Private Sub frmMainWindow_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
        'Globale Variable des Hauptfensters einstellen.
        eQM_cls_Main.frmPersonal.MdiParent = Me
        eQM_cls_Main.frmPersonal.Focus()
    End Sub

Gru? Rub

(PS: Besuch doch mal meine Seiten http://e-liquids.de und http://jjpassion.de)