Hello Friends,
I have solved this problem from other person's help.
I used below code, to solve this problem.
I placed this code in Find Button of Contacts.vb,
fin as new frmFind
fin.MdiParent = Me.MdiParent
fin.Show()
I have not deleted this post because, someone can get any idea or answer for their queries.