Menampilkan MDI Child Form Tampil di Tengah Parent Form pada VB.Net

Tambahkan sebuah modul pada projek. Kemudian tuliskan prosedur di bawah ini di dalam modul yang barusan ditambahkan

Module Module1
    Sub keTengah(ByVal parent As Form, ByVal child As Form)
        Dim frmA As Form = parent
        Dim frmB As Form = child
        Dim x As Integer = (parent.Width / 2) - (child.Width / 2)
        Dim y As Integer = (parent.Height / 2.2) - (child.Height / 2)
        child.Location = New Point(x, y)
    End Sub
End Module

Untuk menggunakan prosedur tersebut, perintah untuk memanggil prosedur keTengah diletakkan di dalam event handler ChildForm_Load(). Misal :

Me.MdiParent = Form1 'Form1 adalah MDI parent-nya
CenterInParent(Form1, Me)

Semoga bermanfaat