Public Class Form1 Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click Dim f As New Message_Form f.MainForm = Me f.Show() End Sub End Class
Public Class Message_Form Public Property MainForm As Form1 Private Sub OK_Button_Click(sender As Object, e As EventArgs) Handles OK_Button.Click MainForm.BringToFront() End Sub End Class