Public Sub CenterChild(oMDIChild As Form)
  oMDIChild.Left = (Me.ScaleWidth - oMDIChild.Width) / 2
  oMDIChild.Top = (Me.ScaleHeight - oMDIChild.Height) / 2
End Sub
 
Füge diese Funktion in Dein MDI Formular ein und rufe sie für dein Fomular auf.
z.B.
Private Sub mnuAlternative_Click()
  Dim ofrm As New frmLogonST1
  Load ofrm
  CenterChild ofrm
  ofrm.Show
End Sub