mi spiego meglio..

dato questo codice

Sub apriFrm_film()
If pr_frm_film Is Nothing Then
pr_frm_film = New frm_film()
pr_frm_film.MdiParent = me
End If
pr_frm_film.Show()
pr_frm_film.Focus()
End Sub

devo sostituire il me con..... il form frm_index di cui ho istanziato cosi

dim obj_frm_index as new frm_index

ma facendo cosi:

Sub apriFrm_film()
If pr_frm_film Is Nothing Then
pr_frm_film = New frm_film()
pr_frm_film.MdiParent = obj_frm_index
End If
pr_frm_film.Show()
pr_frm_film.Focus()
End Sub

non funziona :master: