perfetto..

allora in questo caso dovrei fare cosi se non ho capito male:

Form1:

Public Sub prova()

Label1.Text = "SSSSSSSSSSSSSSSSSSSSSSSSSSSSS"
End Sub


Form2:
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
''''Dim frm1 As New Form1

''''frm1.prova()

Form1.prova()

End Sub