Hola, siguiendo tu ejemplo, en VBnet arme esto:
Form1.vb
Código vb:
Ver originalPublic Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim f As New Form2()
f.Padre = Me
f.Show()
End Sub
Public Sub HaceAlgo()
Me.Text = "Lo Hizo!"
End Sub
End Class
Form2.vb
Código vb:
Ver originalPublic Class Form2
Private _padre As Form
Public Property Padre() As Form
Get
Return _padre
End Get
Set(ByVal value As Form)
_padre = value
End Set
End Property
Public Sub MostrarNombre()
Me.Text = Padre.Name
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MostrarNombre()
End Sub
End Class
Gracias, saludos!